Mercurial > repos > tabletprog
diff modules/llcompile.tp @ 357:f237d0cae58b
llcompile now works well enough for the a simple fib program to work
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 16 Apr 2015 08:46:35 -0700 |
parents | 3b023e5a0b42 |
children | 0b83f15e819d |
line wrap: on
line diff
--- a/modules/llcompile.tp Wed Apr 15 23:03:24 2015 -0700 +++ b/modules/llcompile.tp Thu Apr 16 08:46:35 2015 -0700 @@ -270,7 +270,7 @@ } else: { option none } - _compileExpr: expr syms: syms ilfun: ilf dest: (option none) + _compileExpr: expr syms: syms ilfun: ilf dest: asn } elseblock <- ilf popBlock ilf add: (il skipIf: (il eq) block else: elseblock) @@ -515,7 +515,7 @@ mcode <- compileText: text _notError: mcode { ba <- bytearray executableFromBytes: mcode - arg <- if: (length: args) > 2 { int32: (args get: 2) } else: {0} + arg <- if: (length: args) > 2 { int64: (args get: 2) } else: {0} res <- ba runWithArg: (arg int64) print: (string: res) . "\n" } else: :err {