perm filename BUG.GRU[S,AIL] blob
sn#125758 filedate 1974-10-21 generic text, type T, neo UTF8
NAME BLOCK
00 BUG
PROGRAM
LOCATION 000000 000000'
334000 000000 067,000,000,000,000,000 SKIPA 000000
476000 000000 117,100,000,000,000,000 SETOM 000000
264000 000000 055,000,000,000,000,000 JSR 000000
261740 000012 054,076,000,000,005,000 PUSH 17,000012
261740 000000 054,076,000,000,000,000 PUSH 17,000000
261740 000016 054,076,000,000,007,000 PUSH 17,000016
541517 777776 130,064,177,177,177,000 HRRI 12,777776(17)
PROGRAM
LOCATION 000000 000007'
254000 000000 053,000,000,000,000,000 JRST 000000
261740 000012 054,076,000,000,005,000 PUSH 17,000012
261740 000000 054,076,000,000,000,000 PUSH 17,000000
261740 000016 054,076,000,000,007,000 PUSH 17,000016
551517 777776 132,064,177,177,177,000 HRRZI 12,777776(17)
205040 000000 041,042,000,000,000,000 MOVSI 01,000000
202040 000000 040,102,000,000,000,000 MOVEM 01,000000
200512 000000 040,024,120,000,000,000 MOVE 12,000000(12)
274740 000000 057,036,000,000,000,000 SUB 17,000000
254037 000001 053,001,170,000,000,100 JRST @000001(17)
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000006
000000 000021'
PROGRAM
LOCATION 000000 000022'
000000 000010' 000,000,000,000,004,000 000 000010'
000000 000003 000,000,000,000,001,100 000 000003
440700 000000 110,034,000,000,000,000 ANDCB 16,000000
020040 000000 004,002,000,000,000,000 020 01,000000
000000 000001 000,000,000,000,000,100 000 000001
000000 000002 000,000,000,000,001,000 000 000002
000001 000000 000,000,010,000,000,000 000 000000(01)
000001 000000 000,000,010,000,000,000 000 000000(01)
000022' 000000 000,001,020,000,000,000 000 @000000(02) (R)
000013' 000000 000,000,130,000,000,000 000 000000(13) (R)
000010' 000016' 000,000,100,000,007,000 000 000016'(10) (R)
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
432371 700000 106,117,117,000,000,000 XORM 07,@700000(11)
201100 000001 040,044,000,000,000,100 MOVEI 02,000001
202100 000015' 040,104,000,000,006,100 MOVEM 02,000015'
200512 000000 040,024,120,000,000,000 MOVE 12,000000(12)
PROGRAM
LOCATION 000000 000043'
274740 000017' 057,036,000,000,007,100 SUB 17,000017'
254037 000001 053,001,170,000,000,100 JRST @000001(17)
261740 000012 054,076,000,000,005,000 PUSH 17,000012
261740 000000 054,076,000,000,000,000 PUSH 17,000000
261740 000016 054,076,000,000,007,000 PUSH 17,000016
551517 777776 132,064,177,177,177,000 HRRZI 12,777776(17)
254000 000040' 053,000,000,000,020,000 JRST 000040'
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000006
000000 000052'
PROGRAM
LOCATION 000000 000053'
000000 000045' 000,000,000,000,022,100 000 000045'
000000 000003 000,000,000,000,001,100 000 000003
440700 000000 110,034,000,000,000,000 ANDCB 16,000000
020040 000000 004,002,000,000,000,000 020 01,000000
000000 000001 000,000,000,000,000,100 000 000001
000000 000002 000,000,000,000,001,000 000 000002
000001 000000 000,000,010,000,000,000 000 000000(01)
000001 000000 000,000,010,000,000,000 000 000000(01)
000053' 000000 000,002,130,000,000,000 000 01,000000(13) (R)
000050' 000033' 000,002,100,000,015,100 000 01,000033'(10) (R)
000040' 000042' 000,002,000,000,021,000 000 01,000042' (R)
000000 000035' 000,000,000,000,016,100 000 000035'
000000 000000 000,000,000,000,000,000 000 000000
412032 200000 102,101,122,000,000,000 ANDCAM @200000(12)
260740 000000 054,036,000,000,000,000 PUSHJ 17,000000
201140 000001 040,046,000,000,000,100 MOVEI 03,000001
202140 000041' 040,106,000,000,020,100 MOVEM 03,000041'
PROGRAM
LOCATION 000000 000074'
254000 000000 053,000,000,000,000,000 JRST 000000
201200 000002 040,050,000,000,001,000 MOVEI 04,000002
202200 000073' 040,110,000,000,035,100 MOVEM 04,000073'
312200 000004 062,110,000,000,002,000 CAME 04,000004
254000 000000 053,000,000,000,000,000 JRST 000000
PROGRAM
LOCATION 000000 000077'
312200 000004 062,110,000,000,002,000 CAME 04,000004
254000 000000 053,000,000,000,000,000 JRST 000000
PROGRAM
LOCATION 000000 000101'
200240 000076' 040,012,000,000,037,000 MOVE 05,000076'
202240 000000 040,112,000,000,000,000 MOVEM 05,000000
201540 000066' 040,066,000,000,033,000 MOVEI 13,000066'
260740 000000 054,036,000,000,000,000 PUSHJ 17,000000
200512 000000 040,024,120,000,000,000 MOVE 12,000000(12)
274740 000000 057,036,000,000,000,000 SUB 17,000000
263740 000000 054,176,000,000,000,000 POPJ 17,000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000006
000000 000112'
PROGRAM
LOCATION 000000 000113'
000000 000003' 000,000,000,000,001,100 000 000003'
000000 000003 000,000,000,000,001,100 000 000003
440700 000000 110,034,000,000,000,000 ANDCB 16,000000
020040 000000 004,002,000,000,000,000 020 01,000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000002 000,000,000,000,001,000 000 000002
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000113' 000000 000,004,130,000,000,000 000 02,000000(13) (R)
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
740040 000000 170,002,000,000,000,000 BLKI 01,000000
000000 000000 000,000,000,000,000,000 000 000000
412530 700000 102,125,107,000,000,000 ANDCAM 12,@700000(10)
000000 000000 000,000,000,000,000,000 000 000000
777777 777777 177,177,177,177,177,100 CONSO 17,@777777(17)
PROGRAM
LOCATION 000000 000134'
000003 000003 000,000,030,000,001,100 000 000003(03)
INTERNAL REQUEST
000011' 000032'
000030' 000036'
000024' 000037'
000046' 000063'
000061' 000067'
000055' 000070'
000007' 000071'
000100' 000072'
000074' 000101'
000101' 000110'
000102' 000111'
000064' 000113'
000004' 000123'
000121' 000127'
000103' 000127'
000115' 000131'
000106' 000134'
000043' 000135'
PROGRAM
LOCATION 000000 000135'
000004 000004 000,000,040,000,002,000 000 000004(04)
SYMBOLS
14 BUG 000000 000001
10 BUG. 000000 000071'
10 I 000000 000110'
10 J 000000 000111'
10 FOO 000000 000010'
10 FOO$ 000000 000022'
10 BAR 000000 000045'
10 BAR$ 000000 000053'
60 BUG 000000 000003'
SYMBOLS
60 BEXIT 000000 000104'
60 .UINIT 000000 000071'
LIBRARY REQUEST
SYS :LIBSA8.REL
PROGRAM
LOCATION 000000 000136'
000000 000000 000,000,000,000,000,000 000 000000
000011 000010 000,000,110,000,004,000 000 000010(11)
000000 000000 000,000,000,000,000,000 000 000000
000000 007777 000,000,000,017,177,100 000 007777
000000 000000' 000,000,000,000,000,000 000 000000'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000132' 000,000,000,000,055,000 000 000132'
000000 000133' 000,000,000,000,055,100 000 000133'
102200 000003 020,110,000,000,001,100 102 04,000003
000000 000113' 000,000,000,000,045,100 000 000113'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000002
000000 000136'
STARTING ADDRESS
000000 000000'
SYMBOLS
60 SAILOR 000000 000002'
60 RPGSW 000000 000001'
SYMBOLS
10 S. 000000 000000'
10 P 000000 000017
10 SP 000000 000016
10 ARERR 007000 000000
10 FLOAT 002000 000000
10 FIX 003000 000000
END BLOCK
000000 000157'