github.com/retro-software.B5500-software
1
0
Fork 0
mirror of https://github.com/retro-software/B5500-software.git synced 2026-05-02 06:15:45 +00:00
Code Issues Releases Wiki Activity

Correct minor spacing typo in SYMBOL/ALGOL.alg_m.

Browse Source
This commit is contained in:
Paul Kimpel
2012-12-15 16:21:36 +00:00
parent c05d97a450
commit 579111f4fb
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SYMBOL/ALGOL.alg_m
View File

@@ -12211,7 +12211,7 @@ PROCEDURE DSS; 16362000
IF ELCLASS = LITV THEN 16381000 IF ELCLASS = LITV THEN 16381000
BEGIN 16382000 BEGIN 16382000
EMITC(ADDR,TRP); 16383000 EMITC(ADDR,TRP); 16383000
IF STEPI!STRING AND ELCLASS!STRNGCON AND %111-16384000 IF STEPI ! STRING AND ELCLASS ! STRNGCON AND %111-16384000
ELCLASS ! LITNO AND ELCLASS ! NONLITNO THEN %111-16384100 ELCLASS ! LITNO AND ELCLASS ! NONLITNO THEN %111-16384100
BEGIN ERR(255);GO TO EXIT END; 16384500 BEGIN ERR(255);GO TO EXIT END; 16384500
IF ELCLASS = LITNO OR ELCLASS = NONLITNO THEN %111-16384700 IF ELCLASS = LITNO OR ELCLASS = NONLITNO THEN %111-16384700