1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-25 18:08:05 +11:00

forth: fix DOES> bad exec offset

This commit is contained in:
Virgil Dupras 2020-03-13 21:27:19 -04:00
parent 5b1ca474d4
commit 94166186eb

View File

@ -285,7 +285,6 @@ DOES:
call wrCompHL call wrCompHL
inc iy \ inc iy ; cell variable space inc iy \ inc iy ; cell variable space
ld hl, (IP) ld hl, (IP)
inc hl \ inc hl
call wrCompHL call wrCompHL
ld (HERE), iy ld (HERE), iy
jp EXIT+2 jp EXIT+2