github.com/retro-software.B5500-software
1
0
Fork 0
mirror of https://github.com/retro-software/B5500-software.git synced 2026-01-13 23:25:24 +00:00
Code Issues Releases Wiki Activity

Commit debugging patches to B6500 ESPOL compiler as of 2014-07-25.

Browse Source
This commit is contained in:
Paul Kimpel 2014-07-26 00:14:50 +00:00
parent 4756f068de
commit f720302e25
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
source/B65ESPOL/SOURCE.alg_m
View File

@ -3807,7 +3807,7 @@ COMMENT GOBBLES UP AN ITEM REFERENCE AND LEAVES A THING LOOKING LIKE AN 57268000
QUEUEINFO; % FIRST WORD OF QUEUE OR QUEUE ARRAY INFO 57274000
REAL GT1; % HOLDS CLASS OF ITEM 57274500
LABEL ON,QUIT,FINI; 57275000
INDEX~(ITEMINFO+TAKE(ELBAT[I])).QINDEXF; 57276000
INDEX~(ITEMINFO~TAKE(ELBAT[I])).QINDEXF; 57276000
N ~ ITEMINFO.LINK; 57277000
QUEUECLASS~(QUEUEINFO~TAKE(IF(GT1~ ITEMINFO.CLASS) 57278000
>EVENTARRAYID OR GT1<BOOARRAYID THEN N 57279000