PL/M-86 COMPILER TEXT MODULE 10/5/81 PAGE 1 ISIS-II PL/M-86 V2.0 COMPILATION OF MODULE TEXT OBJECT MODULE PLACED IN TEXT.OBJ COMPILER INVOKED BY: :F0: TEXT.PLM DEBUG OPTIMIZE(2) DATE(10/5/81) PAGEWIDTH(100) XREF $title ('TEXT MODULE') 1 text: do; $include (:f1:macro.lit) = $nolist /* modified 3/28/81 R. Silberstein modified 3/30/81 R. Silberstein modified 4/8/81 R. Silberstein modified 4/15/81 R. Silberstein modified 7/24/81 R. Silberstein */ /* Bytes to define "yes" and "no": */ 3 1 dcl yes byte public data ('Y'), no byte public data ('N'); /* Text strings: */ 4 1 dcl initials(*) byte public data('CP/M ASM86 1.1 SOURCE: ',0), pagetext(*) byte public data(' PAGE',0), endtext(*) byte public data('END OF ASSEMBLY. ', 'NUMBER OF ERRORS: ',0), USEFACTOR (*) BYTE PUBLIC DATA ('. USE FACTOR: ',0), asm86text(*) byte public data(cr,lf,'CP/M 8086 ASSEMBLER VER 1.1', cr,lf,0), parerrtext(*) byte public data(cr,lf,'PARAMETER ERROR',cr,lf,0), openerrtext(*) byte public data(cr,lf,'NO FILE',0), DISKREADERRTEXT (*) BYTE PUBLIC DATA (CR,LF,'DISK READ ERROR',0), DISKWRITEERRTXT (*) BYTE PUBLIC DATA (CR,LF,'DISK FULL',0), MAKEERRTEXT (*) BYTE PUBLIC DATA (CR,LF,'DIRECTORY FULL',0), CLOSEERRTEXT (*) BYTE PUBLIC DATA (CR,LF,'CANNOT CLOSE',0), SYMBFULLERRTEXT (*) BYTE PUBLIC DATA (CR,LF,'SYMBOL TABLE OVERFLOW',0), usbreaktext(*) byte public data(cr,' USER BREAK. OK(Y/N)? ',0), pass0text (*) byte public data('END OF PASS 1',cr,lf,0), pass1text (*) byte public data('END OF PASS 2',cr,lf,0); 5 1 end$module text; PL/M-86 COMPILER TEXT MODULE 10/5/81 PAGE 2 CROSS-REFERENCE LISTING ----------------------- DEFN ADDR SIZE NAME, ATTRIBUTES, AND REFERENCES ----- ------ ----- -------------------------------- 2 ADDR . . . . . . . LITERALLY 4 0056H 32 ASM86TEXT. . . . . BYTE ARRAY(32) PUBLIC DATA 4 00C3H 15 CLOSEERRTEXT . . . BYTE ARRAY(15) PUBLIC DATA 2 CR . . . . . . . . LITERALLY 4 2 DCL. . . . . . . . LITERALLY 4 0094H 18 DISKREADERRTEXT. . BYTE ARRAY(18) PUBLIC DATA 4 00A6H 12 DISKWRITEERRTXT. . BYTE ARRAY(12) PUBLIC DATA 2 ELSEDO . . . . . . LITERALLY 2 ENDCASE. . . . . . LITERALLY 2 ENDDO. . . . . . . LITERALLY 2 ENDFOREVER . . . . LITERALLY 2 ENDIF. . . . . . . LITERALLY 2 ENDMODULE. . . . . LITERALLY 2 ENDOFFILE. . . . . LITERALLY 2 ENDPROC. . . . . . LITERALLY 4 0021H 37 ENDTEXT. . . . . . BYTE ARRAY(37) PUBLIC DATA 2 ENDWHILE . . . . . LITERALLY 2 FALSE. . . . . . . LITERALLY 2 FOREVER. . . . . . LITERALLY 2 FORMFEED . . . . . LITERALLY 2 INIT . . . . . . . LITERALLY 4 0002H 25 INITIALS . . . . . BYTE ARRAY(25) PUBLIC DATA 2 LF . . . . . . . . LITERALLY 4 2 LIT. . . . . . . . LITERALLY 2 4 00B2H 17 MAKEERRTEXT. . . . BYTE ARRAY(17) PUBLIC DATA 3 0001H 1 NO . . . . . . . . BYTE PUBLIC DATA 4 008AH 10 OPENERRTEXT. . . . BYTE ARRAY(10) PUBLIC DATA 4 001BH 6 PAGETEXT . . . . . BYTE ARRAY(6) PUBLIC DATA 4 0076H 20 PARERRTEXT . . . . BYTE ARRAY(20) PUBLIC DATA 4 0102H 16 PASS0TEXT. . . . . BYTE ARRAY(16) PUBLIC DATA 4 0112H 16 PASS1TEXT. . . . . BYTE ARRAY(16) PUBLIC DATA 2 PROC . . . . . . . LITERALLY 2 REENT. . . . . . . LITERALLY 2 SPACE. . . . . . . LITERALLY 2 STRUC. . . . . . . LITERALLY 4 00D2H 24 SYMBFULLERRTEXT. . BYTE ARRAY(24) PUBLIC DATA 2 TAB. . . . . . . . LITERALLY 1 0000H TEXT . . . . . . . PROCEDURE STACK=0000H 2 THENDO . . . . . . LITERALLY 2 TRUE . . . . . . . LITERALLY 4 00EAH 24 USBREAKTEXT. . . . BYTE ARRAY(24) PUBLIC DATA 4 0046H 16 USEFACTOR. . . . . BYTE ARRAY(16) PUBLIC DATA 3 0000H 1 YES. . . . . . . . BYTE PUBLIC DATA MODULE INFORMATION: CODE AREA SIZE = 0000H 0D PL/M-86 COMPILER TEXT MODULE 10/5/81 PAGE 3 CONSTANT AREA SIZE = 0122H 290D VARIABLE AREA SIZE = 0000H 0D MAXIMUM STACK SIZE = 0000H 0D 77 LINES READ 0 PROGRAM ERROR(S) END OF PL/M-86 COMPILATION