mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-04-25 19:51:55 +00:00
f288264276
1. Updated compiler and library sources after second proofing pass. 2. Updated Generator and Compiler object code and build decks. 3. Updated Generator and Compiler loadable object tapes. 4. Corrections to BAC-Assembler and enhancements for additional card/tape output options. 5. Minor corrections to GEN-Assembler. 6. Updates to miscellaneous utilities and example programs.
81 lines
3.1 KiB
Plaintext
81 lines
3.1 KiB
Plaintext
|
||
Assembler for the Burroughs 220 BALGOL Compiler & Library
|
||
Pre-load Pool
|
||
Load Source & Go
|
||
List Pass 1 List Pass 2 Write Checksum Output Mode
|
||
|
||
|
||
Assembler for the Burroughs 220 BALGOL Compiler & Library -- 2018-01-11 06:12
|
||
|
||
Source File: FIX.card
|
||
START PASS 1
|
||
|
||
.00.0 0000 ERROR DEFN 100
|
||
.00.0 0000 FIX CRB
|
||
.00.0 0001 SRT 8
|
||
.00.0 0002 STA 8 A+,04
|
||
.00.0 0003 LDB 8 A+
|
||
.00.0 0004 *A CLA
|
||
.00.0 0005 IBB 8 B+,9949
|
||
.00.0 0006 DBB 8 C+,10
|
||
.00.0 0007 SLT - 11
|
||
.00.0 0008 *B LDB 8 FIX
|
||
.00.0 0009 BUN - 0
|
||
.00.0 0010 *C IOM 8 D+
|
||
.00.0 0011 LDR 8 $FIX$
|
||
.00.0 0012 LDB 8 FIX
|
||
.00.0 0013 BUN 6 ERROR
|
||
.00.0 0014 *D CLR
|
||
.00.0 0015 BUN 8 B-
|
||
.00.0 0016 LOCN LOCN *+1
|
||
.00.0 0017 CNST 40000990000
|
||
.00.0 0018 CNST $FIX,INTEGER(REAL) ERROR=1 $
|
||
.00.0 0024 CNST 90000000000
|
||
.00.0 0025 LOCN LOCN
|
||
.00.0 0016 FINI FIX
|
||
0016 $FIX
|
||
|
||
|
||
END PASS 1, ERRORS = 0
|
||
|
||
START PASS 2
|
||
|
||
.00.0 1 0000 ERROR DEFN 100
|
||
.00.0 2 0000 0 0006 45 0000 FIX CRB
|
||
.00.0 3 0001 0 0001 48 0008 SRT 8
|
||
.00.0 4 0002 8 0410 40 0004 STA 8 A+,04
|
||
.00.0 5 0003 8 0000 42 0004 LDB 8 A+
|
||
.00.0 6 0004 0 0001 45 0000 *A CLA
|
||
.00.0 7 0005 8 9949 20 0008 IBB 8 B+,9949
|
||
.00.0 8 0006 8 0010 21 0010 DBB 8 C+,10
|
||
.00.0 9 0007 1 0001 49 0011 SLT - 11
|
||
.00.0 10 0008 8 0000 42 0000 *B LDB 8 FIX
|
||
.00.0 11 0009 1 0000 30 0000 BUN - 0
|
||
.00.0 12 0010 8 0002 39 0014 *C IOM 8 D+
|
||
.00.0 13 0011 8 0000 41 0016 LDR 8 $FIX$
|
||
.00.0 14 0012 8 0000 42 0000 LDB 8 FIX
|
||
.00.0 15 0013 6 0000 30 0100 BUN 6 ERROR
|
||
.00.0 16 0014 0 0002 45 0000 *D CLR
|
||
.00.0 17 0015 8 0000 30 0008 BUN 8 B-
|
||
.00.0 18 0016 LOCN LOCN *+1
|
||
.00.0 19 0017 4 0000 99 0000 CNST 40000990000
|
||
.00.0 20 0018 2 4649 67 2349 CNST $FIX,INTEGER(REAL) ERROR=1 $
|
||
0019 2 5563 45 4745
|
||
0020 2 5924 59 4541
|
||
0021 2 5304 00 4559
|
||
0022 2 5956 59 3381
|
||
0023 2 0000 00 0000
|
||
.00.0 21 0024 9 0000 00 0000 CNST 90000000000
|
||
.00.0 22 0025 LOCN LOCN
|
||
.00.0 23 0016 FINI FIX
|
||
0016 2 4649 67 0000 $FIX
|
||
|
||
|
||
SYMBOL TABLE
|
||
|
||
16 $FIX 4 *A..1 8 *B..1 10 *C..1 14 *D..1
|
||
8 BMOD 100 ERROR 0 FIX 16 LOCN 1 RLO
|
||
|
||
END PASS 2, ERRORS = 0
|
||
|