sjs/sectorlisp
1
0
Fork 0
mirror of https://github.com/samsonjs/sectorlisp.git synced 2026-04-27 14:57:41 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Initialize register cache for robustness

Browse source
This commit is contained in:
Hikaru Ikuta 2022-01-06 06:58:33 +09:00
parent 162969de42
commit 1136e5752e
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
sectorlisp.S
View file

@ -55,6 +55,7 @@ begin: mov $0x8000,%sp # uses higher address as stack
main: mov %sp,%cx main: mov %sp,%cx
mov $'\r',%al mov $'\r',%al
call PutChar call PutChar
mov %dx,%fs # Clear input lookahead cache
call Read call Read
call EvalPrint call EvalPrint
jmp main jmp main