@@ -75,7 +75,7 @@ procedure = testGroup "procedure"
|
||||
]
|
||||
[ Push (ValReg "n")
|
||||
, Prim "x1" $ PrimSub (ValReg "n") (ValImm (ImmInt 1))
|
||||
, PushCont "fac-k0"
|
||||
, PushCont (ValLabel "fac-k0")
|
||||
, Call (ValLabel "fac") [ValReg "x1"]
|
||||
]
|
||||
]
|
||||
|
||||
Reference in New Issue
Block a user