github.com/retro-software.B5500-software
1
0
Fork 0
mirror of https://github.com/retro-software/B5500-software.git synced 2026-02-14 19:16:17 +00:00
Code Issues Releases Wiki Activity

1. Correct transcription error affecting ALGOLXEM and Mark-XVI/ALGOL in code generation for the SEARCH() intrinsic.

Browse Source 
2. Enhance repo README file.
This commit is contained in:
Paul Kimpel
2016-05-04 12:33:02 -07:00
parent 58c5963d9a
commit 27423c1fa5
3 changed files with 34 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Mark-XVI/SYMBOL/ALGOL.alg_m
View File

@@ -4675,7 +4675,7 @@ L1: IF T2<23 THEN BEGIN IF ELCLASS!COMMA THEN ERRX(80) END 06062210
STEPIT; AEXP; EMITPAIR(28,COM); T1~1; 06073830
END; END; END; 06073840
GTI1~0; 06073845
DO EMITO(DEL) UNTIL GTI1~GTI1-1=T1;% 06073850
DO EMITO(DEL) UNTIL GTI1~GTI1+1=T1;% 06073850
IF ELCLASS!RTPAREN THEN ERR(104) ELSE STEPIT; 06073860
GO TO EXIT; 06073870
EXIT: END IMPFUN; 06074000