// 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