d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(opctest) Add tests for JSI wraparound

This commit is contained in:
Remko Tronçon 2023-11-11 21:33:54 +01:00 committed by neauoire
parent 0abd2758c8
commit bd3b9a70b7
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
cli/opctest/opctest.tal
View File

@ -216,7 +216,7 @@ JMP2r
=op-jmi [ =op-jmi [
=op-jmi/a ] =op-jmi/a ]
=op-jsi [ =op-jsi [
=op-jsi/a =op-jsi/b ] =op-jsi/a =op-jsi/b =op-jsi/c =op-jsi/d ]
&end &end
@op-equ ;Dict/equ !set @op-equ ;Dict/equ !set
@ -406,6 +406,8 @@ JMP2r
@op-jsi ;Dict/jsi !set @op-jsi ;Dict/jsi !set
&a #02 #04 routine #06 EQU JMP2r &a #02 #04 routine #06 EQU JMP2r
&b ;&return special &return JMP2r &b ;&return special &return JMP2r
&c ,&skip-c JMP &routine-c ADD JMP2r &skip-c #02 #04 op-jsi/routine-c #06 EQU JMP2r
&d ,&skip-d JMP &routine-d ADD JMP2r &skip-d #02 #04 op-jsi-far-routine-d #06 EQU JMP2r
@special ( routine* -- f ) @special ( routine* -- f )
@ -441,3 +443,4 @@ JMP2r
&jmi "JMI $1 &jci "JCI $1 &jsi "JSI $1 &jmi "JMI $1 &jci "JCI $1 &jsi "JSI $1
] ]
|f000 @op-jsi-far-routine-d op-jsi/routine-d JMP2r