akkartik
/
mu
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

46 - there's no continue bug after all in anarki

This commit is contained in:
Kartik K. Agaram 2014-08-02 02:25:32 -07:00
parent d90d6629a9
commit 0cd4bfc8ae
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mu.arc
View File

@ -104,12 +104,12 @@
otype
(ty (fn-oargs arg.0))
jmp
(do (= pc (+ pc (v arg.0))) ; relies on continue still incrementing (bug)
(do (= pc (+ pc (v arg.0)))
;? (prn "jumping to " pc)
(continue))
jif
(when (is t (m arg.0))
(= pc (+ pc (v arg.1))) ; relies on continue still incrementing (bug)
(= pc (+ pc (v arg.1)))
;? (prn "jumping to " pc)
(continue))
copy

2
mu.arc.t
View File

@ -363,7 +363,7 @@
(reply (9 integer))
((5 type) <- literal boolean)
((6 boolean) <- neq (4 type) (5 type))
(jif (6 boolean) (6 offset))
(jif (6 boolean) (4 offset))
((7 boolean) <- arg)
((8 boolean) <- arg)
((9 boolean) <- or (7 boolean) (8 boolean))