1 implementation module mTaskInterpret
4 import gdynamic, gCons, GenEq, StdMisc, StdArray
9 toByteVal :: BC -> String
14 toReadableByteVal :: BC -> String
15 toReadableByteVal a = printToString a
17 instance arith ByteCode where
24 instance serial ByteCode where
25 serialAvailable = undef
27 serialPrintln _ = undef
29 serialParseInt = undef
31 Start :: Main (ByteCode Int Expr)
32 Start = {main=serialPrint (lit 36)}