File tree Expand file tree Collapse file tree 2 files changed +6
-2
lines changed
Expand file tree Collapse file tree 2 files changed +6
-2
lines changed Original file line number Diff line number Diff line change 6363start:
6464 jmp Save_Input_Values
6565SYS_Version dw EXPECTED_VERSION ;AN001; From VERSIONA.INC file
66- Mystacks dw 64 dup ( 0 ) ;AN000; local stack
66+ ; Mystacks dw 64 dup (0) ;AN000; local stack
67+ ; https://www.os2museum.com/wp/how-not-to-release-historic-source-code/comment-page-1/#comment-381416
68+ Mystacks dw 128 dup ( 0 ) ;AN000; local stack
6769MyStack_ptr label word
6870
6971;local data
Original file line number Diff line number Diff line change @@ -460,6 +460,8 @@ NOLIST:
460460 POP BX ; back to beginning of new stack area
461461 MOV SPSAVE , AX ; remember where new stack is
462462 DEC AH
463+ INC AX ; Per John Elliot a long standing bug since 2.0
464+ INC AX ; affecting CALL 5 // Licca
463465 MOV ES :WORD PTR [ 6 ], AX ; change PSP to show usage of
464466 SUB BX , AX ; new stack area
465467 MOV CL , 4
@@ -1233,4 +1235,4 @@ TEST_LEAD endp ;an000;end proc
12331235
12341236CODE ENDS
12351237 END START
1236-
1238+
You can’t perform that action at this time.
0 commit comments