mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-24 14:31:05 +00:00
SH, FORTH : fixes preventing CRASH at EXIT or SHUTDOWN
This commit is contained in:
parent
1eaa2c98f1
commit
cce21ed742
@ -711,7 +711,7 @@ CS.QUIT jsr GFX.Close
|
||||
>LDA.G HIS.hBuf
|
||||
beq .10
|
||||
|
||||
>SYSCALL FreeStkObj
|
||||
>SYSCALL StrVFree
|
||||
|
||||
.10 >LDA.G hSList
|
||||
beq .1
|
||||
|
@ -501,7 +501,7 @@ CS.QUIT jsr CORE.FUNCRESET
|
||||
.10 >LDA.G HIS.hBuf
|
||||
beq .1
|
||||
|
||||
>SYSCALL FreeStkObj
|
||||
>SYSCALL StrVFree
|
||||
|
||||
.1 ldy #CL.hBuf
|
||||
jsr .7
|
||||
|
Loading…
Reference in New Issue
Block a user