mirror of
https://github.com/retro-software/B5500-software.git
synced 2026-01-27 03:51:41 +00:00
Correct LITC generation in Algol compiler GOTOSOLVER parameter setup.
This commit is contained in:
@@ -8734,7 +8734,7 @@ EXIT: 39315000
|
||||
BEGIN 39460000=06366000=
|
||||
COMMENT OUR BAD GO TO IS JUMPING OUTSIDE OF ALL PROCEDURES; 39465000=06367000=
|
||||
EMIT(0); 39470000=06368000=
|
||||
EMIT(TLEVEL); 39475000=06369000=
|
||||
EMITL(TLEVEL); 39475000=06369000=
|
||||
END 39480000=06370000=
|
||||
ELSE 39485000=06370000=
|
||||
BEGIN 39490000=06370000=
|
||||
|
||||
Reference in New Issue
Block a user