浏览代码

8086asm: add overflow check to RPCs,

I've spent way too much time debugging bugs caused by this...

*sigh*, why can't I learn?
pull/126/head
Virgil Dupras 4 年前
父节点
当前提交
acf8e03f53
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. +2
    -1
      blk/760

+ 2
- 1
blk/760 查看文件

@@ -4,7 +4,8 @@
: BREAK?, DUP 0x8000 AND IF
0x7fff AND 1 ALLOT THEN, -1 ALLOT
THEN ; )
: RPCs, PC - 1- A, ; : RPCn, PC - 2- A,, ;
: RPCs, PC - 1- DUP 128 + 0xff > IF ABORT" PC ovfl" THEN A, ;
: RPCn, PC - 2- A,, ;
: AGAIN, ( BREAK?, ) RPCs, ;
( Use RPCx with appropriate JMP/CALL op. Example:
JMPs, 0x42 RPCs, or CALLn, 0x1234 RPCn, )

正在加载...
取消
保存