TAL Programmer's Guide

Source Listing
Compiler Listing
096254 Tandem Computers Incorporated 15–5
Figure 15-3. Source Listing
?ICODE, SYMBOLS, SAVEABEND, INSPECT
2. 000000 0 0 NAME mymodule;
3. 000000 0 0
4. 000000 0 0 ?SOURCE outd
Source file: [2] $VOL.PROG1.OUTD 1993-04-22 09:22:45
1. 000000 0 0 !Size declarations
2. 000000 0 0
3. 000000 0 0 BLOCK out_data;
4. 000000 0 0 LITERAL
5. 000000 0 0 outblklen = 1024,
6. 000000 0 0 out_rec_len = 256;
7. 000000 0 0 END BLOCK;
5. 000000 0 0
Source file: [1] $VOL.PROG1.SOURCE1S 1993-05-13 19:18:07
.
.
24. 000000 0 0 PROC myproc;
25. 000000 1 0 BEGIN
26. 000000 1 1 STRING array1[0:7] := [" TPR "];
27. 000004 1 1 INT array2[0:11];
28. 000004 1 1 INT length, error;
.
.
31. 000021 1 1 IF length THEN BEGIN
32. 000023 1 2 CALL FILE_OPEN_ (array1, out_file);
33. 000032 1 2 IF < THEN BEGIN
34. 000033 1 3 CALL file_hndle (out_file, error);
.
.
37. 000051 1 3 END;
38. 000051 1 2 END
39. 000051 1 1 ELSE BEGIN
Conditional
Compilation Listing
An asterisk (*) in column 10 marks statements not compiled because of a conditional
compilation directive (IF or IFNOT).