git.iko.soy/Idris-dev
on master help sign in
Debuggable CodegenC primitive match failures
d20d0b9Benjamin Saunders
src/IRTS/CodegenC.hs+1−1
compare with master
unifiedsplit
@@ -447,4 +447,4 @@ doOp v LFork [x] = v ++ "MKPTR(vm, vmThread(vm, " ++ cname (MN 0 "EVAL") ++ ", "
447doOp v LPar [x] = v ++ creg x -- "MKPTR(vm, vmThread(vm, " ++ cname (MN 0 "EVAL") ++ ", " ++ creg x ++ "))"
447doOp v LPar [x] = v ++ creg x -- "MKPTR(vm, vmThread(vm, " ++ cname (MN 0 "EVAL") ++ ", " ++ creg x ++ "))"
448doOp v LVMPtr [] = v ++ "MKPTR(vm, vm)"
448doOp v LVMPtr [] = v ++ "MKPTR(vm, vm)"
449doOp v LNoOp args = v ++ creg (last args)
449doOp v LNoOp args = v ++ creg (last args)
450−doOp _ _ _ = "FAIL"
450+doOp _ op _ = "FAIL /* " ++ show op ++ " */"