mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-26 09:54:20 +00:00
124 lines
5.3 KiB
Plaintext
124 lines
5.3 KiB
Plaintext
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
|