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

Commit debugging patches to B6500 ESPOL compiler as of 2014-08-02.

Browse Source
This commit is contained in:
Paul Kimpel 2014-08-02 15:11:22 +00:00
parent 442be54013
commit 2095541b45
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

@ -6324,7 +6324,7 @@ COMMENT * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 70000000
IF STEPI ! UNKNOWNID THEN % BUT THIS HAS ALREADY BEEN 70021000
FLAG(700); % DECLARED. 70022000
IF NOT ENTER(SPAZE,TIPE,KLASS,C) THEN % 70023000
IF B > 0 THEN % B IS INITIAL-VALUE TYPE 70024000
IF B } 0 THEN % B IS INITIAL-VALUE TYPE 70024000
IF TABLE(I+1) = ASSNOP THEN % DID HE GIVE ONE 70025000
BEGIN % WELL, COMPILE IT 70026000
IF B=EVNTV THEN FLAG(783); 70026500