Fixed printing from lambdas

[cc1516.git] / gen.icl

diff --git a/gen.icl b/gen.icl
index ebc4754..e9d6cac 100644 (file)
--- a/gen.icl
+++ b/gen.icl
@@ -304,7 +304,7 @@ funnyStuff k es fs = getAdressbook >>= \ab->case 'Map'.get k ab of
                        ,Instr "ldr" [Raw "RR"] ""
                        ]
                )
-       Nothing = liftT (Left $ Error "Undefined function!!!")
+       Nothing = liftT (Left $ Error $ "PANIC: Undefined function: " +++ k)
 
 instance g Stmt where
     g (IfStmt cond th el) =