interval ops not baked yet

This commit is contained in:
~d6 2022-02-06 17:08:59 -05:00
parent 765340fde2
commit 65d1a6cc52
1 changed files with 3 additions and 3 deletions

View File

@ -566,8 +566,8 @@
( INTERVAL OPERATIONS ) ( INTERVAL OPERATIONS )
( ) ( )
( ) ( not baked yet )
(
@min ( first* last* -> min-addr* ) @min ( first* last* -> min-addr* )
SWP2 STH2k ,&incr JMP ( last first [first] ) SWP2 STH2k ,&incr JMP ( last first [first] )
&loop LDAk LDAkr STHr LTH ,&replace JCN ,&incr JMP ( last a [c] ) &loop LDAk LDAkr STHr LTH ,&replace JCN ,&incr JMP ( last a [c] )
@ -589,4 +589,4 @@
&above POPr POP &below #00 JMP2r &above POPr POP &below #00 JMP2r
@iv-find ( c^ iv* -> bool^ ) @iv-find ( c^ iv* -> bool^ )
)