fix bugs for uireorg

[mTask.git] / mTaskInterpret.icl

diff --git a/mTaskInterpret.icl b/mTaskInterpret.icl
index 81bf135..789c58a 100644 (file)
--- a/mTaskInterpret.icl
+++ b/mTaskInterpret.icl
@@ -161,8 +161,8 @@ toReadableByteCode x
 //             bc = (lit 36 +. lit 42) +. lit 44
 
 Start :: String
-//Start = toReadableByteCode $ unMain bc
-Start = toRealByteCode $ unMain bc
+Start = toReadableByteCode $ unMain bc
+//Start = toRealByteCode $ unMain bc
        where
                bc :: Main (ByteCode Int Expr)
                bc = sds \x=41 In