From c401260e94ff9cefb6ac46a8e31c09a9a1c8688a Mon Sep 17 00:00:00 2001
From: Kamil Adam
Date: Mon, 27 Mar 2023 21:24:34 +0200
Subject: [PATCH] Add peephole Optimize
---
.../Fast/False/from-eas/fact2\n.logged" | 735 --------
.../Fast/False/from-eas/fact3\n.logged" | 735 --------
.../Fast/False/from-eas/fact4\n.logged" | 735 --------
.../Fast/False/from-eas/fact5\n.logged" | 735 --------
.../Fast/False/from-eas/fact6\n.logged" | 735 --------
.../Fast/False/from-eas/fact7\n.logged" | 735 --------
.../Fast/False/from-eas/fact8\n.logged" | 735 --------
.../Fast/False/from-eas/readnum0\n.logged" | 3 -
.../Fast/False/from-eas/readnum1\n.logged" | 3 -
.../Fast/False/original/fact3\n.logged" | 750 --------
.../Fast/False/original/fact5\n.logged" | 750 --------
.../Fast/False/original/fact6\n.logged" | 750 --------
.../Fast/False/original/fact7\n.logged" | 750 --------
.../Fast/False/original/fact8\n.logged" | 750 --------
.../logged/Fast/False/original/hello2.logged | 190 --
.../logged/Fast/True/original/bottles.logged | 964 ----------
.../logged/Fast/True/original/fact2\n.logged" | 750 --------
.../logged/Fast/True/original/fact3\n.logged" | 750 --------
.../logged/Fast/True/original/fact4\n.logged" | 750 --------
.../logged/Fast/True/original/fact5\n.logged" | 750 --------
.../logged/Fast/True/original/fact6\n.logged" | 750 --------
.../logged/Fast/True/original/fact7\n.logged" | 750 --------
.../logged/Fast/True/original/fact8\n.logged" | 750 --------
.../Fast/{False => }/from-eas/bottles.logged | 148 +-
.../Fast/{False => }/from-eas/divmod.logged | 0
.../eval/logged/Fast/from-eas/fact0\n.logged" | 305 ++--
.../eval/logged/Fast/from-eas/fact1\n.logged" | 305 ++--
.../eval/logged/Fast/from-eas/fact9\n.logged" | 305 ++--
.../Fast/{False => }/from-eas/hello.logged | 0
.../Fast/{False => }/from-eas/hello2.logged | 26 +-
.../eval/logged/Fast}/from-eas/hello3.logged | 26 +-
.../eval/logged/Fast}/from-eas/hello4.logged | 26 +-
.../{False => }/from-eas/readcharA.logged | 0
.../logged/Fast/from-eas/readnum0\n.logged" | 387 ++++
.../logged/Fast/from-eas/readnum1\n.logged" | 387 ++++
.../Fast/{False => }/from-eas/true.logged | 0
.../eval/logged/Fast}/original/bottles.logged | 310 ++--
.../eval/logged/Fast}/original/crlf.logged | 16 +-
.../eval/logged/Fast/original/fact1\n.logged" | 316 ++--
.../eval/logged/Fast/original/fact9\n.logged" | 316 ++--
.../eval/logged/Fast}/original/hello.logged | 31 +-
.../eval/logged/Fast/original/hello2.logged | 154 ++
.../Original/False/from-eas/bottles.logged | 613 -------
.../Original/False/from-eas/divmod.logged | 19 -
.../Original/False/from-eas/fact0\n.logged" | 533 ------
.../Original/False/from-eas/fact1\n.logged" | 533 ------
.../Original/False/from-eas/fact2\n.logged" | 533 ------
.../Original/False/from-eas/fact3\n.logged" | 533 ------
.../Original/False/from-eas/fact4\n.logged" | 533 ------
.../Original/False/from-eas/fact5\n.logged" | 533 ------
.../Original/False/from-eas/fact6\n.logged" | 533 ------
.../Original/False/from-eas/fact7\n.logged" | 533 ------
.../Original/False/from-eas/fact8\n.logged" | 533 ------
.../Original/False/from-eas/fact9\n.logged" | 533 ------
.../Original/False/from-eas/hello.logged | 94 -
.../Original/False/from-eas/hello2.logged | 132 --
.../Original/False/from-eas/hello3.logged | 132 --
.../Original/False/from-eas/hello4.logged | 132 --
.../Original/False/from-eas/readcharA.logged | 10 -
.../False/from-eas/readnum0\n.logged" | 268 ---
.../False/from-eas/readnum1\n.logged" | 268 ---
.../Original/False/from-eas/true.logged | 7 -
.../Original/{False => }/original/crlf.logged | 0
.../{False => }/original/hello.logged | 0
.../{False => }/original/hello2.logged | 0
.../Fast/False/from-eas/fact2\n.output" | 0
.../Fast/False/from-eas/fact3\n.output" | 0
.../Fast/False/from-eas/fact4\n.output" | 0
.../Fast/False/from-eas/fact5\n.output" | 0
.../Fast/False/from-eas/fact6\n.output" | 0
.../Fast/False/from-eas/fact7\n.output" | 0
.../Fast/False/from-eas/fact8\n.output" | 0
.../Fast/False/original/fact2\n.output" | 1 -
.../Fast/False/original/fact3\n.output" | 1 -
.../Fast/False/original/fact4\n.output" | 1 -
.../Fast/False/original/fact5\n.output" | 1 -
.../Fast/False/original/fact6\n.output" | 1 -
.../Fast/False/original/fact7\n.output" | 1 -
.../Fast/False/original/fact8\n.output" | 1 -
.../output/Fast/True/original/fact2\n.output" | 1 -
.../output/Fast/True/original/fact3\n.output" | 1 -
.../output/Fast/True/original/fact4\n.output" | 1 -
.../output/Fast/True/original/fact5\n.output" | 1 -
.../output/Fast/True/original/fact6\n.output" | 1 -
.../output/Fast/True/original/fact7\n.output" | 1 -
.../output/Fast/True/original/fact8\n.output" | 1 -
.../Fast/{False => }/from-eas/bottles.output | 0
.../Fast/{False => }/from-eas/divmod.output | 0
.../eval/output/Fast/from-eas/fact0\n.output" | 0
.../eval/output/Fast/from-eas/fact1\n.output" | 0
.../eval/output/Fast/from-eas/fact9\n.output" | 0
.../Fast/{False => }/from-eas/hello.output | 0
.../Fast/{False => }/from-eas/hello2.output | 0
.../Fast/{False => }/from-eas/hello3.output | 0
.../Fast/{False => }/from-eas/hello4.output | 0
.../{False => }/from-eas/readcharA.output | 0
.../output/Fast/from-eas/readnum0\n.output" | 0
.../output/Fast/from-eas/readnum1\n.output" | 0
.../Fast/{False => }/from-eas/true.output | 0
.../Fast/{False => }/original/bottles.output | 0
.../Fast/{False => }/original/crlf.output | 0
.../eval/output/Fast/original/fact1\n.output" | 0
.../eval/output/Fast/original/fact9\n.output" | 1 +
.../Fast/{False => }/original/hello.output | 0
.../Fast/{False => }/original/hello2.output | 0
.../Original/False/from-eas/fact2\n.output" | 0
.../Original/False/from-eas/fact3\n.output" | 0
.../Original/False/from-eas/fact4\n.output" | 0
.../Original/False/from-eas/fact5\n.output" | 0
.../Original/False/from-eas/fact6\n.output" | 0
.../Original/False/from-eas/fact7\n.output" | 0
.../Original/False/from-eas/fact8\n.output" | 0
.../Original/{False => }/original/crlf.output | 0
.../{False/from-eas => original}/hello.output | 0
.../from-eas => original}/hello2.output | 0
.../eta/il/optimized/from-eas/bottles.il | 900 +++-------
.../eta/il/optimized/from-eas/euclid.il | 186 +-
.../actual/eta/il/optimized/from-eas/fact.il | 961 +++-------
.../eta/il/optimized/from-eas/function.il | 116 +-
.../actual/eta/il/optimized/from-eas/hello.il | 149 +-
.../eta/il/optimized/from-eas/hello2.il | 190 +-
.../eta/il/optimized/from-eas/hello3.il | 190 +-
.../eta/il/optimized/from-eas/hello4.il | 190 +-
.../eta/il/optimized/from-eas/multiply.il | 236 +--
.../actual/eta/il/optimized/from-eas/pip.il | 100 +-
.../actual/eta/il/optimized/from-eas/pip2.il | 64 +-
.../eta/il/optimized/from-eas/readnum.il | 512 ++----
.../eta/il/optimized/from-eas/reverse.il | 124 +-
.../actual/eta/il/optimized/from-eas/true.il | 15 +-
.../eta/il/optimized/from-eas/writenum.il | 263 +--
.../eta/il/optimized/from-eas/writestr.il | 82 +-
.../eta/il/optimized/original/bottles.il | 1231 +++----------
.../actual/eta/il/optimized/original/crlf.il | 150 +-
.../actual/eta/il/optimized/original/fact.il | 977 +++-------
.../actual/eta/il/optimized/original/hello.il | 279 +--
.../eta/il/optimized/original/hello2.il | 228 +--
.../actual/eta/il/optimized/original/pip.il | 100 +-
.../actual/eta/il/optimized/original/pip2.il | 64 +-
.../actual/eta/il/parsed/from-eas/bottles.il | 1140 +++---------
.../actual/eta/il/parsed/from-eas/euclid.il | 233 +--
.output/actual/eta/il/parsed/from-eas/fact.il | 1319 ++++----------
.../actual/eta/il/parsed/from-eas/function.il | 116 +-
.../actual/eta/il/parsed/from-eas/hello.il | 149 +-
.../actual/eta/il/parsed/from-eas/hello2.il | 246 +--
.../actual/eta/il/parsed/from-eas/hello3.il | 246 +--
.../actual/eta/il/parsed/from-eas/hello4.il | 246 +--
.../actual/eta/il/parsed/from-eas/multiply.il | 281 +--
.output/actual/eta/il/parsed/from-eas/pip.il | 139 +-
.output/actual/eta/il/parsed/from-eas/pip2.il | 103 +-
.../actual/eta/il/parsed/from-eas/readnum.il | 656 ++-----
.../actual/eta/il/parsed/from-eas/reverse.il | 208 +--
.output/actual/eta/il/parsed/from-eas/true.il | 15 +-
.../actual/eta/il/parsed/from-eas/writenum.il | 398 ++---
.../actual/eta/il/parsed/from-eas/writestr.il | 122 +-
.../actual/eta/il/parsed/original/bottles.il | 1586 +++++------------
.output/actual/eta/il/parsed/original/crlf.il | 182 +-
.output/actual/eta/il/parsed/original/fact.il | 1300 ++++----------
.../actual/eta/il/parsed/original/hello.il | 300 +---
.../actual/eta/il/parsed/original/hello2.il | 309 +---
.output/actual/eta/il/parsed/original/pip.il | 139 +-
.output/actual/eta/il/parsed/original/pip2.il | 103 +-
.../actual/eta/minified/from-eas/readnum.eta | 4 +-
.output/actual/f/il/helma/copy.il | 4 +-
.output/actual/f/il/helma/factorial.il | 16 +-
.output/actual/f/il/helma/primeNumber.il | 56 +-
.output/actual/f/il/other/benHoyt/bin2f.il | 4 +-
.output/actual/f/il/other/benHoyt/fac.il | 28 +-
.../actual/f/il/other/morphett/factorial.il | 20 +-
.../actual/f/il/other/morphett/factorial2.il | 32 +-
.output/actual/f/il/other/morphett/reverse.il | 4 +-
.../actual/f/il/other/thunderseethe/prog.il | 8 +-
.../il/strlen/contrib/Ben_Schaeffer/detab.il | 8 +-
.../strlen/contrib/Eelko_de_Vos/chkbrack.il | 40 +-
.../il/strlen/contrib/Eelko_de_Vos/countwl.il | 20 +-
.../il/strlen/contrib/Eelko_de_Vos/crunch.il | 4 +-
.../strlen/contrib/Eelko_de_Vos/decrunch.il | 8 +-
.../il/strlen/contrib/Eelko_de_Vos/depack.il | 4 +-
.../il/strlen/contrib/Eelko_de_Vos/remcom.il | 8 +-
.../f/il/strlen/contrib/Eelko_de_Vos/split.il | 4 +-
.../contrib/Marcel_van_Kervinck/queens.il | 72 +-
.../strlen/contrib/Marcel_van_Kervinck/tic.il | 76 +-
.../strlen/contrib/Peter_Bengtsson/DoASC.il | 40 +-
.../strlen/contrib/Steinar_Knutsen/htmlcol.il | 28 +-
.../strlen/contrib/Steinar_Knutsen/passwdc.il | 4 +-
.../strlen/contrib/Thomas_Fischbacher/life.il | 28 +-
.output/actual/f/il/strlen/contrib/self.il | 4 +-
.output/actual/f/il/strlen/examples/addcr.il | 8 +-
.output/actual/f/il/strlen/examples/arg.il | 8 +-
.../actual/f/il/strlen/examples/argtest.il | 4 +-
.output/actual/f/il/strlen/examples/lambda.il | 44 +-
.output/actual/f/il/strlen/examples/prime.il | 76 +-
.output/actual/f/il/strlen/examples/strip.il | 12 +-
.output/actual/f/il/strlen/inline/copy.il | 4 +-
.../actual/f/il/strlen/inline/factorial.il | 16 +-
.../actual/f/il/strlen/inline/primeNumber.il | 56 +-
.../stn/asciiOff/from-wsa/bottles.logged | 68 +-
.../stn/asciiOff/from-wsa/hello2.logged | 20 +-
.../stn/asciiOff/from-wsa/hello4.logged | 20 +-
.../logged/stn/asciiOff/from-wsa/prim.logged | 184 +-
.../stn/asciiOff/original/calc-1\n.logged" | 106 +-
.../logged/stn/asciiOff/original/count.logged | 90 +-
.../stn/asciiOff/original/fact10\n.logged" | 104 +-
.../stn/asciiOff/original/hWorld.logged | 68 +-
.../stn/asciiOff/original/hanoi1\n.logged" | 148 +-
.../asciiOff/original/locTest1\n2\n.logged" | 84 +-
.../asciiOff/original/nameWriteOnly\n.logged" | 80 +-
.../asciiOff/original/truthMachine0\n.logged" | 8 +-
.../stn/asciiOn/from-wsa/bottles.logged | 68 +-
.../logged/stn/asciiOn/from-wsa/hello2.logged | 20 +-
.../logged/stn/asciiOn/from-wsa/hello4.logged | 20 +-
.../logged/stn/asciiOn/from-wsa/prim.logged | 184 +-
.../stn/asciiOn/original/calc-1\n.logged" | 106 +-
.../logged/stn/asciiOn/original/count.logged | 90 +-
.../stn/asciiOn/original/fact10\n.logged" | 104 +-
.../logged/stn/asciiOn/original/hWorld.logged | 68 +-
.../stn/asciiOn/original/hanoi1\n.logged" | 148 +-
.../asciiOn/original/locTest1\n2\n.logged" | 84 +-
.../asciiOn/original/nameWriteOnly\n.logged" | 80 +-
.../asciiOn/original/truthMachine0\n.logged" | 8 +-
.../ws/asciiOff/original/calc-1\n.logged" | 106 +-
.../logged/ws/asciiOff/original/count.logged | 90 +-
.../ws/asciiOff/original/fact10\n.logged" | 104 +-
.../ws/asciiOff/original/hanoi1\n.logged" | 148 +-
.../logged/ws/asciiOff/original/hworld.logged | 68 +-
.../asciiOff/original/loctest1\n2\n.logged" | 84 +-
.../asciiOff/original/nameWriteOnly\n.logged" | 80 +-
.../ws/asciiOn/original/calc-1\n.logged" | 106 +-
.../logged/ws/asciiOn/original/count.logged | 90 +-
.../ws/asciiOn/original/fact10\n.logged" | 104 +-
.../ws/asciiOn/original/hanoi1\n.logged" | 148 +-
.../logged/ws/asciiOn/original/hworld.logged | 68 +-
.../ws/asciiOn/original/loctest1\n2\n.logged" | 84 +-
.../asciiOn/original/nameWriteOnly\n.logged" | 80 +-
.../ws/il/optimized/from-wsa/bottles.il | 691 ++-----
.../actual/ws/il/optimized/from-wsa/hello.il | 101 +-
.../actual/ws/il/optimized/from-wsa/hello2.il | 138 +-
.../actual/ws/il/optimized/from-wsa/hello4.il | 133 +-
.../actual/ws/il/optimized/from-wsa/prim.il | 543 ++----
.../actual/ws/il/optimized/from-wsa/true.il | 2 +-
.../actual/ws/il/optimized/original/calc.il | 981 +++-------
.../actual/ws/il/optimized/original/count.il | 236 +--
.../actual/ws/il/optimized/original/fact.il | 546 ++----
.../actual/ws/il/optimized/original/hWorld.il | 473 ++---
.../actual/ws/il/optimized/original/hanoi.il | 841 +++------
.../ws/il/optimized/original/helloWorld.il | 87 +-
.../ws/il/optimized/original/locTest.il | 461 ++---
.../actual/ws/il/optimized/original/name.il | 599 ++-----
.../ws/il/optimized/original/truthMachine.il | 53 +-
.../actual/ws/il/parsed/from-wsa/bottles.il | 692 ++-----
.output/actual/ws/il/parsed/from-wsa/hello.il | 101 +-
.../actual/ws/il/parsed/from-wsa/hello2.il | 138 +-
.../actual/ws/il/parsed/from-wsa/hello4.il | 133 +-
.output/actual/ws/il/parsed/from-wsa/prim.il | 554 ++----
.output/actual/ws/il/parsed/from-wsa/true.il | 2 +-
.output/actual/ws/il/parsed/original/calc.il | 986 +++-------
.output/actual/ws/il/parsed/original/count.il | 242 +--
.output/actual/ws/il/parsed/original/fact.il | 559 ++----
.../actual/ws/il/parsed/original/hWorld.il | 477 ++---
.output/actual/ws/il/parsed/original/hanoi.il | 847 +++------
.../ws/il/parsed/original/helloWorld.il | 87 +-
.../actual/ws/il/parsed/original/locTest.il | 465 ++---
.output/actual/ws/il/parsed/original/name.il | 603 ++-----
.../ws/il/parsed/original/truthMachine.il | 55 +-
.../Fast/False/from-eas/fact2\n.logged" | 735 --------
.../Fast/False/from-eas/fact3\n.logged" | 735 --------
.../Fast/False/from-eas/fact4\n.logged" | 735 --------
.../Fast/False/from-eas/fact5\n.logged" | 735 --------
.../Fast/False/from-eas/fact6\n.logged" | 735 --------
.../Fast/False/from-eas/fact7\n.logged" | 735 --------
.../Fast/False/from-eas/fact8\n.logged" | 735 --------
.../Fast/False/from-eas/readnum0\n.logged" | 3 -
.../Fast/False/from-eas/readnum1\n.logged" | 3 -
.../Fast/False/original/fact1\n.logged" | 750 --------
.../Fast/False/original/fact2\n.logged" | 750 --------
.../Fast/False/original/fact3\n.logged" | 750 --------
.../Fast/False/original/fact4\n.logged" | 750 --------
.../Fast/False/original/fact5\n.logged" | 750 --------
.../Fast/False/original/fact6\n.logged" | 750 --------
.../Fast/False/original/fact7\n.logged" | 750 --------
.../Fast/False/original/fact8\n.logged" | 750 --------
.../logged/Fast/False/original/hello2.logged | 190 --
.../logged/Fast/True/original/bottles.logged | 964 ----------
.../logged/Fast/True/original/fact1\n.logged" | 750 --------
.../logged/Fast/True/original/fact2\n.logged" | 750 --------
.../logged/Fast/True/original/fact3\n.logged" | 750 --------
.../logged/Fast/True/original/fact4\n.logged" | 750 --------
.../logged/Fast/True/original/fact5\n.logged" | 750 --------
.../logged/Fast/True/original/fact6\n.logged" | 750 --------
.../logged/Fast/True/original/fact7\n.logged" | 750 --------
.../logged/Fast/True/original/fact8\n.logged" | 750 --------
.../Fast/{False => }/from-eas/bottles.logged | 148 +-
.../Fast/{False => }/from-eas/divmod.logged | 0
.../eval/logged/Fast/from-eas/fact0\n.logged" | 305 ++--
.../eval/logged/Fast/from-eas/fact1\n.logged" | 305 ++--
.../eval/logged/Fast/from-eas/fact9\n.logged" | 305 ++--
.../Fast/{False => }/from-eas/hello.logged | 0
.../Fast/{False => }/from-eas/hello2.logged | 26 +-
.../eval/logged/Fast}/from-eas/hello3.logged | 26 +-
.../eval/logged/Fast}/from-eas/hello4.logged | 26 +-
.../{False => }/from-eas/readcharA.logged | 0
.../logged/Fast/from-eas/readnum0\n.logged" | 387 ++++
.../logged/Fast/from-eas/readnum1\n.logged" | 387 ++++
.../Fast/{False => }/from-eas/true.logged | 0
.../eval/logged/Fast}/original/bottles.logged | 310 ++--
.../eval/logged/Fast}/original/crlf.logged | 16 +-
.../eval/logged/Fast/original/fact1\n.logged" | 316 ++--
.../eval/logged/Fast/original/fact9\n.logged" | 316 ++--
.../eval/logged/Fast}/original/hello.logged | 31 +-
.../eval/logged/Fast/original/hello2.logged | 154 ++
.../Original/False/from-eas/bottles.logged | 613 -------
.../Original/False/from-eas/divmod.logged | 19 -
.../Original/False/from-eas/fact0\n.logged" | 533 ------
.../Original/False/from-eas/fact1\n.logged" | 533 ------
.../Original/False/from-eas/fact2\n.logged" | 533 ------
.../Original/False/from-eas/fact3\n.logged" | 533 ------
.../Original/False/from-eas/fact4\n.logged" | 533 ------
.../Original/False/from-eas/fact5\n.logged" | 533 ------
.../Original/False/from-eas/fact6\n.logged" | 533 ------
.../Original/False/from-eas/fact7\n.logged" | 533 ------
.../Original/False/from-eas/fact8\n.logged" | 533 ------
.../Original/False/from-eas/fact9\n.logged" | 533 ------
.../Original/False/from-eas/hello.logged | 94 -
.../Original/False/from-eas/hello2.logged | 132 --
.../Original/False/from-eas/hello3.logged | 132 --
.../Original/False/from-eas/hello4.logged | 132 --
.../Original/False/from-eas/readcharA.logged | 10 -
.../False/from-eas/readnum0\n.logged" | 268 ---
.../False/from-eas/readnum1\n.logged" | 268 ---
.../Original/False/from-eas/true.logged | 7 -
.../Original/{False => }/original/crlf.logged | 0
.../{False => }/original/hello.logged | 0
.../{False => }/original/hello2.logged | 0
.../output/Fast/False/from-eas/bottles.output | 12 -
.../output/Fast/False/from-eas/divmod.output | 0
.../Fast/False/from-eas/fact0\n.output" | 0
.../Fast/False/from-eas/fact1\n.output" | 0
.../Fast/False/from-eas/fact2\n.output" | 0
.../Fast/False/from-eas/fact3\n.output" | 0
.../Fast/False/from-eas/fact4\n.output" | 0
.../Fast/False/from-eas/fact5\n.output" | 0
.../Fast/False/from-eas/fact6\n.output" | 0
.../Fast/False/from-eas/fact7\n.output" | 0
.../Fast/False/from-eas/fact8\n.output" | 0
.../Fast/False/from-eas/fact9\n.output" | 0
.../output/Fast/False/from-eas/hello3.output | 1 -
.../output/Fast/False/from-eas/hello4.output | 1 -
.../Fast/False/from-eas/readcharA.output | 0
.../Fast/False/from-eas/readnum0\n.output" | 0
.../Fast/False/from-eas/readnum1\n.output" | 0
.../output/Fast/False/from-eas/true.output | 0
.../output/Fast/False/original/bottles.output | 396 ----
.../Fast/False/original/fact1\n.output" | 1 -
.../Fast/False/original/fact2\n.output" | 1 -
.../Fast/False/original/fact3\n.output" | 1 -
.../Fast/False/original/fact4\n.output" | 1 -
.../Fast/False/original/fact5\n.output" | 1 -
.../Fast/False/original/fact6\n.output" | 1 -
.../Fast/False/original/fact7\n.output" | 1 -
.../Fast/False/original/fact8\n.output" | 1 -
.../output/Fast/True/original/bottles.output | 396 ----
.../output/Fast/True/original/fact1\n.output" | 1 -
.../output/Fast/True/original/fact2\n.output" | 1 -
.../output/Fast/True/original/fact3\n.output" | 1 -
.../output/Fast/True/original/fact4\n.output" | 1 -
.../output/Fast/True/original/fact5\n.output" | 1 -
.../output/Fast/True/original/fact6\n.output" | 1 -
.../output/Fast/True/original/fact7\n.output" | 1 -
.../output/Fast/True/original/fact8\n.output" | 1 -
.../eval/output/Fast}/from-eas/bottles.output | 0
.../eval/output/Fast}/from-eas/divmod.output | 0
.../eval/output/Fast/from-eas/fact0\n.output" | 0
.../eval/output/Fast/from-eas/fact1\n.output" | 0
.../eval/output/Fast/from-eas/fact9\n.output" | 0
.../eval/output/Fast/from-eas}/hello.output | 0
.../eval/output/Fast/from-eas}/hello2.output | 0
.../eval/output/Fast}/from-eas/hello3.output | 0
.../eval/output/Fast}/from-eas/hello4.output | 0
.../output/Fast}/from-eas/readcharA.output | 0
.../output/Fast/from-eas/readnum0\n.output" | 0
.../output/Fast/from-eas/readnum1\n.output" | 0
.../eval/output/Fast}/from-eas/true.output | 0
.../eval/output/Fast}/original/bottles.output | 0
.../Fast/{False => }/original/crlf.output | 0
.../eval/output/Fast/original/fact1\n.output" | 0
.../eval/output/Fast/original/fact9\n.output" | 1 +
.../{False/from-eas => original}/hello.output | 0
.../from-eas => original}/hello2.output | 0
.../Original/False/from-eas/bottles.output | 12 -
.../Original/False/from-eas/divmod.output | 0
.../Original/False/from-eas/fact0\n.output" | 0
.../Original/False/from-eas/fact1\n.output" | 0
.../Original/False/from-eas/fact2\n.output" | 0
.../Original/False/from-eas/fact3\n.output" | 0
.../Original/False/from-eas/fact4\n.output" | 0
.../Original/False/from-eas/fact5\n.output" | 0
.../Original/False/from-eas/fact6\n.output" | 0
.../Original/False/from-eas/fact7\n.output" | 0
.../Original/False/from-eas/fact8\n.output" | 0
.../Original/False/from-eas/fact9\n.output" | 0
.../Original/False/from-eas/hello.output | 1 -
.../Original/False/from-eas/hello2.output | 1 -
.../Original/False/from-eas/hello3.output | 1 -
.../Original/False/from-eas/hello4.output | 1 -
.../Original/False/from-eas/readcharA.output | 0
.../False/from-eas/readnum0\n.output" | 0
.../False/from-eas/readnum1\n.output" | 0
.../Original/False/from-eas/true.output | 0
.../Original/False/original/hello.output | 1 -
.../Original/False/original/hello2.output | 1 -
.../Original/{False => }/original/crlf.output | 0
.../False => Original}/original/hello.output | 0
.../False => Original}/original/hello2.output | 0
.../eta/il/optimized/from-eas/bottles.il | 900 +++-------
.../eta/il/optimized/from-eas/euclid.il | 186 +-
.../golden/eta/il/optimized/from-eas/fact.il | 961 +++-------
.../eta/il/optimized/from-eas/function.il | 116 +-
.../golden/eta/il/optimized/from-eas/hello.il | 149 +-
.../eta/il/optimized/from-eas/hello2.il | 190 +-
.../eta/il/optimized/from-eas/hello3.il | 190 +-
.../eta/il/optimized/from-eas/hello4.il | 190 +-
.../eta/il/optimized/from-eas/multiply.il | 236 +--
.../golden/eta/il/optimized/from-eas/pip.il | 100 +-
.../golden/eta/il/optimized/from-eas/pip2.il | 64 +-
.../eta/il/optimized/from-eas/readnum.il | 512 ++----
.../eta/il/optimized/from-eas/reverse.il | 124 +-
.../golden/eta/il/optimized/from-eas/true.il | 15 +-
.../eta/il/optimized/from-eas/writenum.il | 263 +--
.../eta/il/optimized/from-eas/writestr.il | 82 +-
.../eta/il/optimized/original/bottles.il | 1231 +++----------
.../golden/eta/il/optimized/original/crlf.il | 150 +-
.../golden/eta/il/optimized/original/fact.il | 977 +++-------
.../golden/eta/il/optimized/original/hello.il | 279 +--
.../eta/il/optimized/original/hello2.il | 228 +--
.../golden/eta/il/optimized/original/pip.il | 100 +-
.../golden/eta/il/optimized/original/pip2.il | 64 +-
.../golden/eta/il/parsed/from-eas/bottles.il | 1140 +++---------
.../golden/eta/il/parsed/from-eas/euclid.il | 233 +--
.output/golden/eta/il/parsed/from-eas/fact.il | 1319 ++++----------
.../golden/eta/il/parsed/from-eas/function.il | 116 +-
.../golden/eta/il/parsed/from-eas/hello.il | 149 +-
.../golden/eta/il/parsed/from-eas/hello2.il | 246 +--
.../golden/eta/il/parsed/from-eas/hello3.il | 246 +--
.../golden/eta/il/parsed/from-eas/hello4.il | 246 +--
.../golden/eta/il/parsed/from-eas/multiply.il | 281 +--
.output/golden/eta/il/parsed/from-eas/pip.il | 139 +-
.output/golden/eta/il/parsed/from-eas/pip2.il | 103 +-
.../golden/eta/il/parsed/from-eas/readnum.il | 656 ++-----
.../golden/eta/il/parsed/from-eas/reverse.il | 208 +--
.output/golden/eta/il/parsed/from-eas/true.il | 15 +-
.../golden/eta/il/parsed/from-eas/writenum.il | 398 ++---
.../golden/eta/il/parsed/from-eas/writestr.il | 122 +-
.../golden/eta/il/parsed/original/bottles.il | 1586 +++++------------
.output/golden/eta/il/parsed/original/crlf.il | 182 +-
.output/golden/eta/il/parsed/original/fact.il | 1300 ++++----------
.../golden/eta/il/parsed/original/hello.il | 300 +---
.../golden/eta/il/parsed/original/hello2.il | 309 +---
.output/golden/eta/il/parsed/original/pip.il | 139 +-
.output/golden/eta/il/parsed/original/pip2.il | 103 +-
.../golden/eta/minified/from-eas/readnum.eta | 4 +-
.output/golden/f/il/helma/copy.il | 4 +-
.output/golden/f/il/helma/factorial.il | 16 +-
.output/golden/f/il/helma/primeNumber.il | 56 +-
.output/golden/f/il/other/benHoyt/bin2f.il | 4 +-
.output/golden/f/il/other/benHoyt/fac.il | 28 +-
.../golden/f/il/other/morphett/factorial.il | 20 +-
.../golden/f/il/other/morphett/factorial2.il | 32 +-
.output/golden/f/il/other/morphett/reverse.il | 4 +-
.../golden/f/il/other/thunderseethe/prog.il | 8 +-
.../il/strlen/contrib/Ben_Schaeffer/detab.il | 8 +-
.../strlen/contrib/Eelko_de_Vos/chkbrack.il | 40 +-
.../il/strlen/contrib/Eelko_de_Vos/countwl.il | 20 +-
.../il/strlen/contrib/Eelko_de_Vos/crunch.il | 4 +-
.../strlen/contrib/Eelko_de_Vos/decrunch.il | 8 +-
.../il/strlen/contrib/Eelko_de_Vos/depack.il | 4 +-
.../il/strlen/contrib/Eelko_de_Vos/remcom.il | 8 +-
.../f/il/strlen/contrib/Eelko_de_Vos/split.il | 4 +-
.../contrib/Marcel_van_Kervinck/queens.il | 72 +-
.../strlen/contrib/Marcel_van_Kervinck/tic.il | 76 +-
.../strlen/contrib/Peter_Bengtsson/DoASC.il | 40 +-
.../strlen/contrib/Steinar_Knutsen/htmlcol.il | 28 +-
.../strlen/contrib/Steinar_Knutsen/passwdc.il | 4 +-
.../strlen/contrib/Thomas_Fischbacher/life.il | 28 +-
.output/golden/f/il/strlen/contrib/self.il | 4 +-
.output/golden/f/il/strlen/examples/addcr.il | 8 +-
.output/golden/f/il/strlen/examples/arg.il | 8 +-
.../golden/f/il/strlen/examples/argtest.il | 4 +-
.output/golden/f/il/strlen/examples/lambda.il | 44 +-
.output/golden/f/il/strlen/examples/prime.il | 76 +-
.output/golden/f/il/strlen/examples/strip.il | 12 +-
.output/golden/f/il/strlen/inline/copy.il | 4 +-
.../golden/f/il/strlen/inline/factorial.il | 16 +-
.../golden/f/il/strlen/inline/primeNumber.il | 56 +-
.../stn/asciiOff/from-wsa/bottles.logged | 68 +-
.../stn/asciiOff/from-wsa/hello2.logged | 20 +-
.../stn/asciiOff/from-wsa/hello4.logged | 20 +-
.../logged/stn/asciiOff/from-wsa/prim.logged | 184 +-
.../stn/asciiOff/original/calc-1\n.logged" | 106 +-
.../logged/stn/asciiOff/original/count.logged | 90 +-
.../stn/asciiOff/original/fact10\n.logged" | 104 +-
.../stn/asciiOff/original/hWorld.logged | 68 +-
.../stn/asciiOff/original/hanoi1\n.logged" | 148 +-
.../asciiOff/original/locTest1\n2\n.logged" | 84 +-
.../asciiOff/original/nameWriteOnly\n.logged" | 80 +-
.../asciiOff/original/truthMachine0\n.logged" | 8 +-
.../stn/asciiOn/from-wsa/bottles.logged | 68 +-
.../logged/stn/asciiOn/from-wsa/hello2.logged | 20 +-
.../logged/stn/asciiOn/from-wsa/hello4.logged | 20 +-
.../logged/stn/asciiOn/from-wsa/prim.logged | 184 +-
.../stn/asciiOn/original/calc-1\n.logged" | 106 +-
.../logged/stn/asciiOn/original/count.logged | 90 +-
.../stn/asciiOn/original/fact10\n.logged" | 104 +-
.../logged/stn/asciiOn/original/hWorld.logged | 68 +-
.../stn/asciiOn/original/hanoi1\n.logged" | 148 +-
.../asciiOn/original/locTest1\n2\n.logged" | 84 +-
.../asciiOn/original/nameWriteOnly\n.logged" | 80 +-
.../asciiOn/original/truthMachine0\n.logged" | 8 +-
.../ws/asciiOff/original/calc-1\n.logged" | 106 +-
.../logged/ws/asciiOff/original/count.logged | 90 +-
.../ws/asciiOff/original/fact10\n.logged" | 104 +-
.../ws/asciiOff/original/hanoi1\n.logged" | 148 +-
.../logged/ws/asciiOff/original/hworld.logged | 68 +-
.../asciiOff/original/loctest1\n2\n.logged" | 84 +-
.../asciiOff/original/nameWriteOnly\n.logged" | 80 +-
.../ws/asciiOn/original/calc-1\n.logged" | 106 +-
.../logged/ws/asciiOn/original/count.logged | 90 +-
.../ws/asciiOn/original/fact10\n.logged" | 104 +-
.../ws/asciiOn/original/hanoi1\n.logged" | 148 +-
.../logged/ws/asciiOn/original/hworld.logged | 68 +-
.../ws/asciiOn/original/loctest1\n2\n.logged" | 84 +-
.../asciiOn/original/nameWriteOnly\n.logged" | 80 +-
.../ws/il/optimized/from-wsa/bottles.il | 691 ++-----
.../golden/ws/il/optimized/from-wsa/hello.il | 101 +-
.../golden/ws/il/optimized/from-wsa/hello2.il | 138 +-
.../golden/ws/il/optimized/from-wsa/hello4.il | 133 +-
.../golden/ws/il/optimized/from-wsa/prim.il | 543 ++----
.../golden/ws/il/optimized/from-wsa/true.il | 2 +-
.../golden/ws/il/optimized/original/calc.il | 981 +++-------
.../golden/ws/il/optimized/original/count.il | 236 +--
.../golden/ws/il/optimized/original/fact.il | 546 ++----
.../golden/ws/il/optimized/original/hWorld.il | 473 ++---
.../golden/ws/il/optimized/original/hanoi.il | 841 +++------
.../ws/il/optimized/original/helloWorld.il | 87 +-
.../ws/il/optimized/original/locTest.il | 461 ++---
.../golden/ws/il/optimized/original/name.il | 599 ++-----
.../ws/il/optimized/original/truthMachine.il | 53 +-
.../golden/ws/il/parsed/from-wsa/bottles.il | 692 ++-----
.output/golden/ws/il/parsed/from-wsa/hello.il | 101 +-
.../golden/ws/il/parsed/from-wsa/hello2.il | 138 +-
.../golden/ws/il/parsed/from-wsa/hello4.il | 133 +-
.output/golden/ws/il/parsed/from-wsa/prim.il | 554 ++----
.output/golden/ws/il/parsed/from-wsa/true.il | 2 +-
.output/golden/ws/il/parsed/original/calc.il | 986 +++-------
.output/golden/ws/il/parsed/original/count.il | 242 +--
.output/golden/ws/il/parsed/original/fact.il | 559 ++----
.../golden/ws/il/parsed/original/hWorld.il | 477 ++---
.output/golden/ws/il/parsed/original/hanoi.il | 847 +++------
.../ws/il/parsed/original/helloWorld.il | 87 +-
.../golden/ws/il/parsed/original/locTest.il | 465 ++---
.output/golden/ws/il/parsed/original/name.il | 603 ++-----
.../ws/il/parsed/original/truthMachine.il | 55 +-
docs/developers/CHANGELOG.md | 4 +
...HelVM.HelMA.Automata.ETA.Automaton.hs.html | 108 --
...HelVM.HelMA.Automata.ETA.Evaluator.hs.html | 81 -
...HelVM.HelMA.Automata.ETA.Optimizer.hs.html | 135 --
.../HelVM.HelMA.Automata.FALSE.Parser.hs.html | 134 --
...M.HelMA.Automata.WhiteSpace.Parser.hs.html | 116 --
...A.Automata.WhiteSpace.SimpleParams.hs.html | 73 -
...VM.HelMA.Automaton.API.AutoOptions.hs.html | 46 -
...lVM.HelMA.Automaton.API.AutoParams.hs.html | 45 -
...HelVM.HelMA.Automaton.Combiner.ALU.hs.html | 209 ---
...HelVM.HelMA.Automaton.Combiner.CPU.hs.html | 126 --
.../HelVM.HelMA.Automaton.Combiner.hs.html | 121 --
...utomaton.Instruction.ALInstruction.hs.html | 98 -
...utomaton.Instruction.CFInstruction.hs.html | 58 -
...utomaton.Instruction.IOInstruction.hs.html | 31 -
...Automaton.Instruction.SInstruction.hs.html | 98 -
.../HelVM.HelMA.Automaton.Instruction.hs.html | 281 ---
.../HelVM.HelMA.Automaton.Loop.hs.html | 55 -
.../HelVM.HelMA.Automaton.Optimizer.hs.html | 115 --
.../HelVM.HelMA.Automaton.Unit.hs.html | 121 --
.../HelVM.HelMA.Automaton.Units.ALU.hs.html | 191 --
.../HelVM.HelMA.Automaton.Units.CPU.hs.html | 126 --
.../HelVM.HelMA.Automaton.Units.LSU.hs.html | 76 -
.../HelVM.HelMA.Automaton.Units.RAM.hs.html | 64 -
...elMA.Automata.BrainFuck.API.BFType.hs.html | 37 -
...BrainFuck.Common.SimpleInstruction.hs.html | 59 -
...A.Automata.BrainFuck.Common.Symbol.hs.html | 123 --
...ata.BrainFuck.Common.TapeOfSymbols.hs.html | 165 --
...HelMA.Automata.BrainFuck.Evaluator.hs.html | 64 -
...mata.BrainFuck.Impl.Fast.Evaluator.hs.html | 98 -
...ta.BrainFuck.Impl.Fast.Instruction.hs.html | 41 -
...mata.BrainFuck.Impl.Fast.Optimizer.hs.html | 71 -
...utomata.BrainFuck.Impl.Fast.Parser.hs.html | 105 --
...mata.BrainFuck.Impl.Flat.Evaluator.hs.html | 81 -
...ta.BrainFuck.Impl.Flat.Instruction.hs.html | 54 -
...utomata.BrainFuck.Impl.Flat.Parser.hs.html | 40 -
...Fuck.Impl.Flat.TableOfInstructions.hs.html | 58 -
...mata.BrainFuck.Impl.Tree.Evaluator.hs.html | 90 -
...ta.BrainFuck.Impl.Tree.Instruction.hs.html | 38 -
...utomata.BrainFuck.Impl.Tree.Parser.hs.html | 72 -
...HelVM.HelMA.Automata.Cat.Evaluator.hs.html | 37 -
...HelMA.Automata.ETA.API.ETAImplType.hs.html | 37 -
...elVM.HelMA.Automata.ETA.Addressing.hs.html | 59 -
.../HelVM.HelMA.Automata.ETA.Lexer.hs.html | 41 -
....HelMA.Automata.ETA.OperandParsers.hs.html | 76 -
.../HelVM.HelMA.Automata.ETA.Parser.hs.html | 41 -
...VM.HelMA.Automata.ETA.SimpleParams.hs.html | 47 -
.../HelVM.HelMA.Automata.ETA.Token.hs.html | 78 -
...VM.HelMA.Automata.FALSE.Expression.hs.html | 41 -
...lVM.HelMA.Automata.LazyK.Automaton.hs.html | 62 -
...lVM.HelMA.Automata.LazyK.Constants.hs.html | 50 -
...lVM.HelMA.Automata.LazyK.Evaluator.hs.html | 52 -
....HelMA.Automata.LazyK.InputEncoder.hs.html | 67 -
.../HelVM.HelMA.Automata.LazyK.Lambda.hs.html | 45 -
.../HelVM.HelMA.Automata.LazyK.Lexer.hs.html | 37 -
.../HelVM.HelMA.Automata.LazyK.Parser.hs.html | 53 -
...HelVM.HelMA.Automata.LazyK.Reducer.hs.html | 45 -
...HelVM.HelMA.Automata.Rev.Evaluator.hs.html | 45 -
...VM.HelMA.Automata.SubLeq.Automaton.hs.html | 83 -
...VM.HelMA.Automata.SubLeq.Evaluator.hs.html | 69 -
.../HelVM.HelMA.Automata.SubLeq.Lexer.hs.html | 54 -
...elMA.Automata.WhiteSpace.Evaluator.hs.html | 62 -
...VM.HelMA.Automata.WhiteSpace.Lexer.hs.html | 53 -
...Automata.WhiteSpace.OperandParsers.hs.html | 95 -
...VM.HelMA.Automata.WhiteSpace.Token.hs.html | 66 -
...HelVM.HelMA.Automata.Zot.Automaton.hs.html | 63 -
...HelVM.HelMA.Automata.Zot.Evaluator.hs.html | 96 -
...elVM.HelMA.Automata.Zot.Expression.hs.html | 87 -
.../HelVM.HelMA.Automata.Zot.Parser.hs.html | 42 -
...lMA.Automaton.API.AutomatonOptions.hs.html | 45 -
...lVM.HelMA.Automaton.API.EvalParams.hs.html | 63 -
....HelMA.Automaton.API.MemoryOptions.hs.html | 37 -
...MA.Automaton.API.OptimizationLevel.hs.html | 54 -
.../HelVM.HelMA.Automaton.Automaton.hs.html | 104 --
...HelVM.HelMA.Automaton.Combiner.LSU.hs.html | 76 -
...HelVM.HelMA.Automaton.Combiner.RAM.hs.html | 64 -
...elVM.HelMA.Automaton.IO.BusinessIO.hs.html | 170 --
.../HelVM.HelMA.Automaton.IO.FreeIO.hs.html | 169 --
.../HelVM.HelMA.Automaton.IO.MockIO.hs.html | 202 ---
...utomaton.Instruction.LSInstruction.hs.html | 34 -
...omaton.Optimizer.PeepholeOptimizer.hs.html | 73 -
.../HelVM.HelMA.Automaton.ReadPExtra.hs.html | 68 -
...lVM.HelMA.Automaton.Types.CellType.hs.html | 37 -
...lVM.HelMA.Automaton.Types.DumpType.hs.html | 52 -
...M.HelMA.Automaton.Types.FormatType.hs.html | 37 -
....HelMA.Automaton.Types.IntCellType.hs.html | 37 -
...elVM.HelMA.Automaton.Types.RAMType.hs.html | 37 -
...VM.HelMA.Automaton.Types.StackType.hs.html | 37 -
...VM.HelMA.Automaton.Types.TokenType.hs.html | 37 -
...elVM.HelMA.Automaton.WrapTokenList.hs.html | 38 -
...elMA.Automata.BrainFuck.API.BFType.hs.html | 0
...BrainFuck.Common.SimpleInstruction.hs.html | 0
...A.Automata.BrainFuck.Common.Symbol.hs.html | 0
...ata.BrainFuck.Common.TapeOfSymbols.hs.html | 0
...HelMA.Automata.BrainFuck.Evaluator.hs.html | 0
...mata.BrainFuck.Impl.Fast.Evaluator.hs.html | 0
...ta.BrainFuck.Impl.Fast.Instruction.hs.html | 0
...mata.BrainFuck.Impl.Fast.Optimizer.hs.html | 0
...utomata.BrainFuck.Impl.Fast.Parser.hs.html | 0
...mata.BrainFuck.Impl.Flat.Evaluator.hs.html | 0
...ta.BrainFuck.Impl.Flat.Instruction.hs.html | 0
...utomata.BrainFuck.Impl.Flat.Parser.hs.html | 0
...Fuck.Impl.Flat.TableOfInstructions.hs.html | 0
...mata.BrainFuck.Impl.Tree.Evaluator.hs.html | 0
...ta.BrainFuck.Impl.Tree.Instruction.hs.html | 0
...utomata.BrainFuck.Impl.Tree.Parser.hs.html | 0
...HelVM.HelMA.Automata.Cat.Evaluator.hs.html | 0
...HelMA.Automata.ETA.API.ETAImplType.hs.html | 0
...elVM.HelMA.Automata.ETA.Addressing.hs.html | 0
...HelVM.HelMA.Automata.ETA.Automaton.hs.html | 4 +-
...HelVM.HelMA.Automata.ETA.Evaluator.hs.html | 2 +-
.../HelVM.HelMA.Automata.ETA.Lexer.hs.html | 0
....HelMA.Automata.ETA.OperandParsers.hs.html | 0
...HelVM.HelMA.Automata.ETA.Optimizer.hs.html | 0
.../HelVM.HelMA.Automata.ETA.Parser.hs.html | 0
...VM.HelMA.Automata.ETA.SimpleParams.hs.html | 6 +-
.../HelVM.HelMA.Automata.ETA.Token.hs.html | 0
...VM.HelMA.Automata.FALSE.Expression.hs.html | 0
.../HelVM.HelMA.Automata.FALSE.Parser.hs.html | 0
...lVM.HelMA.Automata.LazyK.Automaton.hs.html | 0
...lVM.HelMA.Automata.LazyK.Constants.hs.html | 0
...lVM.HelMA.Automata.LazyK.Evaluator.hs.html | 0
....HelMA.Automata.LazyK.InputEncoder.hs.html | 0
.../HelVM.HelMA.Automata.LazyK.Lambda.hs.html | 0
.../HelVM.HelMA.Automata.LazyK.Lexer.hs.html | 0
.../HelVM.HelMA.Automata.LazyK.Parser.hs.html | 0
...HelVM.HelMA.Automata.LazyK.Reducer.hs.html | 0
...HelVM.HelMA.Automata.Rev.Evaluator.hs.html | 0
...VM.HelMA.Automata.SubLeq.Automaton.hs.html | 0
...VM.HelMA.Automata.SubLeq.Evaluator.hs.html | 0
.../HelVM.HelMA.Automata.SubLeq.Lexer.hs.html | 0
...elMA.Automata.WhiteSpace.Evaluator.hs.html | 0
...VM.HelMA.Automata.WhiteSpace.Lexer.hs.html | 0
...Automata.WhiteSpace.OperandParsers.hs.html | 0
...M.HelMA.Automata.WhiteSpace.Parser.hs.html | 0
...A.Automata.WhiteSpace.SimpleParams.hs.html | 2 +-
...VM.HelMA.Automata.WhiteSpace.Token.hs.html | 0
...HelVM.HelMA.Automata.Zot.Automaton.hs.html | 0
...HelVM.HelMA.Automata.Zot.Evaluator.hs.html | 0
...elVM.HelMA.Automata.Zot.Expression.hs.html | 0
.../HelVM.HelMA.Automata.Zot.Parser.hs.html | 0
...VM.HelMA.Automaton.API.AutoOptions.hs.html | 29 +-
...lMA.Automaton.API.AutomatonOptions.hs.html | 0
...lVM.HelMA.Automaton.API.EvalParams.hs.html | 0
....HelMA.Automaton.API.MemoryOptions.hs.html | 0
...MA.Automaton.API.OptimizationLevel.hs.html | 0
.../HelVM.HelMA.Automaton.Automaton.hs.html | 49 +-
...HelVM.HelMA.Automaton.Combiner.ALU.hs.html | 245 +--
...HelVM.HelMA.Automaton.Combiner.CPU.hs.html | 64 +-
...HelVM.HelMA.Automaton.Combiner.LSU.hs.html | 0
...HelVM.HelMA.Automaton.Combiner.RAM.hs.html | 0
.../HelVM.HelMA.Automaton.Combiner.hs.html | 4 +-
...elVM.HelMA.Automaton.IO.BusinessIO.hs.html | 0
.../HelVM.HelMA.Automaton.IO.FreeIO.hs.html | 0
.../HelVM.HelMA.Automaton.IO.MockIO.hs.html | 0
...utomaton.Instruction.CFInstruction.hs.html | 57 +-
...utomaton.Instruction.IOInstruction.hs.html | 0
...utomaton.Instruction.LSInstruction.hs.html | 0
...Automaton.Instruction.SInstruction.hs.html | 6 +-
.../HelVM.HelMA.Automaton.Instruction.hs.html | 217 +--
.../HelVM.HelMA.Automaton.Loop.hs.html | 0
...Optimizer.ConstantFoldingOptimizer.hs.html | 0
...omaton.Optimizer.PeepholeOptimizer.hs.html | 86 +
.../HelVM.HelMA.Automaton.Optimizer.hs.html | 0
...elVM.HelMA.Automaton.PrettyPrinter.hs.html | 41 +
.../HelVM.HelMA.Automaton.ReadPExtra.hs.html | 0
...lVM.HelMA.Automaton.Types.CellType.hs.html | 0
...lVM.HelMA.Automaton.Types.DumpType.hs.html | 0
...M.HelMA.Automaton.Types.FormatType.hs.html | 0
....HelMA.Automaton.Types.IntCellType.hs.html | 0
...elVM.HelMA.Automaton.Types.RAMType.hs.html | 0
...VM.HelMA.Automaton.Types.StackType.hs.html | 0
...VM.HelMA.Automaton.Types.TokenType.hs.html | 0
...elVM.HelMA.Automaton.WrapTokenList.hs.html | 0
docs/reports/helma-test/hpc_index.html | 193 +-
docs/reports/helma-test/hpc_index_alt.html | 201 ++-
docs/reports/helma-test/hpc_index_exp.html | 209 +--
docs/reports/helma-test/hpc_index_fun.html | 203 +--
...M-HelMA-Automata-BrainFuck-API-BFType.html | 2 +-
...ta-BrainFuck-Common-SimpleInstruction.html | 2 +-
...elMA-Automata-BrainFuck-Common-Symbol.html | 2 +-
...tomata-BrainFuck-Common-TapeOfSymbols.html | 2 +-
...VM-HelMA-Automata-BrainFuck-Evaluator.html | 2 +-
...utomata-BrainFuck-Impl-Fast-Evaluator.html | 2 +-
...omata-BrainFuck-Impl-Fast-Instruction.html | 2 +-
...utomata-BrainFuck-Impl-Fast-Optimizer.html | 2 +-
...A-Automata-BrainFuck-Impl-Fast-Parser.html | 2 +-
...utomata-BrainFuck-Impl-Flat-Evaluator.html | 2 +-
...omata-BrainFuck-Impl-Flat-Instruction.html | 2 +-
...A-Automata-BrainFuck-Impl-Flat-Parser.html | 2 +-
...ainFuck-Impl-Flat-TableOfInstructions.html | 2 +-
...utomata-BrainFuck-Impl-Tree-Evaluator.html | 2 +-
...omata-BrainFuck-Impl-Tree-Instruction.html | 2 +-
...a-BrainFuck-Impl-Tree-InstructionUnit.html | 2 +-
...A-Automata-BrainFuck-Impl-Tree-Parser.html | 2 +-
.../HelVM-HelMA-Automata-Cat-Evaluator.html | 2 +-
...VM-HelMA-Automata-ETA-API-ETAImplType.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Addressing.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Automaton.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Evaluator.html | 2 +-
.../helma/HelVM-HelMA-Automata-ETA-Lexer.html | 2 +-
...lVM-HelMA-Automata-ETA-OperandParsers.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Optimizer.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Parser.html | 2 +-
...HelVM-HelMA-Automata-ETA-SimpleParams.html | 2 +-
.../HelVM-HelMA-Automata-ETA-Symbol.html | 2 +-
.../helma/HelVM-HelMA-Automata-ETA-Token.html | 2 +-
...HelVM-HelMA-Automata-FALSE-Expression.html | 2 +-
.../HelVM-HelMA-Automata-FALSE-Parser.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Automaton.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Constants.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Evaluator.html | 2 +-
...lVM-HelMA-Automata-LazyK-InputEncoder.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Lambda.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Lexer.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Parser.html | 2 +-
.../HelVM-HelMA-Automata-LazyK-Reducer.html | 2 +-
.../HelVM-HelMA-Automata-Rev-Evaluator.html | 2 +-
...HelVM-HelMA-Automata-SubLeq-Automaton.html | 2 +-
...HelVM-HelMA-Automata-SubLeq-Evaluator.html | 2 +-
.../HelVM-HelMA-Automata-SubLeq-Lexer.html | 2 +-
.../HelVM-HelMA-Automata-SubLeq-Symbol.html | 2 +-
...M-HelMA-Automata-WhiteSpace-Evaluator.html | 2 +-
...HelVM-HelMA-Automata-WhiteSpace-Lexer.html | 2 +-
...MA-Automata-WhiteSpace-OperandParsers.html | 2 +-
...elVM-HelMA-Automata-WhiteSpace-Parser.html | 2 +-
...elMA-Automata-WhiteSpace-SimpleParams.html | 2 +-
...HelVM-HelMA-Automata-WhiteSpace-Token.html | 2 +-
.../HelVM-HelMA-Automata-Zot-Automaton.html | 2 +-
.../HelVM-HelMA-Automata-Zot-Evaluator.html | 2 +-
.../HelVM-HelMA-Automata-Zot-Expression.html | 2 +-
.../HelVM-HelMA-Automata-Zot-Parser.html | 2 +-
...HelVM-HelMA-Automaton-API-AutoOptions.html | 2 +-
...-HelMA-Automaton-API-AutomatonOptions.html | 2 +-
.../HelVM-HelMA-Automaton-API-EvalParams.html | 2 +-
.../HelVM-HelMA-Automaton-API-IOTypes.html | 2 +-
...lVM-HelMA-Automaton-API-MemoryOptions.html | 2 +-
...HelMA-Automaton-API-OptimizationLevel.html | 2 +-
.../HelVM-HelMA-Automaton-Automaton.html | 2 +-
.../HelVM-HelMA-Automaton-Combiner-ALU.html | 2 +-
.../HelVM-HelMA-Automaton-Combiner-CPU.html | 2 +-
.../HelVM-HelMA-Automaton-Combiner-LSU.html | 2 +-
.../HelVM-HelMA-Automaton-Combiner-RAM.html | 2 +-
.../helma/HelVM-HelMA-Automaton-Combiner.html | 2 +-
.../HelVM-HelMA-Automaton-IO-AutomatonIO.html | 2 +-
.../HelVM-HelMA-Automaton-IO-BusinessIO.html | 2 +-
.../HelVM-HelMA-Automaton-IO-FreeIO.html | 2 +-
.../HelVM-HelMA-Automaton-IO-MockIO.html | 2 +-
...A-Automaton-Instruction-CFInstruction.html | 2 +-
...A-Automaton-Instruction-IOInstruction.html | 2 +-
...A-Automaton-Instruction-LSInstruction.html | 2 +-
...MA-Automaton-Instruction-SInstruction.html | 2 +-
.../HelVM-HelMA-Automaton-Instruction.html | 2 +-
.../helma/HelVM-HelMA-Automaton-Loop.html | 2 +-
...on-Optimizer-ConstantFoldingOptimizer.html | 2 +-
...Automaton-Optimizer-PeepholeOptimizer.html | 2 +-
.../HelVM-HelMA-Automaton-Optimizer.html | 2 +-
.../HelVM-HelMA-Automaton-PrettyPrinter.html | 1 +
.../HelVM-HelMA-Automaton-ReadPExtra.html | 2 +-
.../helma/HelVM-HelMA-Automaton-Symbol.html | 2 +-
.../HelVM-HelMA-Automaton-Trampoline.html | 2 +-
.../HelVM-HelMA-Automaton-Types-CellType.html | 2 +-
.../HelVM-HelMA-Automaton-Types-DumpType.html | 2 +-
...elVM-HelMA-Automaton-Types-FormatType.html | 2 +-
...lVM-HelMA-Automaton-Types-IntCellType.html | 2 +-
.../HelVM-HelMA-Automaton-Types-RAMType.html | 2 +-
...HelVM-HelMA-Automaton-Types-StackType.html | 2 +-
...HelVM-HelMA-Automaton-Types-TokenType.html | 2 +-
.../HelVM-HelMA-Automaton-WrapTokenList.html | 2 +-
docs/reports/helma/doc-index-A.html | 2 +-
docs/reports/helma/doc-index-All.html | 2 +-
docs/reports/helma/doc-index-B.html | 2 +-
docs/reports/helma/doc-index-C.html | 2 +-
docs/reports/helma/doc-index-D.html | 2 +-
docs/reports/helma/doc-index-E.html | 2 +-
docs/reports/helma/doc-index-F.html | 2 +-
docs/reports/helma/doc-index-G.html | 2 +-
docs/reports/helma/doc-index-H.html | 2 +-
docs/reports/helma/doc-index-I.html | 2 +-
docs/reports/helma/doc-index-J.html | 2 +-
docs/reports/helma/doc-index-K.html | 2 +-
docs/reports/helma/doc-index-L.html | 2 +-
docs/reports/helma/doc-index-M.html | 2 +-
docs/reports/helma/doc-index-N.html | 2 +-
docs/reports/helma/doc-index-O.html | 2 +-
docs/reports/helma/doc-index-P.html | 2 +-
docs/reports/helma/doc-index-R.html | 2 +-
docs/reports/helma/doc-index-S.html | 2 +-
docs/reports/helma/doc-index-T.html | 2 +-
docs/reports/helma/doc-index-U.html | 2 +-
docs/reports/helma/doc-index-V.html | 2 +-
docs/reports/helma/doc-index-W.html | 2 +-
docs/reports/helma/doc-index-Z.html | 2 +-
docs/reports/helma/doc-index.html | 2 +-
docs/reports/helma/helma.haddock | Bin 34634 -> 34753 bytes
docs/reports/helma/index.html | 2 +-
docs/reports/hlint.html | 25 +-
docs/reports/stan.html | 2 +-
examples/eta/from-eas/readnum.eta | 4 +-
helma.cabal | 8 +-
hs/app/AppOptions.hs | 8 +-
.../HelMA/Automata/ETA/EvaluatorBenchMark.hs | 10 +-
hs/src/HelVM/HelMA/Automata/ETA/Evaluator.hs | 2 +-
.../HelVM/HelMA/Automata/ETA/SimpleParams.hs | 6 +-
.../HelMA/Automata/WhiteSpace/SimpleParams.hs | 2 +-
.../HelVM/HelMA/Automaton/API/AutoOptions.hs | 15 +-
hs/src/HelVM/HelMA/Automaton/Automaton.hs | 37 +-
hs/src/HelVM/HelMA/Automaton/Combiner/ALU.hs | 25 +-
hs/src/HelVM/HelMA/Automaton/Combiner/CPU.hs | 10 +-
hs/src/HelVM/HelMA/Automaton/Instruction.hs | 13 +-
.../Automaton/Instruction/CFInstruction.hs | 7 +-
.../Automaton/Instruction/SInstruction.hs | 6 +-
.../Automaton/Optimizer/PeepholeOptimizer.hs | 31 +-
hs/src/HelVM/HelMA/Automaton/PrettyPrinter.hs | 18 +
.../HelVM/HelMA/Automata/ETA/EvaluatorSpec.hs | 17 +-
hs/test/HelVM/HelMA/Automata/ETA/LexerSpec.hs | 6 +-
.../HelMA/Automata/WhiteSpace/ParserSpec.hs | 5 +-
hs/test/Main.hs | 2 +-
878 files changed, 23612 insertions(+), 105434 deletions(-)
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/original/fact3\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/original/fact5\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/original/fact6\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/original/fact7\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/False/original/fact8\n.logged"
delete mode 100644 .output/actual/eta/eval/logged/Fast/False/original/hello2.logged
delete mode 100644 .output/actual/eta/eval/logged/Fast/True/original/bottles.logged
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact2\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact3\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact4\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact5\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact6\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact7\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Fast/True/original/fact8\n.logged"
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/bottles.logged (83%)
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/divmod.logged (100%)
rename ".output/golden/eta/eval/logged/Fast/False/from-eas/fact0\n.logged" => ".output/actual/eta/eval/logged/Fast/from-eas/fact0\n.logged" (69%)
rename ".output/golden/eta/eval/logged/Fast/False/from-eas/fact1\n.logged" => ".output/actual/eta/eval/logged/Fast/from-eas/fact1\n.logged" (69%)
rename ".output/actual/eta/eval/logged/Fast/False/from-eas/fact9\n.logged" => ".output/actual/eta/eval/logged/Fast/from-eas/fact9\n.logged" (69%)
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/hello.logged (100%)
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/hello2.logged (86%)
rename .output/{golden/eta/eval/logged/Fast/False => actual/eta/eval/logged/Fast}/from-eas/hello3.logged (86%)
rename .output/{golden/eta/eval/logged/Fast/False => actual/eta/eval/logged/Fast}/from-eas/hello4.logged (86%)
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/readcharA.logged (100%)
create mode 100644 ".output/actual/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
create mode 100644 ".output/actual/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
rename .output/actual/eta/eval/logged/Fast/{False => }/from-eas/true.logged (100%)
rename .output/{golden/eta/eval/logged/Fast/False => actual/eta/eval/logged/Fast}/original/bottles.logged (72%)
rename .output/{golden/eta/eval/logged/Fast/False => actual/eta/eval/logged/Fast}/original/crlf.logged (90%)
rename ".output/actual/eta/eval/logged/Fast/False/original/fact1\n.logged" => ".output/actual/eta/eval/logged/Fast/original/fact1\n.logged" (69%)
rename ".output/actual/eta/eval/logged/Fast/False/original/fact4\n.logged" => ".output/actual/eta/eval/logged/Fast/original/fact9\n.logged" (69%)
rename .output/{golden/eta/eval/logged/Fast/False => actual/eta/eval/logged/Fast}/original/hello.logged (87%)
create mode 100644 .output/actual/eta/eval/logged/Fast/original/hello2.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/bottles.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/divmod.logged
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/hello.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/hello2.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/hello3.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/hello4.logged
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/readcharA.logged
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
delete mode 100644 ".output/actual/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
delete mode 100644 .output/actual/eta/eval/logged/Original/False/from-eas/true.logged
rename .output/actual/eta/eval/logged/Original/{False => }/original/crlf.logged (100%)
rename .output/actual/eta/eval/logged/Original/{False => }/original/hello.logged (100%)
rename .output/actual/eta/eval/logged/Original/{False => }/original/hello2.logged (100%)
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact2\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact3\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact4\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact5\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact6\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact7\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/from-eas/fact8\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact2\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact3\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact4\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact5\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact6\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact7\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/False/original/fact8\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact2\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact3\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact4\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact5\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact6\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact7\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Fast/True/original/fact8\n.output"
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/bottles.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/divmod.output (100%)
rename ".output/actual/eta/eval/output/Fast/False/from-eas/fact0\n.output" => ".output/actual/eta/eval/output/Fast/from-eas/fact0\n.output" (100%)
rename ".output/actual/eta/eval/output/Fast/False/from-eas/fact1\n.output" => ".output/actual/eta/eval/output/Fast/from-eas/fact1\n.output" (100%)
rename ".output/actual/eta/eval/output/Fast/False/from-eas/fact9\n.output" => ".output/actual/eta/eval/output/Fast/from-eas/fact9\n.output" (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/hello.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/hello2.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/hello3.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/hello4.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/readcharA.output (100%)
rename ".output/actual/eta/eval/output/Fast/False/from-eas/readnum0\n.output" => ".output/actual/eta/eval/output/Fast/from-eas/readnum0\n.output" (100%)
rename ".output/actual/eta/eval/output/Fast/False/from-eas/readnum1\n.output" => ".output/actual/eta/eval/output/Fast/from-eas/readnum1\n.output" (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/from-eas/true.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/original/bottles.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/original/crlf.output (100%)
rename ".output/actual/eta/eval/output/Fast/False/original/fact1\n.output" => ".output/actual/eta/eval/output/Fast/original/fact1\n.output" (100%)
create mode 100644 ".output/actual/eta/eval/output/Fast/original/fact9\n.output"
rename .output/actual/eta/eval/output/Fast/{False => }/original/hello.output (100%)
rename .output/actual/eta/eval/output/Fast/{False => }/original/hello2.output (100%)
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact2\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact3\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact4\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact5\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact6\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact7\n.output"
delete mode 100644 ".output/actual/eta/eval/output/Original/False/from-eas/fact8\n.output"
rename .output/actual/eta/eval/output/Original/{False => }/original/crlf.output (100%)
rename .output/actual/eta/eval/output/Original/{False/from-eas => original}/hello.output (100%)
rename .output/actual/eta/eval/output/Original/{False/from-eas => original}/hello2.output (100%)
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact1\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact2\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact3\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact4\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact5\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact6\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact7\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/False/original/fact8\n.logged"
delete mode 100644 .output/golden/eta/eval/logged/Fast/False/original/hello2.logged
delete mode 100644 .output/golden/eta/eval/logged/Fast/True/original/bottles.logged
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact1\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact2\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact3\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact4\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact5\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact6\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact7\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Fast/True/original/fact8\n.logged"
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/bottles.logged (83%)
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/divmod.logged (100%)
rename ".output/actual/eta/eval/logged/Fast/False/from-eas/fact0\n.logged" => ".output/golden/eta/eval/logged/Fast/from-eas/fact0\n.logged" (69%)
rename ".output/actual/eta/eval/logged/Fast/False/from-eas/fact1\n.logged" => ".output/golden/eta/eval/logged/Fast/from-eas/fact1\n.logged" (69%)
rename ".output/golden/eta/eval/logged/Fast/False/from-eas/fact9\n.logged" => ".output/golden/eta/eval/logged/Fast/from-eas/fact9\n.logged" (69%)
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/hello.logged (100%)
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/hello2.logged (86%)
rename .output/{actual/eta/eval/logged/Fast/False => golden/eta/eval/logged/Fast}/from-eas/hello3.logged (86%)
rename .output/{actual/eta/eval/logged/Fast/False => golden/eta/eval/logged/Fast}/from-eas/hello4.logged (86%)
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/readcharA.logged (100%)
create mode 100644 ".output/golden/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
create mode 100644 ".output/golden/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
rename .output/golden/eta/eval/logged/Fast/{False => }/from-eas/true.logged (100%)
rename .output/{actual/eta/eval/logged/Fast/False => golden/eta/eval/logged/Fast}/original/bottles.logged (72%)
rename .output/{actual/eta/eval/logged/Fast/False => golden/eta/eval/logged/Fast}/original/crlf.logged (90%)
rename ".output/actual/eta/eval/logged/Fast/True/original/fact1\n.logged" => ".output/golden/eta/eval/logged/Fast/original/fact1\n.logged" (69%)
rename ".output/actual/eta/eval/logged/Fast/False/original/fact2\n.logged" => ".output/golden/eta/eval/logged/Fast/original/fact9\n.logged" (69%)
rename .output/{actual/eta/eval/logged/Fast/False => golden/eta/eval/logged/Fast}/original/hello.logged (87%)
create mode 100644 .output/golden/eta/eval/logged/Fast/original/hello2.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/bottles.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/divmod.logged
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/hello.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/hello2.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/hello3.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/hello4.logged
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/readcharA.logged
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
delete mode 100644 ".output/golden/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
delete mode 100644 .output/golden/eta/eval/logged/Original/False/from-eas/true.logged
rename .output/golden/eta/eval/logged/Original/{False => }/original/crlf.logged (100%)
rename .output/golden/eta/eval/logged/Original/{False => }/original/hello.logged (100%)
rename .output/golden/eta/eval/logged/Original/{False => }/original/hello2.logged (100%)
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/bottles.output
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/divmod.output
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact0\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact1\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact2\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact3\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact4\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact5\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact6\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact7\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact8\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/fact9\n.output"
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/hello3.output
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/hello4.output
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/readcharA.output
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/readnum0\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/from-eas/readnum1\n.output"
delete mode 100644 .output/golden/eta/eval/output/Fast/False/from-eas/true.output
delete mode 100644 .output/golden/eta/eval/output/Fast/False/original/bottles.output
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact1\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact2\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact3\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact4\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact5\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact6\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact7\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/False/original/fact8\n.output"
delete mode 100644 .output/golden/eta/eval/output/Fast/True/original/bottles.output
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact1\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact2\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact3\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact4\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact5\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact6\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact7\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Fast/True/original/fact8\n.output"
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/bottles.output (100%)
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/divmod.output (100%)
rename ".output/actual/eta/eval/output/Original/False/from-eas/fact0\n.output" => ".output/golden/eta/eval/output/Fast/from-eas/fact0\n.output" (100%)
rename ".output/actual/eta/eval/output/Original/False/from-eas/fact1\n.output" => ".output/golden/eta/eval/output/Fast/from-eas/fact1\n.output" (100%)
rename ".output/actual/eta/eval/output/Original/False/from-eas/fact9\n.output" => ".output/golden/eta/eval/output/Fast/from-eas/fact9\n.output" (100%)
rename .output/{actual/eta/eval/output/Original/False/original => golden/eta/eval/output/Fast/from-eas}/hello.output (100%)
rename .output/{actual/eta/eval/output/Original/False/original => golden/eta/eval/output/Fast/from-eas}/hello2.output (100%)
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/hello3.output (100%)
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/hello4.output (100%)
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/readcharA.output (100%)
rename ".output/actual/eta/eval/output/Original/False/from-eas/readnum0\n.output" => ".output/golden/eta/eval/output/Fast/from-eas/readnum0\n.output" (100%)
rename ".output/actual/eta/eval/output/Original/False/from-eas/readnum1\n.output" => ".output/golden/eta/eval/output/Fast/from-eas/readnum1\n.output" (100%)
rename .output/{actual/eta/eval/output/Original/False => golden/eta/eval/output/Fast}/from-eas/true.output (100%)
rename .output/{actual/eta/eval/output/Fast/True => golden/eta/eval/output/Fast}/original/bottles.output (100%)
rename .output/golden/eta/eval/output/Fast/{False => }/original/crlf.output (100%)
rename ".output/actual/eta/eval/output/Fast/True/original/fact1\n.output" => ".output/golden/eta/eval/output/Fast/original/fact1\n.output" (100%)
create mode 100644 ".output/golden/eta/eval/output/Fast/original/fact9\n.output"
rename .output/golden/eta/eval/output/Fast/{False/from-eas => original}/hello.output (100%)
rename .output/golden/eta/eval/output/Fast/{False/from-eas => original}/hello2.output (100%)
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/bottles.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/divmod.output
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact0\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact1\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact2\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact3\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact4\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact5\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact6\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact7\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact8\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/fact9\n.output"
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/hello.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/hello2.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/hello3.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/hello4.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/readcharA.output
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/readnum0\n.output"
delete mode 100644 ".output/golden/eta/eval/output/Original/False/from-eas/readnum1\n.output"
delete mode 100644 .output/golden/eta/eval/output/Original/False/from-eas/true.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/original/hello.output
delete mode 100644 .output/golden/eta/eval/output/Original/False/original/hello2.output
rename .output/golden/eta/eval/output/Original/{False => }/original/crlf.output (100%)
rename .output/golden/eta/eval/output/{Fast/False => Original}/original/hello.output (100%)
rename .output/golden/eta/eval/output/{Fast/False => Original}/original/hello2.output (100%)
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoParams.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.ALInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Loop.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Optimizer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Unit.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.ALU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.CPU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.LSU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.RAM.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.ReadPExtra.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.CellType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.DumpType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.FormatType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.IntCellType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.RAMType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.StackType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.TokenType.hs.html
delete mode 100644 docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.WrapTokenList.hs.html
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Cat.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Addressing.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Automaton.hs.html (97%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Evaluator.hs.html (98%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Lexer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Optimizer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html (93%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.ETA.Token.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.FALSE.Expression.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.FALSE.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Automaton.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Constants.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Lambda.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Lexer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.LazyK.Reducer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Rev.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html (98%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Zot.Automaton.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Zot.Evaluator.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Zot.Expression.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automata.Zot.Parser.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.API.AutoOptions.hs.html (58%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.API.EvalParams.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Automaton.hs.html (67%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Combiner.ALU.hs.html (58%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Combiner.CPU.hs.html (79%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Combiner.LSU.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Combiner.RAM.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Combiner.hs.html (98%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.IO.FreeIO.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.IO.MockIO.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html (66%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html (97%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Instruction.hs.html (61%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Loop.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Optimizer.ConstantFoldingOptimizer.hs.html (100%)
create mode 100644 docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
rename docs/reports/helma-test/{helma-0.8.4.5-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Optimizer.hs.html (100%)
create mode 100644 docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.PrettyPrinter.hs.html
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.ReadPExtra.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.CellType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.DumpType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.FormatType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.IntCellType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.RAMType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.StackType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.Types.TokenType.hs.html (100%)
rename docs/reports/helma-test/{helma-0.8.4.4-inplace => helma-0.8.4.6-inplace}/HelVM.HelMA.Automaton.WrapTokenList.hs.html (100%)
create mode 100644 docs/reports/helma/HelVM-HelMA-Automaton-PrettyPrinter.html
create mode 100644 hs/src/HelVM/HelMA/Automaton/PrettyPrinter.hs
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact2\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
deleted file mode 100644
index 9be98ae96..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 516
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact3\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
deleted file mode 100644
index dbccf8304..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 526
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact4\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
deleted file mode 100644
index 5226ca98d..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 536
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact5\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
deleted file mode 100644
index 8ed534730..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 546
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact6\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
deleted file mode 100644
index a28ea7650..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 556
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact7\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
deleted file mode 100644
index 7db87e396..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 566
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact8\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
deleted file mode 100644
index 18745bd78..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 576
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
deleted file mode 100644
index 7baaa6b3a..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
+++ /dev/null
@@ -1,3 +0,0 @@
- [Undefined label 48]
-CPM.immediateInstruction
-CPM.topInstruction
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
deleted file mode 100644
index c00b305f7..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
+++ /dev/null
@@ -1,3 +0,0 @@
- [Undefined label 49]
-CPM.immediateInstruction
-CPM.topInstruction
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact3\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/original/fact3\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact3\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact5\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/original/fact5\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact5\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact6\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/original/fact6\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact6\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact7\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/original/fact7\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact7\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact8\n.logged" "b/.output/actual/eta/eval/logged/Fast/False/original/fact8\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact8\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/actual/eta/eval/logged/Fast/False/original/hello2.logged b/.output/actual/eta/eval/logged/Fast/False/original/hello2.logged
deleted file mode 100644
index 38c6568e4..000000000
--- a/.output/actual/eta/eval/logged/Fast/False/original/hello2.logged
+++ /dev/null
@@ -1,190 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 33 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 72 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 22 )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "3" )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 337 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 7 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 52
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/actual/eta/eval/logged/Fast/True/original/bottles.logged b/.output/actual/eta/eval/logged/Fast/True/original/bottles.logged
deleted file mode 100644
index 6f271cdca..000000000
--- a/.output/actual/eta/eval/logged/Fast/True/original/bottles.logged
+++ /dev/null
@@ -1,964 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 155 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "1" )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "2" )
- )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SPure Halibut )
- , ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "3" )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 18828800 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "14" )
- )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
- , IAL
- ( SPure
- ( Cons 18 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 19 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 98 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 102 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754576 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 98 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL
- ( SPure
- ( Cons 25 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Cons 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754565 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Cons 104 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL
- ( SPure
- ( Cons 31 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , ICF ( Labeled Jump LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "31" )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 402523 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 1814 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 99 )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 34 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 36 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 117 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 105 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 112 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 107 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 84 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 45 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 254
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact2\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact2\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact2\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact3\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact3\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact3\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact4\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact4\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact4\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact5\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact5\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact5\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact6\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact6\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact6\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact7\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact7\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact7\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact8\n.logged" "b/.output/actual/eta/eval/logged/Fast/True/original/fact8\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact8\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/bottles.logged b/.output/actual/eta/eval/logged/Fast/from-eas/bottles.logged
similarity index 83%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/bottles.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/bottles.logged
index 7b8165328..ce8ccd7f9 100644
--- a/.output/actual/eta/eval/logged/Fast/False/from-eas/bottles.logged
+++ b/.output/actual/eta/eval/logged/Fast/from-eas/bottles.logged
@@ -6,8 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 31 )
+ ( Labeled
+ ( LImmediate 31 ) Jump
)
, ICF
( Mark
@@ -15,8 +15,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -34,8 +34,8 @@ dump: Memory
( MNatural 4 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
)
, ICF
( Mark
@@ -43,7 +43,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 6 )
@@ -54,8 +54,8 @@ dump: Memory
( MNatural 7 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -67,8 +67,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -77,13 +77,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) ( Branch NE )
)
, ICF
( Mark
@@ -95,16 +95,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 11 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -112,8 +112,8 @@ dump: Memory
( MNatural 12 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -122,8 +122,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) Jump
)
, ICF
( Mark
@@ -151,20 +151,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -172,8 +172,8 @@ dump: Memory
( MNatural 17 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) Jump
)
, ICF
( Mark
@@ -184,14 +184,14 @@ dump: Memory
( Cons 19 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 19 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 20 )
@@ -202,8 +202,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -215,8 +215,8 @@ dump: Memory
( Cons 23 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) Jump
)
, ICF
( Mark
@@ -299,22 +299,22 @@ dump: Memory
( Cons 25 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 25 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 26 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -326,8 +326,8 @@ dump: Memory
( Cons 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 21 )
+ ( Labeled
+ ( LImmediate 21 ) Jump
)
, ICF
( Mark
@@ -394,14 +394,14 @@ dump: Memory
( Cons 30 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 30 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 31 )
@@ -416,8 +416,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -425,8 +425,8 @@ dump: Memory
( Cons 33 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -448,8 +448,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -457,8 +457,8 @@ dump: Memory
( Cons 35 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 21 )
+ ( Labeled
+ ( LImmediate 21 ) Jump
)
, ICF
( Mark
@@ -606,8 +606,8 @@ dump: Memory
( Cons 38 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -615,18 +615,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 39 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -634,8 +634,8 @@ dump: Memory
( Cons 40 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -657,21 +657,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 42 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) ( Branch NE )
)
, ICF
( Mark
@@ -683,7 +683,7 @@ dump: Memory
)
, End
]
- , programCounter = 175
+ , programCounter = 173
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/divmod.logged b/.output/actual/eta/eval/logged/Fast/from-eas/divmod.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/divmod.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/divmod.logged
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact0\n.logged" "b/.output/actual/eta/eval/logged/Fast/from-eas/fact0\n.logged"
similarity index 69%
rename from ".output/golden/eta/eval/logged/Fast/False/from-eas/fact0\n.logged"
rename to ".output/actual/eta/eval/logged/Fast/from-eas/fact0\n.logged"
index 041d795f8..bb9ab5475 100644
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact0\n.logged"
+++ "b/.output/actual/eta/eval/logged/Fast/from-eas/fact0\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact1\n.logged" "b/.output/actual/eta/eval/logged/Fast/from-eas/fact1\n.logged"
similarity index 69%
rename from ".output/golden/eta/eval/logged/Fast/False/from-eas/fact1\n.logged"
rename to ".output/actual/eta/eval/logged/Fast/from-eas/fact1\n.logged"
index 9ca8b2fd7..e20f74506 100644
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact1\n.logged"
+++ "b/.output/actual/eta/eval/logged/Fast/from-eas/fact1\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact9\n.logged" "b/.output/actual/eta/eval/logged/Fast/from-eas/fact9\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/from-eas/fact9\n.logged"
rename to ".output/actual/eta/eval/logged/Fast/from-eas/fact9\n.logged"
index af25ac312..29d095b3a 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact9\n.logged"
+++ "b/.output/actual/eta/eval/logged/Fast/from-eas/fact9\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello.logged b/.output/actual/eta/eval/logged/Fast/from-eas/hello.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/hello.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/hello.logged
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello2.logged b/.output/actual/eta/eval/logged/Fast/from-eas/hello2.logged
similarity index 86%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/hello2.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/hello2.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello2.logged
+++ b/.output/actual/eta/eval/logged/Fast/from-eas/hello2.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello3.logged b/.output/actual/eta/eval/logged/Fast/from-eas/hello3.logged
similarity index 86%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/hello3.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/hello3.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello3.logged
+++ b/.output/actual/eta/eval/logged/Fast/from-eas/hello3.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello4.logged b/.output/actual/eta/eval/logged/Fast/from-eas/hello4.logged
similarity index 86%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/hello4.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/hello4.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello4.logged
+++ b/.output/actual/eta/eval/logged/Fast/from-eas/hello4.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/readcharA.logged b/.output/actual/eta/eval/logged/Fast/from-eas/readcharA.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/readcharA.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/readcharA.logged
diff --git "a/.output/actual/eta/eval/logged/Fast/from-eas/readnum0\n.logged" "b/.output/actual/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
new file mode 100644
index 000000000..2454d32a4
--- /dev/null
+++ "b/.output/actual/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
@@ -0,0 +1,387 @@
+ALU.move index must be less then lenght [i 1] [ll 1]
+ [i IAL (SPure (Indexed (IImmediate 1) Move))] [Automaton.nextState Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 5 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 1 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 8 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 9 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 19 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 9 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 10 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 11 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 12 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 13 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 14 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 16 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 15 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 16 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 17 )
+ )
+ , IAL ( SPure Discard )
+ , ICF
+ ( Mark
+ ( MNatural 18 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 19 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 20 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 21 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 22 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 23 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 24 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 26 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 25 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 33 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 26 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 27 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 28 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 3 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 29 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 30 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 31 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 32 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 23 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 33 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Labeled LTop ( Branch NE ) )
+ , ICF
+ ( Mark
+ ( MNatural 34 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 47
+ , returnStack = IS []
+ }
+ , memoryStack = fromList [ 0 ]
+ , memoryRAM = []
+ }]
diff --git "a/.output/actual/eta/eval/logged/Fast/from-eas/readnum1\n.logged" "b/.output/actual/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
new file mode 100644
index 000000000..f6c37e591
--- /dev/null
+++ "b/.output/actual/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
@@ -0,0 +1,387 @@
+ALU.move index must be less then lenght [i 1] [ll 1]
+ [i IAL (SPure (Indexed (IImmediate 1) Move))] [Automaton.nextState Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 5 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 1 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 8 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 9 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 19 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 9 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 10 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 11 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 12 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 13 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 14 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 16 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 15 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 16 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 17 )
+ )
+ , IAL ( SPure Discard )
+ , ICF
+ ( Mark
+ ( MNatural 18 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 19 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 20 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 21 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 22 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 23 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 24 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 26 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 25 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 33 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 26 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 27 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 28 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 3 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 29 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 30 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 31 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 32 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 23 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 33 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Labeled LTop ( Branch NE ) )
+ , ICF
+ ( Mark
+ ( MNatural 34 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 47
+ , returnStack = IS []
+ }
+ , memoryStack = fromList [ 1 ]
+ , memoryRAM = []
+ }]
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/true.logged b/.output/actual/eta/eval/logged/Fast/from-eas/true.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/true.logged
rename to .output/actual/eta/eval/logged/Fast/from-eas/true.logged
diff --git a/.output/golden/eta/eval/logged/Fast/False/original/bottles.logged b/.output/actual/eta/eval/logged/Fast/original/bottles.logged
similarity index 72%
rename from .output/golden/eta/eval/logged/Fast/False/original/bottles.logged
rename to .output/actual/eta/eval/logged/Fast/original/bottles.logged
index 6f271cdca..feb3faacb 100644
--- a/.output/golden/eta/eval/logged/Fast/False/original/bottles.logged
+++ b/.output/actual/eta/eval/logged/Fast/original/bottles.logged
@@ -6,39 +6,24 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 155 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
( MArtificial "1" )
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Cons 2 )
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -48,8 +33,8 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
)
, IAL
( SPure
@@ -62,27 +47,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
, ICF
( Mark
@@ -100,53 +71,27 @@ dump: Memory
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL ( SPure Halibut )
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
, ICF
( Mark
( MNatural 3 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
@@ -155,12 +100,12 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL
@@ -176,8 +121,8 @@ dump: Memory
( MNatural 4 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
)
, ICF
( Mark
@@ -185,7 +130,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 6 )
@@ -196,8 +141,8 @@ dump: Memory
( MNatural 7 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -209,8 +154,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -219,13 +164,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) ( Branch NE )
)
, ICF
( Mark
@@ -237,16 +182,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 11 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -254,8 +199,8 @@ dump: Memory
( MNatural 12 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -264,8 +209,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) Jump
)
, ICF
( Mark
@@ -293,20 +238,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,16 +259,8 @@ dump: Memory
( MNatural 17 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
- , IAL
- ( SPure
- ( Cons 18 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
+ ( Labeled
+ ( LImmediate 11 ) Jump
)
, ICF
( Mark
@@ -334,22 +271,22 @@ dump: Memory
( Cons 19 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 19 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -361,8 +298,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) Jump
)
, ICF
( Mark
@@ -405,16 +342,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754576 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "23" )
+ ( Labeled
+ ( LImmediate 23 ) Jump
)
, ICF
( Mark
@@ -453,16 +382,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "24" )
+ ( Labeled
+ ( LImmediate 24 ) Jump
)
, ICF
( Mark
@@ -473,22 +394,22 @@ dump: Memory
( Cons 25 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 25 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 26 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -500,8 +421,8 @@ dump: Memory
( Cons 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 20 )
+ ( Labeled
+ ( LImmediate 20 ) Jump
)
, ICF
( Mark
@@ -536,16 +457,8 @@ dump: Memory
( Cons 101 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754565 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "29" )
+ ( Labeled
+ ( LImmediate 29 ) Jump
)
, ICF
( Mark
@@ -576,16 +489,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "30" )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -596,29 +501,14 @@ dump: Memory
( Cons 31 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 31 )
)
- , ICF ( Labeled Jump LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MArtificial "31" )
@@ -626,8 +516,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) ( Branch NE )
)
, IAL
( SPure
@@ -656,8 +546,8 @@ dump: Memory
( Cons 1814 )
)
, ICF
- ( Labeled Jump
- ( LArtificial "32" )
+ ( Labeled
+ ( LArtificial "32" ) Jump
)
, ICF
( Mark
@@ -673,8 +563,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -682,8 +572,8 @@ dump: Memory
( Cons 34 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -705,8 +595,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -714,8 +604,8 @@ dump: Memory
( Cons 36 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 20 )
+ ( Labeled
+ ( LImmediate 20 ) Jump
)
, ICF
( Mark
@@ -879,8 +769,8 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -888,18 +778,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -907,8 +797,8 @@ dump: Memory
( Cons 45 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -930,21 +820,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) ( Branch NE )
)
, ICF
( Mark
@@ -956,7 +846,7 @@ dump: Memory
)
, End
]
- , programCounter = 254
+ , programCounter = 222
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/eta/eval/logged/Fast/False/original/crlf.logged b/.output/actual/eta/eval/logged/Fast/original/crlf.logged
similarity index 90%
rename from .output/golden/eta/eval/logged/Fast/False/original/crlf.logged
rename to .output/actual/eta/eval/logged/Fast/original/crlf.logged
index b1aecee70..a5db7af96 100644
--- a/.output/golden/eta/eval/logged/Fast/False/original/crlf.logged
+++ b/.output/actual/eta/eval/logged/Fast/original/crlf.logged
@@ -6,8 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
, ICF
( Mark
@@ -39,8 +39,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -62,8 +62,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -95,8 +95,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact1\n.logged" "b/.output/actual/eta/eval/logged/Fast/original/fact1\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/original/fact1\n.logged"
rename to ".output/actual/eta/eval/logged/Fast/original/fact1\n.logged"
index 11c93e5ef..624e498d1 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact1\n.logged"
+++ "b/.output/actual/eta/eval/logged/Fast/original/fact1\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -209,18 +204,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 48 )
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -236,21 +231,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -269,10 +251,10 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -291,8 +273,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,27 +296,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -342,27 +324,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -370,21 +352,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -397,16 +379,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -417,8 +394,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -427,8 +404,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -436,8 +413,8 @@ dump: Memory
( MNatural 34 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
+ ( Labeled
+ ( LImmediate 36 ) ( Branch NE )
)
, ICF
( Mark
@@ -446,8 +423,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 40 )
+ ( Labeled
+ ( LImmediate 40 ) Jump
)
, ICF
( Mark
@@ -475,20 +452,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 38 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -496,8 +473,8 @@ dump: Memory
( MNatural 39 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) Jump
)
, ICF
( Mark
@@ -508,28 +485,28 @@ dump: Memory
( Cons 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
( MNatural 41 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 42 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -546,8 +523,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -556,8 +533,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -566,8 +543,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -575,16 +552,16 @@ dump: Memory
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
+ ( Labeled
+ ( LImmediate 49 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 48 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 56 )
+ ( Labeled
+ ( LImmediate 56 ) Jump
)
, ICF
( Mark
@@ -592,18 +569,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 50 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -616,8 +593,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -634,8 +611,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -644,8 +621,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -653,8 +630,8 @@ dump: Memory
( MNatural 55 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 46 )
+ ( Labeled
+ ( LImmediate 46 ) Jump
)
, ICF
( Mark
@@ -662,36 +639,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 57 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 58 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -700,8 +672,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -709,8 +681,8 @@ dump: Memory
( MNatural 60 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
+ ( Labeled
+ ( LImmediate 62 ) ( Branch NE )
)
, ICF
( Mark
@@ -718,7 +690,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 62 )
@@ -729,8 +701,8 @@ dump: Memory
( MNatural 63 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -742,7 +714,7 @@ dump: Memory
)
, End
]
- , programCounter = 185
+ , programCounter = 169
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact4\n.logged" "b/.output/actual/eta/eval/logged/Fast/original/fact9\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/original/fact4\n.logged"
rename to ".output/actual/eta/eval/logged/Fast/original/fact9\n.logged"
index 11c93e5ef..624e498d1 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact4\n.logged"
+++ "b/.output/actual/eta/eval/logged/Fast/original/fact9\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -209,18 +204,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 48 )
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -236,21 +231,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -269,10 +251,10 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -291,8 +273,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,27 +296,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -342,27 +324,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -370,21 +352,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -397,16 +379,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -417,8 +394,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -427,8 +404,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -436,8 +413,8 @@ dump: Memory
( MNatural 34 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
+ ( Labeled
+ ( LImmediate 36 ) ( Branch NE )
)
, ICF
( Mark
@@ -446,8 +423,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 40 )
+ ( Labeled
+ ( LImmediate 40 ) Jump
)
, ICF
( Mark
@@ -475,20 +452,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 38 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -496,8 +473,8 @@ dump: Memory
( MNatural 39 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) Jump
)
, ICF
( Mark
@@ -508,28 +485,28 @@ dump: Memory
( Cons 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
( MNatural 41 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 42 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -546,8 +523,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -556,8 +533,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -566,8 +543,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -575,16 +552,16 @@ dump: Memory
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
+ ( Labeled
+ ( LImmediate 49 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 48 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 56 )
+ ( Labeled
+ ( LImmediate 56 ) Jump
)
, ICF
( Mark
@@ -592,18 +569,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 50 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -616,8 +593,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -634,8 +611,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -644,8 +621,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -653,8 +630,8 @@ dump: Memory
( MNatural 55 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 46 )
+ ( Labeled
+ ( LImmediate 46 ) Jump
)
, ICF
( Mark
@@ -662,36 +639,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 57 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 58 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -700,8 +672,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -709,8 +681,8 @@ dump: Memory
( MNatural 60 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
+ ( Labeled
+ ( LImmediate 62 ) ( Branch NE )
)
, ICF
( Mark
@@ -718,7 +690,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 62 )
@@ -729,8 +701,8 @@ dump: Memory
( MNatural 63 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -742,7 +714,7 @@ dump: Memory
)
, End
]
- , programCounter = 185
+ , programCounter = 169
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/eta/eval/logged/Fast/False/original/hello.logged b/.output/actual/eta/eval/logged/Fast/original/hello.logged
similarity index 87%
rename from .output/golden/eta/eval/logged/Fast/False/original/hello.logged
rename to .output/actual/eta/eval/logged/Fast/original/hello.logged
index 93f69c654..44fc3aea1 100644
--- a/.output/golden/eta/eval/logged/Fast/False/original/hello.logged
+++ b/.output/actual/eta/eval/logged/Fast/original/hello.logged
@@ -6,17 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -32,16 +23,16 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Cons 2 )
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -51,8 +42,8 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
)
, IAL
( SPure
@@ -84,15 +75,15 @@ dump: Memory
( Cons 111 )
)
, ICF
- ( Labeled Jump
- ( LArtificial "5" )
+ ( Labeled
+ ( LArtificial "5" ) Jump
)
, ICF
( Mark
( MNatural 5 )
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL
@@ -203,7 +194,7 @@ dump: Memory
)
, End
]
- , programCounter = 63
+ , programCounter = 61
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/eta/eval/logged/Fast/original/hello2.logged b/.output/actual/eta/eval/logged/Fast/original/hello2.logged
new file mode 100644
index 000000000..bdbd3a91f
--- /dev/null
+++ b/.output/actual/eta/eval/logged/Fast/original/hello2.logged
@@ -0,0 +1,154 @@
+dump: Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 33 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 100 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 114 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 111 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 119 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 32 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 44 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 111 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 101 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 72 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 0 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MArtificial "3" )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
+ )
+ , IAL ( SIO InputChar )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 337 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL ( SIO OutputChar )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 38
+ , returnStack = IS []
+ }
+ , memoryStack = fromList []
+ , memoryRAM = []
+ }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/bottles.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/bottles.logged
deleted file mode 100644
index da0f86435..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/bottles.logged
+++ /dev/null
@@ -1,613 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , T
- , E
- , N
- , I
- , O
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , A
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , T
- , I
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , R
- , N
- , T
- , E
- , H
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , I
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , H
- , H
- , E
- , N
- , I
- , I
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , A
- , N
- , T
- , E
- , N
- , O
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , S
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , O
- , E
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , N
- , E
- , T
- , R
- , N
- , S
- , A
- , E
- , O
- , N
- , I
- , I
- , E
- , O
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , R
- , N
- , E
- , N
- , T
- , O
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , A
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , T
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , A
- , A
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , A
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , T
- , N
- , H
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , N
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , N
- , T
- , O
- , E
- , O
- , O
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , E
- , T
- , R
- ]
- , programCounter = 605
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/divmod.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/divmod.logged
deleted file mode 100644
index 92245a505..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/divmod.logged
+++ /dev/null
@@ -1,19 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , A
- , E
- , N
- , T
- , E
- , E
- , R
- ]
- , programCounter = 8
- }
- , memoryStack = fromList
- [ 0
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact0\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
deleted file mode 100644
index 7395d6bd1..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 496
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact1\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
deleted file mode 100644
index b6805b878..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 506
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact2\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
deleted file mode 100644
index 136455bf3..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 516
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact3\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
deleted file mode 100644
index 405114a84..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 526
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact4\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
deleted file mode 100644
index 43f73ed08..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 536
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact5\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
deleted file mode 100644
index e448ca0b3..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 546
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact6\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
deleted file mode 100644
index f50a339f9..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 556
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact7\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
deleted file mode 100644
index 8575dbb00..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 566
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact8\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
deleted file mode 100644
index 0d753cd45..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 576
- , 2
- ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact9\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
deleted file mode 100644
index 485fc474a..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 586
- , 2
- ]
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/hello.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/hello.logged
deleted file mode 100644
index 090d6eb28..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/hello.logged
+++ /dev/null
@@ -1,94 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , I
- , I
- , E
- , R
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , O
- , O
- , O
- , O
- , O
- , O
- , O
- , R
- , N
- , T
- , O
- , E
- , R
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , R
- , O
- , O
- , O
- , O
- , O
- , O
- , O
- , R
- ]
- , programCounter = 86
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/hello2.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/hello2.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/hello2.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/hello3.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/hello3.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/hello3.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/hello4.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/hello4.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/hello4.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/readcharA.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/readcharA.logged
deleted file mode 100644
index ebc722be7..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/readcharA.logged
+++ /dev/null
@@ -1,10 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- ]
- , programCounter = 2
- }
- , memoryStack = fromList [ 65 ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/readnum0\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
deleted file mode 100644
index b0248cef7..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
+++ /dev/null
@@ -1,268 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , A
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , S
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , O
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- ]
- , programCounter = 157
- }
- , memoryStack = fromList [ 496 ]
- }
diff --git "a/.output/actual/eta/eval/logged/Original/False/from-eas/readnum1\n.logged" "b/.output/actual/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
deleted file mode 100644
index c7a26d08a..000000000
--- "a/.output/actual/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
+++ /dev/null
@@ -1,268 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , A
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , S
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , O
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- ]
- , programCounter = 157
- }
- , memoryStack = fromList [ 506 ]
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/from-eas/true.logged b/.output/actual/eta/eval/logged/Original/False/from-eas/true.logged
deleted file mode 100644
index b025006e9..000000000
--- a/.output/actual/eta/eval/logged/Original/False/from-eas/true.logged
+++ /dev/null
@@ -1,7 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program = []
- , programCounter = 0
- }
- , memoryStack = fromList []
- }
diff --git a/.output/actual/eta/eval/logged/Original/False/original/crlf.logged b/.output/actual/eta/eval/logged/Original/original/crlf.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Original/False/original/crlf.logged
rename to .output/actual/eta/eval/logged/Original/original/crlf.logged
diff --git a/.output/actual/eta/eval/logged/Original/False/original/hello.logged b/.output/actual/eta/eval/logged/Original/original/hello.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Original/False/original/hello.logged
rename to .output/actual/eta/eval/logged/Original/original/hello.logged
diff --git a/.output/actual/eta/eval/logged/Original/False/original/hello2.logged b/.output/actual/eta/eval/logged/Original/original/hello2.logged
similarity index 100%
rename from .output/actual/eta/eval/logged/Original/False/original/hello2.logged
rename to .output/actual/eta/eval/logged/Original/original/hello2.logged
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact2\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact2\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact3\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact3\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact4\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact4\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact5\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact5\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact6\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact6\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact7\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact7\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact8\n.output" "b/.output/actual/eta/eval/output/Fast/False/from-eas/fact8\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact2\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact2\n.output"
deleted file mode 100644
index 0cfbf0888..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact2\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-2
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact3\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact3\n.output"
deleted file mode 100644
index 1e8b31496..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact3\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-6
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact4\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact4\n.output"
deleted file mode 100644
index a45fd52cc..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact4\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-24
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact5\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact5\n.output"
deleted file mode 100644
index 52bd8e43a..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact5\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-120
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact6\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact6\n.output"
deleted file mode 100644
index a1708fb1c..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact6\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-720
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact7\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact7\n.output"
deleted file mode 100644
index 89810b154..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact7\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-5040
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact8\n.output" "b/.output/actual/eta/eval/output/Fast/False/original/fact8\n.output"
deleted file mode 100644
index 47ae14062..000000000
--- "a/.output/actual/eta/eval/output/Fast/False/original/fact8\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-40320
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact2\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact2\n.output"
deleted file mode 100644
index 0cfbf0888..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact2\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-2
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact3\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact3\n.output"
deleted file mode 100644
index 1e8b31496..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact3\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-6
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact4\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact4\n.output"
deleted file mode 100644
index a45fd52cc..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact4\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-24
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact5\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact5\n.output"
deleted file mode 100644
index 52bd8e43a..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact5\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-120
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact6\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact6\n.output"
deleted file mode 100644
index a1708fb1c..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact6\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-720
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact7\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact7\n.output"
deleted file mode 100644
index 89810b154..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact7\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-5040
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact8\n.output" "b/.output/actual/eta/eval/output/Fast/True/original/fact8\n.output"
deleted file mode 100644
index 47ae14062..000000000
--- "a/.output/actual/eta/eval/output/Fast/True/original/fact8\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-40320
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/bottles.output b/.output/actual/eta/eval/output/Fast/from-eas/bottles.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/bottles.output
rename to .output/actual/eta/eval/output/Fast/from-eas/bottles.output
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/divmod.output b/.output/actual/eta/eval/output/Fast/from-eas/divmod.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/divmod.output
rename to .output/actual/eta/eval/output/Fast/from-eas/divmod.output
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact0\n.output" "b/.output/actual/eta/eval/output/Fast/from-eas/fact0\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/from-eas/fact0\n.output"
rename to ".output/actual/eta/eval/output/Fast/from-eas/fact0\n.output"
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact1\n.output" "b/.output/actual/eta/eval/output/Fast/from-eas/fact1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/from-eas/fact1\n.output"
rename to ".output/actual/eta/eval/output/Fast/from-eas/fact1\n.output"
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/fact9\n.output" "b/.output/actual/eta/eval/output/Fast/from-eas/fact9\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/from-eas/fact9\n.output"
rename to ".output/actual/eta/eval/output/Fast/from-eas/fact9\n.output"
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/hello.output b/.output/actual/eta/eval/output/Fast/from-eas/hello.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/hello.output
rename to .output/actual/eta/eval/output/Fast/from-eas/hello.output
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/hello2.output b/.output/actual/eta/eval/output/Fast/from-eas/hello2.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/hello2.output
rename to .output/actual/eta/eval/output/Fast/from-eas/hello2.output
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/hello3.output b/.output/actual/eta/eval/output/Fast/from-eas/hello3.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/hello3.output
rename to .output/actual/eta/eval/output/Fast/from-eas/hello3.output
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/hello4.output b/.output/actual/eta/eval/output/Fast/from-eas/hello4.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/hello4.output
rename to .output/actual/eta/eval/output/Fast/from-eas/hello4.output
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/readcharA.output b/.output/actual/eta/eval/output/Fast/from-eas/readcharA.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/readcharA.output
rename to .output/actual/eta/eval/output/Fast/from-eas/readcharA.output
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/readnum0\n.output" "b/.output/actual/eta/eval/output/Fast/from-eas/readnum0\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/from-eas/readnum0\n.output"
rename to ".output/actual/eta/eval/output/Fast/from-eas/readnum0\n.output"
diff --git "a/.output/actual/eta/eval/output/Fast/False/from-eas/readnum1\n.output" "b/.output/actual/eta/eval/output/Fast/from-eas/readnum1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/from-eas/readnum1\n.output"
rename to ".output/actual/eta/eval/output/Fast/from-eas/readnum1\n.output"
diff --git a/.output/actual/eta/eval/output/Fast/False/from-eas/true.output b/.output/actual/eta/eval/output/Fast/from-eas/true.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/from-eas/true.output
rename to .output/actual/eta/eval/output/Fast/from-eas/true.output
diff --git a/.output/actual/eta/eval/output/Fast/False/original/bottles.output b/.output/actual/eta/eval/output/Fast/original/bottles.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/original/bottles.output
rename to .output/actual/eta/eval/output/Fast/original/bottles.output
diff --git a/.output/actual/eta/eval/output/Fast/False/original/crlf.output b/.output/actual/eta/eval/output/Fast/original/crlf.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/original/crlf.output
rename to .output/actual/eta/eval/output/Fast/original/crlf.output
diff --git "a/.output/actual/eta/eval/output/Fast/False/original/fact1\n.output" "b/.output/actual/eta/eval/output/Fast/original/fact1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/False/original/fact1\n.output"
rename to ".output/actual/eta/eval/output/Fast/original/fact1\n.output"
diff --git "a/.output/actual/eta/eval/output/Fast/original/fact9\n.output" "b/.output/actual/eta/eval/output/Fast/original/fact9\n.output"
new file mode 100644
index 000000000..9c626aa4f
--- /dev/null
+++ "b/.output/actual/eta/eval/output/Fast/original/fact9\n.output"
@@ -0,0 +1 @@
+362880
diff --git a/.output/actual/eta/eval/output/Fast/False/original/hello.output b/.output/actual/eta/eval/output/Fast/original/hello.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/original/hello.output
rename to .output/actual/eta/eval/output/Fast/original/hello.output
diff --git a/.output/actual/eta/eval/output/Fast/False/original/hello2.output b/.output/actual/eta/eval/output/Fast/original/hello2.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/False/original/hello2.output
rename to .output/actual/eta/eval/output/Fast/original/hello2.output
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact2\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact2\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact3\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact3\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact4\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact4\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact5\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact5\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact6\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact6\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact7\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact7\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact8\n.output" "b/.output/actual/eta/eval/output/Original/False/from-eas/fact8\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/actual/eta/eval/output/Original/False/original/crlf.output b/.output/actual/eta/eval/output/Original/original/crlf.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/original/crlf.output
rename to .output/actual/eta/eval/output/Original/original/crlf.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/hello.output b/.output/actual/eta/eval/output/Original/original/hello.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/hello.output
rename to .output/actual/eta/eval/output/Original/original/hello.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/hello2.output b/.output/actual/eta/eval/output/Original/original/hello2.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/hello2.output
rename to .output/actual/eta/eval/output/Original/original/hello2.output
diff --git a/.output/actual/eta/il/optimized/from-eas/bottles.il b/.output/actual/eta/il/optimized/from-eas/bottles.il
index f71c9c68f..eaead5bfc 100644
--- a/.output/actual/eta/il/optimized/from-eas/bottles.il
+++ b/.output/actual/eta/il/optimized/from-eas/bottles.il
@@ -1,682 +1,218 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 31 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 21 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 21 )
- )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 38 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 31) Jump
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 4)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 11) (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 11)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 12)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+Labeled (LImmediate 18) Jump
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 17)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 18)
+SPure (Cons 19)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 19)
+Labeled LTop Jump
+
+Mark (MNatural 20)
+
+Mark (MNatural 21)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 22)
+SPure (Cons 23)
+Labeled (LImmediate 8) Jump
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+
+Mark (MNatural 24)
+SPure (Cons 25)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 25)
+Labeled LTop Jump
+
+Mark (MNatural 26)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 27)
+SPure (Cons 28)
+Labeled (LImmediate 21) Jump
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+
+Mark (MNatural 29)
+SPure (Cons 30)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 30)
+Labeled LTop Jump
+
+Mark (MNatural 31)
+SPure (Cons 3)
+
+Mark (MNatural 32)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 33)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 33)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 34)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 35)
+Labeled (LImmediate 21) Jump
+
+Mark (MNatural 35)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 36)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 37)
+SPure (Cons 38)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 38)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 39)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 40)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 40)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 41)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 32) (Branch NE)
+
+Mark (MNatural 42)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 43)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/euclid.il b/.output/actual/eta/il/optimized/from-eas/euclid.il
index 111c3e0bc..435af23fa 100644
--- a/.output/actual/eta/il/optimized/from-eas/euclid.il
+++ b/.output/actual/eta/il/optimized/from-eas/euclid.il
@@ -1,140 +1,46 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "6" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+Labeled (LImmediate 10) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Copy)
+
+Mark (MNatural 6)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "6")
+
+Mark (MNatural 7)
+SPure (Indexed (IImmediate 1) Move)
+SPure Discard
+
+Mark (MNatural 8)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 9)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 10)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 12)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/fact.il b/.output/actual/eta/il/optimized/from-eas/fact.il
index dcf98e678..998a9f6b2 100644
--- a/.output/actual/eta/il/optimized/from-eas/fact.il
+++ b/.output/actual/eta/il/optimized/from-eas/fact.il
@@ -1,723 +1,238 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "38" )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 65 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
-, ICF
- ( Mark
- ( MNatural 66 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+Labeled (LImmediate 14) Jump
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 3)
+SPure (Cons 4)
+Labeled (LImmediate 32) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 7)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LImmediate 9) (Branch NE)
+
+Mark (MNatural 8)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 10)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 12)
+SPure (Cons 13)
+Labeled (LImmediate 44) Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 16)
+Labeled (LImmediate 18) (Branch NE)
+
+Mark (MNatural 17)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 19)
+SPure (Cons 16)
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+Labeled (LImmediate 44) Jump
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 27) (Branch NE)
+
+Mark (MNatural 26)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 29) (Branch NE)
+
+Mark (MNatural 28)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 29)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 19) (Branch NE)
+
+Mark (MNatural 30)
+SPure Discard
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 35) (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 35)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 36)
+Labeled (LImmediate 38) (Branch NE)
+
+Mark (MNatural 37)
+SPure (Binary Sub)
+Labeled (LImmediate 42) Jump
+
+Mark (MNatural 38)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "38")
+
+Mark (MNatural 39)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 40)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 41)
+Labeled (LImmediate 35) Jump
+
+Mark (MNatural 42)
+SPure (Cons 43)
+Labeled (LImmediate 60) Jump
+
+Mark (MNatural 43)
+Labeled LTop Jump
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 45)
+SPure (Cons 0)
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 47)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 48)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 49)
+Labeled (LImmediate 51) (Branch NE)
+
+Mark (MNatural 50)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 51)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 52)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 53)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 54)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 55)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 56)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 57)
+Labeled (LImmediate 48) Jump
+
+Mark (MNatural 58)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 59)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 60)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 61)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 62)
+Labeled (LImmediate 64) (Branch NE)
+
+Mark (MNatural 63)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 64)
+SIO OutputChar
+
+Mark (MNatural 65)
+Labeled (LImmediate 60) Jump
+
+Mark (MNatural 66)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/function.il b/.output/actual/eta/il/optimized/from-eas/function.il
index 06a8f152c..80fe55795 100644
--- a/.output/actual/eta/il/optimized/from-eas/function.il
+++ b/.output/actual/eta/il/optimized/from-eas/function.il
@@ -1,84 +1,32 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 3)
+SPure (Cons 0)
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+
+Mark (MNatural 8)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/hello.il b/.output/actual/eta/il/optimized/from-eas/hello.il
index 20a3aec39..cc8950b8a 100644
--- a/.output/actual/eta/il/optimized/from-eas/hello.il
+++ b/.output/actual/eta/il/optimized/from-eas/hello.il
@@ -1,104 +1,45 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 3)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 4)
+SPure (Cons 10)
+
+Mark (MNatural 5)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 6)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/hello2.il b/.output/actual/eta/il/optimized/from-eas/hello2.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/actual/eta/il/optimized/from-eas/hello2.il
+++ b/.output/actual/eta/il/optimized/from-eas/hello2.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/hello3.il b/.output/actual/eta/il/optimized/from-eas/hello3.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/actual/eta/il/optimized/from-eas/hello3.il
+++ b/.output/actual/eta/il/optimized/from-eas/hello3.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/hello4.il b/.output/actual/eta/il/optimized/from-eas/hello4.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/actual/eta/il/optimized/from-eas/hello4.il
+++ b/.output/actual/eta/il/optimized/from-eas/hello4.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/multiply.il b/.output/actual/eta/il/optimized/from-eas/multiply.il
index 6f873408c..baf1464fb 100644
--- a/.output/actual/eta/il/optimized/from-eas/multiply.il
+++ b/.output/actual/eta/il/optimized/from-eas/multiply.il
@@ -1,178 +1,58 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 15 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Cons 0)
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+Labeled (LImmediate 15) Jump
+
+Mark (MNatural 8)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 10)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 11)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 12)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 14)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 17)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/pip.il b/.output/actual/eta/il/optimized/from-eas/pip.il
index 4411ce474..5fc3b2fed 100644
--- a/.output/actual/eta/il/optimized/from-eas/pip.il
+++ b/.output/actual/eta/il/optimized/from-eas/pip.il
@@ -1,71 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+SPure (Unary (UImmediate (-1) Sub))
+
+Mark (MNatural 4)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 5)
+SPure Discard
+
+Mark (MNatural 6)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/pip2.il b/.output/actual/eta/il/optimized/from-eas/pip2.il
index 50bc5b9d6..4ea0059ee 100644
--- a/.output/actual/eta/il/optimized/from-eas/pip2.il
+++ b/.output/actual/eta/il/optimized/from-eas/pip2.il
@@ -1,47 +1,17 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 2)
+SIO OutputChar
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/readnum.il b/.output/actual/eta/il/optimized/from-eas/readnum.il
index 5e17cdcaa..233f81908 100644
--- a/.output/actual/eta/il/optimized/from-eas/readnum.il
+++ b/.output/actual/eta/il/optimized/from-eas/readnum.il
@@ -1,389 +1,123 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 16 )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+Labeled (LImmediate 1) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Unary (UImmediate 48 Sub))
+
+Mark (MNatural 7)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 8)
+SPure (Cons 10)
+SPure (Cons 9)
+Labeled (LImmediate 19) Jump
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 10)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SIO InputChar
+
+Mark (MNatural 12)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+Labeled (LImmediate 17) Jump
+
+Mark (MNatural 14)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 16) (Branch NE)
+
+Mark (MNatural 15)
+Labeled (LImmediate 17) Jump
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 17)
+SPure Discard
+
+Mark (MNatural 18)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 19)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 20)
+SPure (Cons 0)
+
+Mark (MNatural 21)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 22)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 23)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 24)
+Labeled (LImmediate 26) (Branch NE)
+
+Mark (MNatural 25)
+Labeled (LImmediate 33) Jump
+
+Mark (MNatural 26)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 29)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 30)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 32)
+Labeled (LImmediate 23) Jump
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/reverse.il b/.output/actual/eta/il/optimized/from-eas/reverse.il
index 6e0610c88..ea26e1041 100644
--- a/.output/actual/eta/il/optimized/from-eas/reverse.il
+++ b/.output/actual/eta/il/optimized/from-eas/reverse.il
@@ -1,92 +1,32 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons (-1))
+
+Mark (MNatural 2)
+SIO InputChar
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+
+Mark (MNatural 4)
+SPure Discard
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 6)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 8)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/true.il b/.output/actual/eta/il/optimized/from-eas/true.il
index 758d72ec4..1dba14281 100644
--- a/.output/actual/eta/il/optimized/from-eas/true.il
+++ b/.output/actual/eta/il/optimized/from-eas/true.il
@@ -1,10 +1,5 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/writenum.il b/.output/actual/eta/il/optimized/from-eas/writenum.il
index 4f7c42b6f..a09fa4321 100644
--- a/.output/actual/eta/il/optimized/from-eas/writenum.il
+++ b/.output/actual/eta/il/optimized/from-eas/writenum.il
@@ -1,193 +1,70 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 4) (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 5)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 7)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "7")
+
+Mark (MNatural 8)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 10)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 12)
+Labeled LTop Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 14)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 15)
+Labeled (LImmediate 17) (Branch NE)
+
+Mark (MNatural 16)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 17)
+SIO OutputChar
+
+Mark (MNatural 18)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 19)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/from-eas/writestr.il b/.output/actual/eta/il/optimized/from-eas/writestr.il
index fbb21cb86..37c5fc29c 100644
--- a/.output/actual/eta/il/optimized/from-eas/writestr.il
+++ b/.output/actual/eta/il/optimized/from-eas/writestr.il
@@ -1,58 +1,24 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 5)
+SIO OutputChar
+
+Mark (MNatural 6)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/bottles.il b/.output/actual/eta/il/optimized/original/bottles.il
index cfe2a82ee..617024100 100644
--- a/.output/actual/eta/il/optimized/original/bottles.il
+++ b/.output/actual/eta/il/optimized/original/bottles.il
@@ -1,955 +1,276 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 155 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "2" )
- )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 18828800 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
-, IAL
- ( SPure
- ( Cons 2348471754576 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
-, IAL
- ( SPure
- ( Cons 2348471754565 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, ICF ( Labeled Jump LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "31" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 402523 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 1814 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 32) Jump
+
+Mark (MArtificial "1")
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+Labeled (LImmediate 4) (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 1) Move)
+Labeled (LImmediate 3) Jump
+
+Mark (MArtificial "2")
+SIO InputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure Halibut
+Labeled (LImmediate 3) Jump
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 4) Jump
+
+Mark (MArtificial "3")
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 18828800)
+SPure (Cons 4)
+
+Mark (MNatural 4)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 11) (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 11)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 12)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+Labeled (LImmediate 18) Jump
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 17)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 18)
+SPure (Cons 19)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 19)
+Labeled LTop Jump
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 22)
+Labeled (LImmediate 8) Jump
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+Labeled (LImmediate 23) Jump
+
+Mark (MNatural 23)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LImmediate 24) Jump
+
+Mark (MNatural 24)
+SPure (Cons 25)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 25)
+Labeled LTop Jump
+
+Mark (MNatural 26)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 27)
+SPure (Cons 28)
+Labeled (LImmediate 20) Jump
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+Labeled (LImmediate 29) Jump
+
+Mark (MNatural 29)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 30)
+SPure (Cons 31)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 31)
+Labeled LTop Jump
+
+Mark (MArtificial "31")
+SPure (Binary Sub)
+Labeled (LImmediate 32) (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 402523)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 1814)
+Labeled (LArtificial "32") Jump
+
+Mark (MNatural 32)
+SPure (Cons 99)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 34)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 34)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 35)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 36)
+Labeled (LImmediate 20) Jump
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+
+Mark (MNatural 38)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+
+Mark (MNatural 39)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+
+Mark (MNatural 40)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+
+Mark (MNatural 41)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 43)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 45)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 45)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 33) (Branch NE)
+
+Mark (MNatural 47)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 48)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/crlf.il b/.output/actual/eta/il/optimized/original/crlf.il
index 7f74d7246..ed648a532 100644
--- a/.output/actual/eta/il/optimized/original/crlf.il
+++ b/.output/actual/eta/il/optimized/original/crlf.il
@@ -1,107 +1,43 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 75 )
- )
-, IAL
- ( SPure
- ( Cons 79 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 3) Jump
+
+Mark (MNatural 2)
+SPure (Cons 10)
+SPure (Cons 49)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 3)
+SPure (Cons 10)
+SPure (Cons 75)
+SPure (Cons 79)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SPure (Cons 50)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/fact.il b/.output/actual/eta/il/optimized/original/fact.il
index 510c8b2f4..259d0e23a 100644
--- a/.output/actual/eta/il/optimized/original/fact.il
+++ b/.output/actual/eta/il/optimized/original/fact.il
@@ -1,741 +1,236 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "21" )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "36" )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 41 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+Labeled (LImmediate 14) Jump
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 3)
+SPure (Cons 4)
+Labeled (LImmediate 32) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 7)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LImmediate 9) (Branch NE)
+
+Mark (MNatural 8)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 10)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 12)
+SPure (Cons 13)
+Labeled (LImmediate 42) Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 16)
+Labeled (LImmediate 18) (Branch NE)
+
+Mark (MNatural 17)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 19)
+SPure (Unary (UImmediate 48 Sub))
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+Labeled (LImmediate 42) Jump
+
+Mark (MArtificial "21")
+SPure (Cons 22)
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 27) (Branch NE)
+
+Mark (MNatural 26)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 29) (Branch NE)
+
+Mark (MNatural 28)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 29)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 19) (Branch NE)
+
+Mark (MNatural 30)
+SPure Discard
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 34)
+Labeled (LImmediate 36) (Branch NE)
+
+Mark (MNatural 35)
+SPure (Binary Sub)
+Labeled (LImmediate 40) Jump
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "36")
+
+Mark (MNatural 37)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 38)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 39)
+Labeled (LImmediate 33) Jump
+
+Mark (MNatural 40)
+SPure (Cons 41)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 41)
+Labeled LTop Jump
+
+Mark (MNatural 42)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 43)
+SPure (Cons 0)
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 45)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 47)
+Labeled (LImmediate 49) (Branch NE)
+
+Mark (MNatural 48)
+Labeled (LImmediate 56) Jump
+
+Mark (MNatural 49)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 50)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 51)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 52)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 53)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 54)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 55)
+Labeled (LImmediate 46) Jump
+
+Mark (MNatural 56)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 57)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 58)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 59)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 60)
+Labeled (LImmediate 62) (Branch NE)
+
+Mark (MNatural 61)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 62)
+SIO OutputChar
+
+Mark (MNatural 63)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 64)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/hello.il b/.output/actual/eta/il/optimized/original/hello.il
index a8a85db1b..411b20f32 100644
--- a/.output/actual/eta/il/optimized/original/hello.il
+++ b/.output/actual/eta/il/optimized/original/hello.il
@@ -1,202 +1,77 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 2) Jump
+
+Mark (MArtificial "1")
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+Labeled (LImmediate 4) (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+
+Mark (MNatural 3)
+SPure (Cons 32)
+
+Mark (MNatural 4)
+SPure (Cons 44)
+SPure (Cons 111)
+Labeled (LArtificial "5") Jump
+
+Mark (MNatural 5)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "5")
+
+Mark (MNatural 6)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+
+Mark (MNatural 7)
+SPure (Cons 72)
+
+Mark (MNatural 8)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 10)
+
+Mark (MNatural 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+
+Mark (MNatural 11)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 12)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/hello2.il b/.output/actual/eta/il/optimized/original/hello2.il
index fe4055d7b..10c422a79 100644
--- a/.output/actual/eta/il/optimized/original/hello2.il
+++ b/.output/actual/eta/il/optimized/original/hello2.il
@@ -1,181 +1,47 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 22 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 337 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MArtificial "3")
+Labeled (LImmediate 4) (Branch NE)
+SIO InputChar
+SPure (Unary (UImmediate 337 Sub))
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/pip.il b/.output/actual/eta/il/optimized/original/pip.il
index 4411ce474..5fc3b2fed 100644
--- a/.output/actual/eta/il/optimized/original/pip.il
+++ b/.output/actual/eta/il/optimized/original/pip.il
@@ -1,71 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+SPure (Unary (UImmediate (-1) Sub))
+
+Mark (MNatural 4)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 5)
+SPure Discard
+
+Mark (MNatural 6)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/optimized/original/pip2.il b/.output/actual/eta/il/optimized/original/pip2.il
index 50bc5b9d6..4ea0059ee 100644
--- a/.output/actual/eta/il/optimized/original/pip2.il
+++ b/.output/actual/eta/il/optimized/original/pip2.il
@@ -1,47 +1,17 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 2)
+SIO OutputChar
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/bottles.il b/.output/actual/eta/il/parsed/from-eas/bottles.il
index 982bbdc9d..8a32f0e9f 100644
--- a/.output/actual/eta/il/parsed/from-eas/bottles.il
+++ b/.output/actual/eta/il/parsed/from-eas/bottles.il
@@ -1,848 +1,292 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure (Cons 31)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 4)
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 18)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 17)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 19)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 20)
+
+Mark (MNatural 21)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 22)
+SPure (Cons 23)
+SPure (Cons 1)
+SPure (Cons 8)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 27)
+SPure (Cons 28)
+SPure (Cons 1)
+SPure (Cons 21)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+
+Mark (MNatural 29)
+SPure (Cons 30)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 3)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 33)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 33)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 34)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 35)
+SPure (Cons 1)
+SPure (Cons 21)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 36)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 37)
+SPure (Cons 38)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 38)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 39)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 40)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 40)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 41)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/euclid.il b/.output/actual/eta/il/parsed/from-eas/euclid.il
index 717eda838..3500ea5c0 100644
--- a/.output/actual/eta/il/parsed/from-eas/euclid.il
+++ b/.output/actual/eta/il/parsed/from-eas/euclid.il
@@ -1,167 +1,66 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "6" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure (Cons 10)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "6")
+
+Mark (MNatural 7)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 12)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/fact.il b/.output/actual/eta/il/parsed/from-eas/fact.il
index a88478d88..1e8144aaf 100644
--- a/.output/actual/eta/il/parsed/from-eas/fact.il
+++ b/.output/actual/eta/il/parsed/from-eas/fact.il
@@ -1,952 +1,367 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "38" )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 65 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 66 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure (Cons 1)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 1)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 8)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 1)
+SPure (Cons 44)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 19)
+SPure (Cons 48)
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 44)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 27)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 27)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 29)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 34)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 36)
+SPure (Cons 37)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 37)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 38)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "38")
+
+Mark (MNatural 39)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 40)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 41)
+SPure (Cons 1)
+SPure (Cons 35)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+SPure (Cons 1)
+SPure (Cons 60)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 44)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 45)
+SPure (Cons 0)
+
+Mark (MNatural 46)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 47)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 48)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 49)
+SPure (Cons 50)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 50)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 51)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 52)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 53)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 54)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 55)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 56)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 57)
+SPure (Cons 1)
+SPure (Cons 48)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 58)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 59)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 60)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 61)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 62)
+SPure (Cons 63)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 63)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 64)
+SIO OutputChar
+
+Mark (MNatural 65)
+SPure (Cons 1)
+SPure (Cons 60)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 66)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/function.il b/.output/actual/eta/il/parsed/from-eas/function.il
index 2b8e41e61..ff12ba76e 100644
--- a/.output/actual/eta/il/parsed/from-eas/function.il
+++ b/.output/actual/eta/il/parsed/from-eas/function.il
@@ -1,80 +1,36 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+
+Mark (MNatural 8)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/hello.il b/.output/actual/eta/il/parsed/from-eas/hello.il
index 20a3aec39..cc8950b8a 100644
--- a/.output/actual/eta/il/parsed/from-eas/hello.il
+++ b/.output/actual/eta/il/parsed/from-eas/hello.il
@@ -1,104 +1,45 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 3)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 4)
+SPure (Cons 10)
+
+Mark (MNatural 5)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 6)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/hello2.il b/.output/actual/eta/il/parsed/from-eas/hello2.il
index f474aa692..d348d0a6d 100644
--- a/.output/actual/eta/il/parsed/from-eas/hello2.il
+++ b/.output/actual/eta/il/parsed/from-eas/hello2.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/hello3.il b/.output/actual/eta/il/parsed/from-eas/hello3.il
index f474aa692..d348d0a6d 100644
--- a/.output/actual/eta/il/parsed/from-eas/hello3.il
+++ b/.output/actual/eta/il/parsed/from-eas/hello3.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/hello4.il b/.output/actual/eta/il/parsed/from-eas/hello4.il
index f474aa692..d348d0a6d 100644
--- a/.output/actual/eta/il/parsed/from-eas/hello4.il
+++ b/.output/actual/eta/il/parsed/from-eas/hello4.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/multiply.il b/.output/actual/eta/il/parsed/from-eas/multiply.il
index a74e8e783..5430b0af9 100644
--- a/.output/actual/eta/il/parsed/from-eas/multiply.il
+++ b/.output/actual/eta/il/parsed/from-eas/multiply.il
@@ -1,199 +1,82 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+
+Mark (MNatural 3)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 4)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 15)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 9)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 11)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 12)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 13)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 14)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 15)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/pip.il b/.output/actual/eta/il/parsed/from-eas/pip.il
index d8a581105..f88e592e6 100644
--- a/.output/actual/eta/il/parsed/from-eas/pip.il
+++ b/.output/actual/eta/il/parsed/from-eas/pip.il
@@ -1,98 +1,41 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 7)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/pip2.il b/.output/actual/eta/il/parsed/from-eas/pip2.il
index 1f4275f90..e11bc328c 100644
--- a/.output/actual/eta/il/parsed/from-eas/pip2.il
+++ b/.output/actual/eta/il/parsed/from-eas/pip2.il
@@ -1,74 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/readnum.il b/.output/actual/eta/il/parsed/from-eas/readnum.il
index 380a18fd5..00ea65045 100644
--- a/.output/actual/eta/il/parsed/from-eas/readnum.il
+++ b/.output/actual/eta/il/parsed/from-eas/readnum.il
@@ -1,472 +1,184 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 48)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 8)
+SPure (Cons 10)
+SPure (Cons 9)
+SPure (Cons 1)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SIO InputChar
+
+Mark (MNatural 12)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 17)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 16)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 15)
+SPure (Cons 1)
+SPure (Cons 17)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 6)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 20)
+SPure (Cons 0)
+
+Mark (MNatural 21)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 22)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 27)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 29)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 30)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 31)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 32)
+SPure (Cons 1)
+SPure (Cons 23)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 33)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/reverse.il b/.output/actual/eta/il/parsed/from-eas/reverse.il
index 865d26f68..def8d566a 100644
--- a/.output/actual/eta/il/parsed/from-eas/reverse.il
+++ b/.output/actual/eta/il/parsed/from-eas/reverse.il
@@ -1,150 +1,58 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 2)
+SIO InputChar
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/true.il b/.output/actual/eta/il/parsed/from-eas/true.il
index 758d72ec4..1dba14281 100644
--- a/.output/actual/eta/il/parsed/from-eas/true.il
+++ b/.output/actual/eta/il/parsed/from-eas/true.il
@@ -1,10 +1,5 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/writenum.il b/.output/actual/eta/il/parsed/from-eas/writenum.il
index 3f15902fd..10bae4d99 100644
--- a/.output/actual/eta/il/parsed/from-eas/writenum.il
+++ b/.output/actual/eta/il/parsed/from-eas/writenum.il
@@ -1,287 +1,111 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "7")
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 14)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 15)
+SPure (Cons 16)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SIO OutputChar
+
+Mark (MNatural 18)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/from-eas/writestr.il b/.output/actual/eta/il/parsed/from-eas/writestr.il
index 95d6260fb..c9a375218 100644
--- a/.output/actual/eta/il/parsed/from-eas/writestr.il
+++ b/.output/actual/eta/il/parsed/from-eas/writestr.il
@@ -1,86 +1,36 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SIO OutputChar
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/bottles.il b/.output/actual/eta/il/parsed/original/bottles.il
index dec3f8f67..7d2744f4a 100644
--- a/.output/actual/eta/il/parsed/original/bottles.il
+++ b/.output/actual/eta/il/parsed/original/bottles.il
@@ -1,1184 +1,402 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 141 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 155 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "2" )
- )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 18828800 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 13128773 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2348471754576 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2348471754565 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "31" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 402523 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 1814 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 141)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+SIO OutputChar
+SPure (Cons 155)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "1")
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+SPure (Cons 1)
+SPure Halibut
+SPure (Cons 1)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 3)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "2")
+SIO InputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure Halibut
+SPure (Cons 3)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SIO InputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "3")
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 18828800)
+SPure (Cons 4)
+
+Mark (MNatural 4)
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 18)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 17)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+SPure (Cons 18)
+SPure (Cons 11)
+SPure (Cons 18)
+SPure (Cons 13128773)
+SPure (Cons 1)
+SPure Halibut
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 19)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 8)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 23)
+Labeled LTop (Branch NE)
+SPure (Cons 2348471754576)
+Labeled (LArtificial "23") Jump
+
+Mark (MNatural 23)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 24)
+Labeled LTop (Branch NE)
+SPure (Cons 335495964812)
+Labeled (LArtificial "24") Jump
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 27)
+SPure (Cons 28)
+SPure (Cons 1)
+SPure (Cons 20)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 1)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+SPure (Cons 2348471754565)
+Labeled (LArtificial "29") Jump
+
+Mark (MNatural 29)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+SPure (Cons 335495964812)
+Labeled (LArtificial "30") Jump
+
+Mark (MNatural 30)
+SPure (Cons 31)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "31")
+SPure (Binary Sub)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 402523)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 1814)
+Labeled (LArtificial "32") Jump
+
+Mark (MNatural 32)
+SPure (Cons 99)
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 34)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 35)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 36)
+SPure (Cons 1)
+SPure (Cons 20)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+
+Mark (MNatural 38)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+
+Mark (MNatural 39)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+
+Mark (MNatural 40)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+
+Mark (MNatural 41)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 44)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 45)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 45)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 46)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 47)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 48)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/crlf.il b/.output/actual/eta/il/parsed/original/crlf.il
index 4742e7e36..b6267aaa6 100644
--- a/.output/actual/eta/il/parsed/original/crlf.il
+++ b/.output/actual/eta/il/parsed/original/crlf.il
@@ -1,131 +1,51 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 75 )
- )
-, IAL
- ( SPure
- ( Cons 79 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 10)
+SPure (Cons 49)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 10)
+SPure (Cons 75)
+SPure (Cons 79)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SPure (Cons 50)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/fact.il b/.output/actual/eta/il/parsed/original/fact.il
index 59fc5f2b7..5a4ec05e1 100644
--- a/.output/actual/eta/il/parsed/original/fact.il
+++ b/.output/actual/eta/il/parsed/original/fact.il
@@ -1,941 +1,359 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "21" )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "36" )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 56 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure (Cons 1)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 1)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 8)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 19)
+SPure (Cons 48)
+SPure (Binary Sub)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure Halibut
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "21")
+SPure (Cons 22)
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 27)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 27)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 29)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 34)
+SPure (Cons 35)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 40)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "36")
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 38)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 39)
+SPure (Cons 1)
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 40)
+SPure (Cons 41)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 41)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 43)
+SPure (Cons 0)
+
+Mark (MNatural 44)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 45)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 46)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 47)
+SPure (Cons 48)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 48)
+SPure (Cons 1)
+SPure (Cons 56)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 49)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 50)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 51)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 52)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 53)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 54)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 55)
+SPure (Cons 1)
+SPure (Cons 46)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 56)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 57)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 58)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 59)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 60)
+SPure (Cons 61)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 61)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 62)
+SIO OutputChar
+
+Mark (MNatural 63)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 64)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/hello.il b/.output/actual/eta/il/parsed/original/hello.il
index 002d23a17..2e860d314 100644
--- a/.output/actual/eta/il/parsed/original/hello.il
+++ b/.output/actual/eta/il/parsed/original/hello.il
@@ -1,216 +1,84 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 21)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure Halibut
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "1")
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+
+Mark (MNatural 3)
+SPure (Cons 32)
+
+Mark (MNatural 4)
+SPure (Cons 44)
+SPure (Cons 111)
+Labeled (LArtificial "5") Jump
+
+Mark (MNatural 5)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "5")
+
+Mark (MNatural 6)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+
+Mark (MNatural 7)
+SPure (Cons 72)
+SPure (Cons 0)
+SPure (Binary Sub)
+
+Mark (MNatural 8)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 10)
+
+Mark (MNatural 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+
+Mark (MNatural 11)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 12)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/hello2.il b/.output/actual/eta/il/parsed/original/hello2.il
index 059ffb4fa..d82002f32 100644
--- a/.output/actual/eta/il/parsed/original/hello2.il
+++ b/.output/actual/eta/il/parsed/original/hello2.il
@@ -1,229 +1,80 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 337 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+SPure (Cons 4)
+SPure (Cons 22)
+Labeled LTop (Branch NE)
+SIO InputChar
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SIO OutputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "3")
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SIO InputChar
+SPure (Cons 337)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 11)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+SPure (Cons 7)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SIO InputChar
+SPure (Cons 7)
+SPure (Cons 0)
+Labeled (LArtificial "7") Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/pip.il b/.output/actual/eta/il/parsed/original/pip.il
index d8a581105..f88e592e6 100644
--- a/.output/actual/eta/il/parsed/original/pip.il
+++ b/.output/actual/eta/il/parsed/original/pip.il
@@ -1,98 +1,41 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 7)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/il/parsed/original/pip2.il b/.output/actual/eta/il/parsed/original/pip2.il
index 1f4275f90..e11bc328c 100644
--- a/.output/actual/eta/il/parsed/original/pip2.il
+++ b/.output/actual/eta/il/parsed/original/pip2.il
@@ -1,74 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/actual/eta/minified/from-eas/readnum.eta b/.output/actual/eta/minified/from-eas/readnum.eta
index 6e7c7253c..266b08171 100644
--- a/.output/actual/eta/minified/from-eas/readnum.eta
+++ b/.output/actual/eta/minified/from-eas/readnum.eta
@@ -3,7 +3,7 @@ NEHNIIES
ANENTESST
NENTETNTET
NENTEH
-NSSENIIES
+NSSES
NTEH
NTOEANTENANET
NENTEH
@@ -31,4 +31,4 @@ NAEH
NAEH
NTENOAET
NTEHT
-NTENAEHT
+NTENAEHT
\ No newline at end of file
diff --git a/.output/actual/f/il/helma/copy.il b/.output/actual/f/il/helma/copy.il
index 3334bc959..c72f32181 100644
--- a/.output/actual/f/il/helma/copy.il
+++ b/.output/actual/f/il/helma/copy.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/helma/factorial.il b/.output/actual/f/il/helma/factorial.il
index a69f129be..dac4931b6 100644
--- a/.output/actual/f/il/helma/factorial.il
+++ b/.output/actual/f/il/helma/factorial.il
@@ -2,8 +2,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -25,8 +25,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -71,16 +71,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/helma/primeNumber.il b/.output/actual/f/il/helma/primeNumber.il
index ba9e9aed1..359190330 100644
--- a/.output/actual/f/il/helma/primeNumber.il
+++ b/.output/actual/f/il/helma/primeNumber.il
@@ -24,8 +24,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -34,64 +34,64 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -121,16 +121,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -150,16 +150,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -175,8 +175,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/benHoyt/bin2f.il b/.output/actual/f/il/other/benHoyt/bin2f.il
index 4816480bc..18f047f66 100644
--- a/.output/actual/f/il/other/benHoyt/bin2f.il
+++ b/.output/actual/f/il/other/benHoyt/bin2f.il
@@ -6,8 +6,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/benHoyt/fac.il b/.output/actual/f/il/other/benHoyt/fac.il
index 9c7a88322..3540172e3 100644
--- a/.output/actual/f/il/other/benHoyt/fac.il
+++ b/.output/actual/f/il/other/benHoyt/fac.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -21,8 +21,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -30,8 +30,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -46,8 +46,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -61,8 +61,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -107,16 +107,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/morphett/factorial.il b/.output/actual/f/il/other/morphett/factorial.il
index b14f5a74f..0cb8583d7 100644
--- a/.output/actual/f/il/other/morphett/factorial.il
+++ b/.output/actual/f/il/other/morphett/factorial.il
@@ -2,8 +2,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -20,8 +20,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -29,8 +29,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -45,8 +45,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -60,8 +60,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/morphett/factorial2.il b/.output/actual/f/il/other/morphett/factorial2.il
index 71defb229..81fc7b9ab 100644
--- a/.output/actual/f/il/other/morphett/factorial2.il
+++ b/.output/actual/f/il/other/morphett/factorial2.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -15,8 +15,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -33,16 +33,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -59,32 +59,32 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/morphett/reverse.il b/.output/actual/f/il/other/morphett/reverse.il
index cc09e701c..e4f25902a 100644
--- a/.output/actual/f/il/other/morphett/reverse.il
+++ b/.output/actual/f/il/other/morphett/reverse.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/other/thunderseethe/prog.il b/.output/actual/f/il/other/thunderseethe/prog.il
index 904db3acd..656265da8 100644
--- a/.output/actual/f/il/other/thunderseethe/prog.il
+++ b/.output/actual/f/il/other/thunderseethe/prog.il
@@ -15,8 +15,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -58,8 +58,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Ben_Schaeffer/detab.il b/.output/actual/f/il/strlen/contrib/Ben_Schaeffer/detab.il
index b8588970b..5d64846f0 100644
--- a/.output/actual/f/il/strlen/contrib/Ben_Schaeffer/detab.il
+++ b/.output/actual/f/il/strlen/contrib/Ben_Schaeffer/detab.il
@@ -10,16 +10,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
index c0820a388..cdda4be0f 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -58,8 +58,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -93,8 +93,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -128,8 +128,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -163,8 +163,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -198,8 +198,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -233,8 +233,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -287,8 +287,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -324,8 +324,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -361,8 +361,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/countwl.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
index f646479fb..b756b0b4f 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -58,8 +58,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -101,16 +101,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -161,8 +161,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/crunch.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
index 5966a0080..f0e5271e9 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
index f89e16fa3..a79fa974f 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -70,8 +70,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/depack.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/depack.il
index c1a40dca3..ee2e4c21a 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/depack.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/depack.il
@@ -41,8 +41,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/remcom.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
index 3a958bab2..3efdad7a2 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
@@ -38,16 +38,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/split.il b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/split.il
index a40d76b62..5c329a773 100644
--- a/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/split.il
+++ b/.output/actual/f/il/strlen/contrib/Eelko_de_Vos/split.il
@@ -72,8 +72,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il b/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
index 34e380487..06c22e2ea 100644
--- a/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
+++ b/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
@@ -9,8 +9,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -27,8 +27,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -42,8 +42,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -71,8 +71,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -95,16 +95,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -119,8 +119,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -164,8 +164,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -190,8 +190,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -286,16 +286,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -328,8 +328,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -338,8 +338,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -348,8 +348,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -358,8 +358,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -392,24 +392,24 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il b/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
index c3f9c6705..d335b9da9 100644
--- a/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
+++ b/.output/actual/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
@@ -9,8 +9,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -33,16 +33,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -57,8 +57,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -79,8 +79,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -91,8 +91,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -120,8 +120,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -130,8 +130,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -142,8 +142,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -152,8 +152,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -173,8 +173,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -206,8 +206,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -216,8 +216,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -258,8 +258,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -302,8 +302,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -316,8 +316,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -326,8 +326,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -340,8 +340,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -356,8 +356,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il b/.output/actual/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
index 5e05ab9dd..a657ed472 100644
--- a/.output/actual/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
+++ b/.output/actual/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
@@ -18,8 +18,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -47,8 +47,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -75,8 +75,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -93,8 +93,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -126,8 +126,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -145,16 +145,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -171,8 +171,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -241,8 +241,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -264,8 +264,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il b/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
index 4ddecb6ef..1aa661240 100644
--- a/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
+++ b/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
@@ -14,8 +14,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -40,8 +40,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -51,8 +51,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -90,8 +90,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -125,8 +125,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -151,8 +151,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -162,8 +162,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il b/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
index 94f975ad3..068a71df0 100644
--- a/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
+++ b/.output/actual/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
@@ -11,8 +11,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/Thomas_Fischbacher/life.il b/.output/actual/f/il/strlen/contrib/Thomas_Fischbacher/life.il
index 5fda508c8..459120940 100644
--- a/.output/actual/f/il/strlen/contrib/Thomas_Fischbacher/life.il
+++ b/.output/actual/f/il/strlen/contrib/Thomas_Fischbacher/life.il
@@ -43,8 +43,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -76,8 +76,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -98,16 +98,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -128,8 +128,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -138,8 +138,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -165,8 +165,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/contrib/self.il b/.output/actual/f/il/strlen/contrib/self.il
index aca1f3eda..910fe7841 100644
--- a/.output/actual/f/il/strlen/contrib/self.il
+++ b/.output/actual/f/il/strlen/contrib/self.il
@@ -19,8 +19,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/addcr.il b/.output/actual/f/il/strlen/examples/addcr.il
index bd23cbf82..96b219f17 100644
--- a/.output/actual/f/il/strlen/examples/addcr.il
+++ b/.output/actual/f/il/strlen/examples/addcr.il
@@ -7,16 +7,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/arg.il b/.output/actual/f/il/strlen/examples/arg.il
index ef025707c..4f4fcc71d 100644
--- a/.output/actual/f/il/strlen/examples/arg.il
+++ b/.output/actual/f/il/strlen/examples/arg.il
@@ -22,8 +22,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -53,8 +53,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/argtest.il b/.output/actual/f/il/strlen/examples/argtest.il
index cbab2112a..0b4f8da24 100644
--- a/.output/actual/f/il/strlen/examples/argtest.il
+++ b/.output/actual/f/il/strlen/examples/argtest.il
@@ -18,8 +18,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/lambda.il b/.output/actual/f/il/strlen/examples/lambda.il
index 1cafadebb..1616620a2 100644
--- a/.output/actual/f/il/strlen/examples/lambda.il
+++ b/.output/actual/f/il/strlen/examples/lambda.il
@@ -4,8 +4,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -46,24 +46,24 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -76,8 +76,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -86,8 +86,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -100,8 +100,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -111,16 +111,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -133,8 +133,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/prime.il b/.output/actual/f/il/strlen/examples/prime.il
index 5f031bd13..f7268a226 100644
--- a/.output/actual/f/il/strlen/examples/prime.il
+++ b/.output/actual/f/il/strlen/examples/prime.il
@@ -25,8 +25,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -35,80 +35,80 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -138,16 +138,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -157,8 +157,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -175,16 +175,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -204,16 +204,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -230,8 +230,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/actual/f/il/strlen/examples/strip.il b/.output/actual/f/il/strlen/examples/strip.il
index 0d19f1278..64296bb1d 100644
--- a/.output/actual/f/il/strlen/examples/strip.il
+++ b/.output/actual/f/il/strlen/examples/strip.il
@@ -6,16 +6,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -57,8 +57,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/inline/copy.il b/.output/actual/f/il/strlen/inline/copy.il
index 24b05c4f0..f84862002 100644
--- a/.output/actual/f/il/strlen/inline/copy.il
+++ b/.output/actual/f/il/strlen/inline/copy.il
@@ -6,8 +6,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/inline/factorial.il b/.output/actual/f/il/strlen/inline/factorial.il
index 93ed4cb60..fcbbf9b96 100644
--- a/.output/actual/f/il/strlen/inline/factorial.il
+++ b/.output/actual/f/il/strlen/inline/factorial.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -26,8 +26,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -72,16 +72,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/f/il/strlen/inline/primeNumber.il b/.output/actual/f/il/strlen/inline/primeNumber.il
index 7f826cebd..e40aaf82d 100644
--- a/.output/actual/f/il/strlen/inline/primeNumber.il
+++ b/.output/actual/f/il/strlen/inline/primeNumber.il
@@ -25,8 +25,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -35,64 +35,64 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -122,16 +122,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -151,16 +151,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -176,8 +176,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
index cc3628ead..d7cfefc56 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -141,13 +141,13 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -220,8 +220,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
@@ -344,19 +344,19 @@ dump: Memory
( Cons 84 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -477,30 +477,30 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "010011000100111101001111010100000011101000110001" )
+ ( Labeled
+ ( LArtificial "010011000100111101001111010100000011101000110001" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01001100010011110100111101010000" )
+ ( Labeled
+ ( LArtificial "01001100010011110100111101010000" ) Jump
)
, ICF
( Mark
@@ -513,18 +513,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -537,8 +537,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
@@ -547,7 +547,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 128
+ , programCounter = 127
, returnStack = IS []
}
, memoryStack = fromList [ 0 ]
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
index e4e419d2b..d1a6d5412 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
@@ -62,8 +62,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, End
, ICF
@@ -72,18 +72,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -96,8 +96,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
index 86141872e..f522cf884 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
@@ -58,8 +58,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, End
, ICF
@@ -68,18 +68,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -92,8 +92,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
index 8361de9c8..20d3e249b 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
@@ -90,8 +90,8 @@ dump: Memory
( Cons 112 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
@@ -103,32 +103,32 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110001" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110001" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 1 )
@@ -136,13 +136,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110001" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110001" ) Jump
)
, ICF
( Mark
@@ -159,19 +159,19 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110010" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110010" ) ( Branch EZ )
)
, IAL
( SPure
@@ -183,24 +183,24 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110011" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110011" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -209,21 +209,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -232,15 +232,15 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
@@ -257,10 +257,10 @@ dump: Memory
( SPure ( Binary Mul ) )
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -268,13 +268,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110011" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110011" ) Jump
)
, ICF
( Mark
@@ -283,13 +283,13 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110010" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110010" ) Jump
)
, ICF
( Mark
@@ -306,41 +306,41 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110100" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110100" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011011100110111101100100011100100110000101110111" )
+ ( Labeled
+ ( LArtificial "011011100110111101100100011100100110000101110111" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -353,8 +353,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, ICF
( Mark
@@ -362,13 +362,13 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110100" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110100" ) Jump
)
, ICF
( Mark
@@ -380,8 +380,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, End
, ICF
@@ -390,18 +390,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -414,8 +414,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
@@ -424,7 +424,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 105
+ , programCounter = 94
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
index 11a0a3c32..e9f52c753 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110111101100111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110111101100111011001010110111001100100" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "01101100011011110110111101110000" )
+ ( Labeled
+ ( LArtificial "01101100011011110110111101110000" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/original/count.logged b/.output/actual/ws/eval/logged/stn/asciiOff/original/count.logged
index d421faaf0..651750622 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/original/count.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01000101" )
+ ( Labeled
+ ( LArtificial "01000101" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01000011" )
+ ( Labeled
+ ( LArtificial "01000011" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/fact10\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
index d4c64fd20..c4614275d 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" )
+ ( Labeled
+ ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/actual/ws/eval/logged/stn/asciiOff/original/hWorld.logged b/.output/actual/ws/eval/logged/stn/asciiOff/original/hWorld.logged
index 62cd16277..fa789ab5a 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOff/original/hWorld.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOff/original/hWorld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
index d4ad84ab8..775a9f355 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
index c807f9c34..70c9fcfb0 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01101100011011110110001101110100011001010111001101110100" )
+ ( Labeled
+ ( LArtificial "01101100011011110110001101110100011001010111001101110100" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
index e6c4ddf5d..70fcbca32 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
index b415410a3..ea53b5ca6 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
@@ -12,8 +12,8 @@ dump: Memory
, ILS ( MIO InputDec )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0" )
+ ( Labeled
+ ( LArtificial "0" ) ( Branch EZ )
)
, ICF
( Mark
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Jump
- ( LArtificial "1" )
+ ( Labeled
+ ( LArtificial "1" ) Jump
)
, ICF
( Mark
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
index e341d32f7..e68672e95 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -141,13 +141,13 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -220,8 +220,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
@@ -344,19 +344,19 @@ dump: Memory
( Cons 84 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -477,30 +477,30 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
+ ( Labeled
+ ( LArtificial "LOOP:1" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
+ ( Labeled
+ ( LArtificial "LOOP" ) Jump
)
, ICF
( Mark
@@ -513,18 +513,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -537,8 +537,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
@@ -547,7 +547,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 128
+ , programCounter = 127
, returnStack = IS []
}
, memoryStack = fromList [ 0 ]
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
index 08bd31b64..dfc401116 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
@@ -62,8 +62,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, End
, ICF
@@ -72,18 +72,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -96,8 +96,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
index 23d1889db..fbe810fc3 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
@@ -58,8 +58,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, End
, ICF
@@ -68,18 +68,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -92,8 +92,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
index 32df691ee..0b9033cc2 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
@@ -90,8 +90,8 @@ dump: Memory
( Cons 112 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
@@ -103,32 +103,32 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
+ ( Labeled
+ ( LArtificial "f_finished_1" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 1 )
@@ -136,13 +136,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
+ ( Labeled
+ ( LArtificial "f_start_1" ) Jump
)
, ICF
( Mark
@@ -159,19 +159,19 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
+ ( Labeled
+ ( LArtificial "f_finished_2" ) ( Branch EZ )
)
, IAL
( SPure
@@ -183,24 +183,24 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
+ ( Labeled
+ ( LArtificial "f_finished_3" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -209,21 +209,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -232,15 +232,15 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
@@ -257,10 +257,10 @@ dump: Memory
( SPure ( Binary Mul ) )
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -268,13 +268,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
+ ( Labeled
+ ( LArtificial "f_start_3" ) Jump
)
, ICF
( Mark
@@ -283,13 +283,13 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
+ ( Labeled
+ ( LArtificial "f_start_2" ) Jump
)
, ICF
( Mark
@@ -306,41 +306,41 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
+ ( Labeled
+ ( LArtificial "f_finished_4" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
+ ( Labeled
+ ( LArtificial "nodraw" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -353,8 +353,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, ICF
( Mark
@@ -362,13 +362,13 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
+ ( Labeled
+ ( LArtificial "f_start_4" ) Jump
)
, ICF
( Mark
@@ -380,8 +380,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, End
, ICF
@@ -390,18 +390,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -414,8 +414,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
@@ -424,7 +424,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 105
+ , programCounter = 94
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
index 6cbb2fff8..1d797795c 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
+ ( Labeled
+ ( LArtificial "progend" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
+ ( Labeled
+ ( LArtificial "loop" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/original/count.logged b/.output/actual/ws/eval/logged/stn/asciiOn/original/count.logged
index 80d2cf08c..295a6d24b 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/original/count.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
+ ( Labeled
+ ( LArtificial "E" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "C" )
+ ( Labeled
+ ( LArtificial "C" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/fact10\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
index 3724b13a9..d696c8c37 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
+ ( Labeled
+ ( LArtificial "factbase" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/actual/ws/eval/logged/stn/asciiOn/original/hWorld.logged b/.output/actual/ws/eval/logged/stn/asciiOn/original/hWorld.logged
index 183155c79..549c75cd6 100644
--- a/.output/actual/ws/eval/logged/stn/asciiOn/original/hWorld.logged
+++ b/.output/actual/ws/eval/logged/stn/asciiOn/original/hWorld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
index 6005a7442..4261bac29 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
+ ( Labeled
+ ( LArtificial "endhanoi" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
index 92ad9b7f2..8b88a0eeb 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
+ ( Labeled
+ ( LArtificial "loctest" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
index 8ac0fea5e..d5ea6e6fc 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged" "b/.output/actual/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
index 300718081..24f88495d 100644
--- "a/.output/actual/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
+++ "b/.output/actual/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
@@ -12,8 +12,8 @@ dump: Memory
, ILS ( MIO InputDec )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
+ ( Labeled
+ ( LArtificial "\x0" ) ( Branch EZ )
)
, ICF
( Mark
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
+ ( Labeled
+ ( LArtificial "\x1" ) Jump
)
, ICF
( Mark
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
index 11a0a3c32..e9f52c753 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110111101100111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110111101100111011001010110111001100100" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "01101100011011110110111101110000" )
+ ( Labeled
+ ( LArtificial "01101100011011110110111101110000" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/ws/eval/logged/ws/asciiOff/original/count.logged b/.output/actual/ws/eval/logged/ws/asciiOff/original/count.logged
index d421faaf0..651750622 100644
--- a/.output/actual/ws/eval/logged/ws/asciiOff/original/count.logged
+++ b/.output/actual/ws/eval/logged/ws/asciiOff/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01000101" )
+ ( Labeled
+ ( LArtificial "01000101" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01000011" )
+ ( Labeled
+ ( LArtificial "01000011" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOff/original/fact10\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
index d4c64fd20..c4614275d 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" )
+ ( Labeled
+ ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
index d4ad84ab8..775a9f355 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/actual/ws/eval/logged/ws/asciiOff/original/hworld.logged b/.output/actual/ws/eval/logged/ws/asciiOff/original/hworld.logged
index 62cd16277..fa789ab5a 100644
--- a/.output/actual/ws/eval/logged/ws/asciiOff/original/hworld.logged
+++ b/.output/actual/ws/eval/logged/ws/asciiOff/original/hworld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
index c807f9c34..70c9fcfb0 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01101100011011110110001101110100011001010111001101110100" )
+ ( Labeled
+ ( LArtificial "01101100011011110110001101110100011001010111001101110100" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
index e6c4ddf5d..70fcbca32 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
index 6cbb2fff8..1d797795c 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
+ ( Labeled
+ ( LArtificial "progend" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
+ ( Labeled
+ ( LArtificial "loop" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/ws/eval/logged/ws/asciiOn/original/count.logged b/.output/actual/ws/eval/logged/ws/asciiOn/original/count.logged
index 80d2cf08c..295a6d24b 100644
--- a/.output/actual/ws/eval/logged/ws/asciiOn/original/count.logged
+++ b/.output/actual/ws/eval/logged/ws/asciiOn/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
+ ( Labeled
+ ( LArtificial "E" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "C" )
+ ( Labeled
+ ( LArtificial "C" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOn/original/fact10\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
index 3724b13a9..d696c8c37 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
+ ( Labeled
+ ( LArtificial "factbase" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
index 6005a7442..4261bac29 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
+ ( Labeled
+ ( LArtificial "endhanoi" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/actual/ws/eval/logged/ws/asciiOn/original/hworld.logged b/.output/actual/ws/eval/logged/ws/asciiOn/original/hworld.logged
index 183155c79..549c75cd6 100644
--- a/.output/actual/ws/eval/logged/ws/asciiOn/original/hworld.logged
+++ b/.output/actual/ws/eval/logged/ws/asciiOn/original/hworld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
index 92ad9b7f2..8b88a0eeb 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
+ ( Labeled
+ ( LArtificial "loctest" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/actual/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged" "b/.output/actual/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
index 8ac0fea5e..d5ea6e6fc 100644
--- "a/.output/actual/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
+++ "b/.output/actual/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/actual/ws/il/optimized/from-wsa/bottles.il b/.output/actual/ws/il/optimized/from-wsa/bottles.il
index 9cbf81b80..b62c76af0 100644
--- a/.output/actual/ws/il/optimized/from-wsa/bottles.il
+++ b/.output/actual/ws/il/optimized/from-wsa/bottles.il
@@ -1,546 +1,145 @@
-[ IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP:1" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 3)
+
+Mark (MArtificial "LOOP")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+Labeled (LArtificial "printsln") Call
+SPure (Unary (UImmediate 1 Sub))
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "LOOP:1") (Branch EZ)
+Labeled (LArtificial "LOOP") Jump
+
+Mark (MArtificial "LOOP:1")
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/from-wsa/hello.il b/.output/actual/ws/il/optimized/from-wsa/hello.il
index d6ebfb03e..810994ec0 100644
--- a/.output/actual/ws/il/optimized/from-wsa/hello.il
+++ b/.output/actual/ws/il/optimized/from-wsa/hello.il
@@ -1,72 +1,29 @@
-[ IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+End
diff --git a/.output/actual/ws/il/optimized/from-wsa/hello2.il b/.output/actual/ws/il/optimized/from-wsa/hello2.il
index d98e121f2..0581fba7e 100644
--- a/.output/actual/ws/il/optimized/from-wsa/hello2.il
+++ b/.output/actual/ws/il/optimized/from-wsa/hello2.il
@@ -1,105 +1,33 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "prints") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/from-wsa/hello4.il b/.output/actual/ws/il/optimized/from-wsa/hello4.il
index 69bf91bba..b149339c6 100644
--- a/.output/actual/ws/il/optimized/from-wsa/hello4.il
+++ b/.output/actual/ws/il/optimized/from-wsa/hello4.il
@@ -1,101 +1,32 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/from-wsa/prim.il b/.output/actual/ws/il/optimized/from-wsa/prim.il
index 730749f61..079896ed6 100644
--- a/.output/actual/ws/il/optimized/from-wsa/prim.il
+++ b/.output/actual/ws/il/optimized/from-wsa/prim.il
@@ -1,423 +1,120 @@
-[ ICF
- ( Mark
- ( MArtificial "st" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 93 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 91 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_1" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_2" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Mul ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_3" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_2" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_4" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+
+Mark (MArtificial "st")
+SPure (Cons 0)
+SPure (Cons 93)
+SPure (Cons 48)
+SPure (Cons 48)
+SPure (Cons 49)
+SPure (Cons 45)
+SPure (Cons 50)
+SPure (Cons 91)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 109)
+SPure (Cons 117)
+SPure (Cons 110)
+SPure (Cons 32)
+SPure (Cons 109)
+SPure (Cons 105)
+SPure (Cons 114)
+SPure (Cons 112)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+
+Mark (MArtificial "f_start_1")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_1") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Add))
+SPure (Cons 1)
+Store
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_1") Jump
+
+Mark (MArtificial "f_finished_1")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_2")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 11 Sub))
+Labeled (LArtificial "f_finished_2") (Branch EZ)
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_3")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_3") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 2)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Cons 1)
+Load
+SPure (Cons 2)
+Load
+SPure (Binary Mul)
+SPure (Unary (UImmediate 100 Add))
+SPure (Cons 0)
+Store
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_3") Jump
+
+Mark (MArtificial "f_finished_3")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_2") Jump
+
+Mark (MArtificial "f_finished_2")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_4")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_4") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Add))
+Load
+Labeled (LArtificial "nodraw") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+
+Mark (MArtificial "nodraw")
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_4") Jump
+
+Mark (MArtificial "f_finished_4")
+SPure Discard
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/from-wsa/true.il b/.output/actual/ws/il/optimized/from-wsa/true.il
index 7f93ef7d9..528694d82 100644
--- a/.output/actual/ws/il/optimized/from-wsa/true.il
+++ b/.output/actual/ws/il/optimized/from-wsa/true.il
@@ -1 +1 @@
-[ End ]
\ No newline at end of file
+End
diff --git a/.output/actual/ws/il/optimized/original/calc.il b/.output/actual/ws/il/optimized/original/calc.il
index efc0fc485..ccee63384 100644
--- a/.output/actual/ws/il/optimized/original/calc.il
+++ b/.output/actual/ws/il/optimized/original/calc.il
@@ -1,735 +1,246 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, IAL
- ( SPure
- ( Cons 78 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 47 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 64 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 67 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "loop" )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
- )
-, ICF
- ( Mark
- ( MArtificial "progend" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 115)
+Store
+SPure (Cons 7)
+SPure (Cons 111)
+Store
+SPure (Cons 8)
+SPure (Cons 109)
+Store
+SPure (Cons 9)
+SPure (Cons 101)
+Store
+SPure (Cons 10)
+SPure (Cons 32)
+Store
+SPure (Cons 11)
+SPure (Cons 110)
+Store
+SPure (Cons 12)
+SPure (Cons 117)
+Store
+SPure (Cons 13)
+SPure (Cons 109)
+Store
+SPure (Cons 14)
+SPure (Cons 98)
+Store
+SPure (Cons 15)
+SPure (Cons 101)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 115)
+Store
+SPure (Cons 18)
+SPure (Cons 44)
+Store
+SPure (Cons 19)
+SPure (Cons 32)
+Store
+SPure (Cons 20)
+SPure (Cons 116)
+Store
+SPure (Cons 21)
+SPure (Cons 104)
+Store
+SPure (Cons 22)
+SPure (Cons 101)
+Store
+SPure (Cons 23)
+SPure (Cons 110)
+Store
+SPure (Cons 24)
+SPure (Cons 32)
+Store
+SPure (Cons 25)
+SPure (Cons 45)
+Store
+SPure (Cons 26)
+SPure (Cons 49)
+Store
+SPure (Cons 27)
+SPure (Cons 32)
+Store
+SPure (Cons 28)
+SPure (Cons 116)
+Store
+SPure (Cons 29)
+SPure (Cons 111)
+Store
+SPure (Cons 30)
+SPure (Cons 32)
+Store
+SPure (Cons 31)
+SPure (Cons 102)
+Store
+SPure (Cons 32)
+SPure (Cons 105)
+Store
+SPure (Cons 33)
+SPure (Cons 110)
+Store
+SPure (Cons 34)
+SPure (Cons 105)
+Store
+SPure (Cons 35)
+SPure (Cons 115)
+Store
+SPure (Cons 36)
+SPure (Cons 104)
+Store
+SPure (Cons 37)
+SPure (Cons 0)
+Store
+SPure (Cons 42)
+SPure (Cons 78)
+Store
+SPure (Cons 43)
+SPure (Cons 117)
+Store
+SPure (Cons 44)
+SPure (Cons 109)
+Store
+SPure (Cons 45)
+SPure (Cons 98)
+Store
+SPure (Cons 46)
+SPure (Cons 101)
+Store
+SPure (Cons 47)
+SPure (Cons 114)
+Store
+SPure (Cons 48)
+SPure (Cons 58)
+Store
+SPure (Cons 49)
+SPure (Cons 0)
+Store
+SPure (Cons 60)
+SPure (Cons 84)
+Store
+SPure (Cons 61)
+SPure (Cons 111)
+Store
+SPure (Cons 62)
+SPure (Cons 116)
+Store
+SPure (Cons 63)
+SPure (Cons 97)
+Store
+SPure (Cons 64)
+SPure (Cons 108)
+Store
+SPure (Cons 65)
+SPure (Cons 32)
+Store
+SPure (Cons 66)
+SPure (Cons 105)
+Store
+SPure (Cons 67)
+SPure (Cons 115)
+Store
+SPure (Cons 68)
+SPure (Cons 32)
+Store
+SPure (Cons 69)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+SPure (Cons 0)
+Store
+
+Mark (MArtificial "loop")
+SPure (Cons 42)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 101)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LArtificial "progend") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Binary Add)
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+Labeled (LArtificial "loop") Jump
+
+Mark (MArtificial "progend")
+SPure Discard
+SPure (Cons 60)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/count.il b/.output/actual/ws/il/optimized/original/count.il
index fbad311e4..9675b61ad 100644
--- a/.output/actual/ws/il/optimized/original/count.il
+++ b/.output/actual/ws/il/optimized/original/count.il
@@ -1,176 +1,60 @@
-[ IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MArtificial "C" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "C" )
- )
-, ICF
- ( Mark
- ( MArtificial "E" )
- )
-, IAL ( SPure Discard )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 1)
+
+Mark (MArtificial "C")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 10)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 11 Sub))
+Labeled (LArtificial "E") (Branch EZ)
+Labeled (LArtificial "C") Jump
+
+Mark (MArtificial "E")
+SPure Discard
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/fact.il b/.output/actual/ws/il/optimized/original/fact.il
index b136631b2..1d1a66a58 100644
--- a/.output/actual/ws/il/optimized/original/fact.il
+++ b/.output/actual/ws/il/optimized/original/fact.il
@@ -1,408 +1,138 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure ( Binary Mul ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "factbase" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 33)
+Store
+SPure (Cons 21)
+SPure (Cons 32)
+Store
+SPure (Cons 22)
+SPure (Cons 61)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+Labeled (LArtificial "fact") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "fact")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LArtificial "factbase") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LArtificial "fact") Call
+SPure (Binary Mul)
+Return
+
+Mark (MArtificial "factbase")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/hWorld.il b/.output/actual/ws/il/optimized/original/hWorld.il
index 65a60dd01..539715d4e 100644
--- a/.output/actual/ws/il/optimized/original/hWorld.il
+++ b/.output/actual/ws/il/optimized/original/hWorld.il
@@ -1,353 +1,120 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 72)
+Store
+SPure (Cons 1)
+SPure (Cons 101)
+Store
+SPure (Cons 2)
+SPure (Cons 108)
+Store
+SPure (Cons 3)
+SPure (Cons 108)
+Store
+SPure (Cons 4)
+SPure (Cons 111)
+Store
+SPure (Cons 5)
+SPure (Cons 44)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 119)
+Store
+SPure (Cons 8)
+SPure (Cons 111)
+Store
+SPure (Cons 9)
+SPure (Cons 114)
+Store
+SPure (Cons 10)
+SPure (Cons 108)
+Store
+SPure (Cons 11)
+SPure (Cons 100)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 111)
+Store
+SPure (Cons 14)
+SPure (Cons 102)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 115)
+Store
+SPure (Cons 17)
+SPure (Cons 112)
+Store
+SPure (Cons 18)
+SPure (Cons 97)
+Store
+SPure (Cons 19)
+SPure (Cons 99)
+Store
+SPure (Cons 20)
+SPure (Cons 101)
+Store
+SPure (Cons 21)
+SPure (Cons 115)
+Store
+SPure (Cons 22)
+SPure (Cons 33)
+Store
+SPure (Cons 23)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/hanoi.il b/.output/actual/ws/il/optimized/original/hanoi.il
index a855b81fb..21cc266fa 100644
--- a/.output/actual/ws/il/optimized/original/hanoi.il
+++ b/.output/actual/ws/il/optimized/original/hanoi.il
@@ -1,631 +1,210 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "endhanoi" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 32)
+Store
+SPure (Cons 21)
+SPure (Cons 45)
+Store
+SPure (Cons 22)
+SPure (Cons 62)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Cons 3)
+SPure (Cons 2)
+Labeled (LArtificial "hanoi") Call
+End
+
+Mark (MArtificial "hanoi")
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+Load
+Labeled (LArtificial "endhanoi") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Unary (UImmediate 1 Sub))
+SPure (Cons 101)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SPure (Cons 102)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Unary (UImmediate 1 Sub))
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+
+Mark (MArtificial "endhanoi")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/helloWorld.il b/.output/actual/ws/il/optimized/original/helloWorld.il
index a1823c1d8..ecdd99958 100644
--- a/.output/actual/ws/il/optimized/original/helloWorld.il
+++ b/.output/actual/ws/il/optimized/original/helloWorld.il
@@ -1,62 +1,25 @@
-[ IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 72)
+SIO OutputChar
+SPure (Cons 101)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+SPure (Cons 119)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 114)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 100)
+SIO OutputChar
+End
diff --git a/.output/actual/ws/il/optimized/original/locTest.il b/.output/actual/ws/il/optimized/original/locTest.il
index ed73dd5d8..ec8de2a3f 100644
--- a/.output/actual/ws/il/optimized/original/locTest.il
+++ b/.output/actual/ws/il/optimized/original/locTest.il
@@ -1,344 +1,117 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
- )
-, IAL ( SIO OutputDec )
-, End
-, ICF
- ( Mark
- ( MArtificial "loctest" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
- )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "loctest") Call
+SIO OutputDec
+End
+
+Mark (MArtificial "loctest")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 2) Copy)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 2) Slide)
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/name.il b/.output/actual/ws/il/optimized/original/name.il
index 5172c96ad..256994b54 100644
--- a/.output/actual/ws/il/optimized/original/name.il
+++ b/.output/actual/ws/il/optimized/original/name.il
@@ -1,449 +1,150 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 80 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 121 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "read" )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 80)
+Store
+SPure (Cons 1)
+SPure (Cons 108)
+Store
+SPure (Cons 2)
+SPure (Cons 101)
+Store
+SPure (Cons 3)
+SPure (Cons 97)
+Store
+SPure (Cons 4)
+SPure (Cons 115)
+Store
+SPure (Cons 5)
+SPure (Cons 101)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 101)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 116)
+Store
+SPure (Cons 10)
+SPure (Cons 101)
+Store
+SPure (Cons 11)
+SPure (Cons 114)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 121)
+Store
+SPure (Cons 14)
+SPure (Cons 111)
+Store
+SPure (Cons 15)
+SPure (Cons 117)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 32)
+Store
+SPure (Cons 18)
+SPure (Cons 110)
+Store
+SPure (Cons 19)
+SPure (Cons 97)
+Store
+SPure (Cons 20)
+SPure (Cons 109)
+Store
+SPure (Cons 21)
+SPure (Cons 101)
+Store
+SPure (Cons 22)
+SPure (Cons 58)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 30)
+SPure (Cons 72)
+Store
+SPure (Cons 31)
+SPure (Cons 101)
+Store
+SPure (Cons 32)
+SPure (Cons 108)
+Store
+SPure (Cons 33)
+SPure (Cons 108)
+Store
+SPure (Cons 34)
+SPure (Cons 111)
+Store
+SPure (Cons 35)
+SPure (Cons 32)
+Store
+SPure (Cons 36)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "read") Call
+SPure (Cons 30)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/optimized/original/truthMachine.il b/.output/actual/ws/il/optimized/original/truthMachine.il
index fa8255be1..3674303af 100644
--- a/.output/actual/ws/il/optimized/original/truthMachine.il
+++ b/.output/actual/ws/il/optimized/original/truthMachine.il
@@ -1,38 +1,15 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS ( MIO InputDec )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x1" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x0" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SIO OutputDec )
-, End
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 0)
+MIO InputDec
+Load
+Labeled (LArtificial "\NUL") (Branch EZ)
+
+Mark (MArtificial "\SOH")
+SPure (Cons 1)
+SIO OutputDec
+Labeled (LArtificial "\SOH") Jump
+
+Mark (MArtificial "\NUL")
+SPure (Cons 0)
+SIO OutputDec
+End
diff --git a/.output/actual/ws/il/parsed/from-wsa/bottles.il b/.output/actual/ws/il/parsed/from-wsa/bottles.il
index 9cbf81b80..0d4417f22 100644
--- a/.output/actual/ws/il/parsed/from-wsa/bottles.il
+++ b/.output/actual/ws/il/parsed/from-wsa/bottles.il
@@ -1,546 +1,146 @@
-[ IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP:1" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 3)
+
+Mark (MArtificial "LOOP")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "LOOP:1") (Branch EZ)
+Labeled (LArtificial "LOOP") Jump
+
+Mark (MArtificial "LOOP:1")
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/from-wsa/hello.il b/.output/actual/ws/il/parsed/from-wsa/hello.il
index d6ebfb03e..810994ec0 100644
--- a/.output/actual/ws/il/parsed/from-wsa/hello.il
+++ b/.output/actual/ws/il/parsed/from-wsa/hello.il
@@ -1,72 +1,29 @@
-[ IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+End
diff --git a/.output/actual/ws/il/parsed/from-wsa/hello2.il b/.output/actual/ws/il/parsed/from-wsa/hello2.il
index d98e121f2..0581fba7e 100644
--- a/.output/actual/ws/il/parsed/from-wsa/hello2.il
+++ b/.output/actual/ws/il/parsed/from-wsa/hello2.il
@@ -1,105 +1,33 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "prints") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/from-wsa/hello4.il b/.output/actual/ws/il/parsed/from-wsa/hello4.il
index 69bf91bba..b149339c6 100644
--- a/.output/actual/ws/il/parsed/from-wsa/hello4.il
+++ b/.output/actual/ws/il/parsed/from-wsa/hello4.il
@@ -1,101 +1,32 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/from-wsa/prim.il b/.output/actual/ws/il/parsed/from-wsa/prim.il
index 730749f61..72865a7c1 100644
--- a/.output/actual/ws/il/parsed/from-wsa/prim.il
+++ b/.output/actual/ws/il/parsed/from-wsa/prim.il
@@ -1,423 +1,131 @@
-[ ICF
- ( Mark
- ( MArtificial "st" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 93 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 91 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_1" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_2" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Mul ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_3" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_2" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_4" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+
+Mark (MArtificial "st")
+SPure (Cons 0)
+SPure (Cons 93)
+SPure (Cons 48)
+SPure (Cons 48)
+SPure (Cons 49)
+SPure (Cons 45)
+SPure (Cons 50)
+SPure (Cons 91)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 109)
+SPure (Cons 117)
+SPure (Cons 110)
+SPure (Cons 32)
+SPure (Cons 109)
+SPure (Cons 105)
+SPure (Cons 114)
+SPure (Cons 112)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+
+Mark (MArtificial "f_start_1")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_1") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Add)
+SPure (Cons 1)
+Store
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_1") Jump
+
+Mark (MArtificial "f_finished_1")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_2")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 11)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_2") (Branch EZ)
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_3")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_3") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 2)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Cons 1)
+Load
+SPure (Cons 2)
+Load
+SPure (Binary Mul)
+SPure (Cons 100)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_3") Jump
+
+Mark (MArtificial "f_finished_3")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_2") Jump
+
+Mark (MArtificial "f_finished_2")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_4")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_4") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Add)
+Load
+Labeled (LArtificial "nodraw") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+
+Mark (MArtificial "nodraw")
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_4") Jump
+
+Mark (MArtificial "f_finished_4")
+SPure Discard
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/from-wsa/true.il b/.output/actual/ws/il/parsed/from-wsa/true.il
index 7f93ef7d9..528694d82 100644
--- a/.output/actual/ws/il/parsed/from-wsa/true.il
+++ b/.output/actual/ws/il/parsed/from-wsa/true.il
@@ -1 +1 @@
-[ End ]
\ No newline at end of file
+End
diff --git a/.output/actual/ws/il/parsed/original/calc.il b/.output/actual/ws/il/parsed/original/calc.il
index efc0fc485..c8b0cdc0a 100644
--- a/.output/actual/ws/il/parsed/original/calc.il
+++ b/.output/actual/ws/il/parsed/original/calc.il
@@ -1,735 +1,251 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, IAL
- ( SPure
- ( Cons 78 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 47 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 64 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 67 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "loop" )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
- )
-, ICF
- ( Mark
- ( MArtificial "progend" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 115)
+Store
+SPure (Cons 7)
+SPure (Cons 111)
+Store
+SPure (Cons 8)
+SPure (Cons 109)
+Store
+SPure (Cons 9)
+SPure (Cons 101)
+Store
+SPure (Cons 10)
+SPure (Cons 32)
+Store
+SPure (Cons 11)
+SPure (Cons 110)
+Store
+SPure (Cons 12)
+SPure (Cons 117)
+Store
+SPure (Cons 13)
+SPure (Cons 109)
+Store
+SPure (Cons 14)
+SPure (Cons 98)
+Store
+SPure (Cons 15)
+SPure (Cons 101)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 115)
+Store
+SPure (Cons 18)
+SPure (Cons 44)
+Store
+SPure (Cons 19)
+SPure (Cons 32)
+Store
+SPure (Cons 20)
+SPure (Cons 116)
+Store
+SPure (Cons 21)
+SPure (Cons 104)
+Store
+SPure (Cons 22)
+SPure (Cons 101)
+Store
+SPure (Cons 23)
+SPure (Cons 110)
+Store
+SPure (Cons 24)
+SPure (Cons 32)
+Store
+SPure (Cons 25)
+SPure (Cons 45)
+Store
+SPure (Cons 26)
+SPure (Cons 49)
+Store
+SPure (Cons 27)
+SPure (Cons 32)
+Store
+SPure (Cons 28)
+SPure (Cons 116)
+Store
+SPure (Cons 29)
+SPure (Cons 111)
+Store
+SPure (Cons 30)
+SPure (Cons 32)
+Store
+SPure (Cons 31)
+SPure (Cons 102)
+Store
+SPure (Cons 32)
+SPure (Cons 105)
+Store
+SPure (Cons 33)
+SPure (Cons 110)
+Store
+SPure (Cons 34)
+SPure (Cons 105)
+Store
+SPure (Cons 35)
+SPure (Cons 115)
+Store
+SPure (Cons 36)
+SPure (Cons 104)
+Store
+SPure (Cons 37)
+SPure (Cons 0)
+Store
+SPure (Cons 42)
+SPure (Cons 78)
+Store
+SPure (Cons 43)
+SPure (Cons 117)
+Store
+SPure (Cons 44)
+SPure (Cons 109)
+Store
+SPure (Cons 45)
+SPure (Cons 98)
+Store
+SPure (Cons 46)
+SPure (Cons 101)
+Store
+SPure (Cons 47)
+SPure (Cons 114)
+Store
+SPure (Cons 48)
+SPure (Cons 58)
+Store
+SPure (Cons 49)
+SPure (Cons 0)
+Store
+SPure (Cons 60)
+SPure (Cons 84)
+Store
+SPure (Cons 61)
+SPure (Cons 111)
+Store
+SPure (Cons 62)
+SPure (Cons 116)
+Store
+SPure (Cons 63)
+SPure (Cons 97)
+Store
+SPure (Cons 64)
+SPure (Cons 108)
+Store
+SPure (Cons 65)
+SPure (Cons 32)
+Store
+SPure (Cons 66)
+SPure (Cons 105)
+Store
+SPure (Cons 67)
+SPure (Cons 115)
+Store
+SPure (Cons 68)
+SPure (Cons 32)
+Store
+SPure (Cons 69)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+SPure (Cons 0)
+Store
+
+Mark (MArtificial "loop")
+SPure (Cons 42)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 101)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons (-1))
+SPure (Binary Sub)
+Labeled (LArtificial "progend") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Binary Add)
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+Labeled (LArtificial "loop") Jump
+
+Mark (MArtificial "progend")
+SPure Discard
+SPure (Cons 60)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/count.il b/.output/actual/ws/il/parsed/original/count.il
index fbad311e4..92cabbb58 100644
--- a/.output/actual/ws/il/parsed/original/count.il
+++ b/.output/actual/ws/il/parsed/original/count.il
@@ -1,176 +1,66 @@
-[ IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MArtificial "C" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "C" )
- )
-, ICF
- ( Mark
- ( MArtificial "E" )
- )
-, IAL ( SPure Discard )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 1)
+
+Mark (MArtificial "C")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 11)
+SPure (Binary Sub)
+Labeled (LArtificial "E") (Branch EZ)
+Labeled (LArtificial "C") Jump
+
+Mark (MArtificial "E")
+SPure Discard
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/fact.il b/.output/actual/ws/il/parsed/original/fact.il
index 456407ef5..cfc111811 100644
--- a/.output/actual/ws/il/parsed/original/fact.il
+++ b/.output/actual/ws/il/parsed/original/fact.il
@@ -1,413 +1,146 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure ( Binary Mul ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 33)
+Store
+SPure (Cons 21)
+SPure (Cons 32)
+Store
+SPure (Cons 22)
+SPure (Cons 61)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+Labeled (LArtificial "fact") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "fact")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Binary Sub)
+Labeled (LArtificial "factbase") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Binary Sub)
+Labeled (LArtificial "fact") Call
+SPure (Binary Mul)
+Return
+
+Mark (MArtificial "factbase")
+SPure (Cons 1)
+SPure Discard
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/hWorld.il b/.output/actual/ws/il/parsed/original/hWorld.il
index 65a60dd01..39380554a 100644
--- a/.output/actual/ws/il/parsed/original/hWorld.il
+++ b/.output/actual/ws/il/parsed/original/hWorld.il
@@ -1,353 +1,124 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 72)
+Store
+SPure (Cons 1)
+SPure (Cons 101)
+Store
+SPure (Cons 2)
+SPure (Cons 108)
+Store
+SPure (Cons 3)
+SPure (Cons 108)
+Store
+SPure (Cons 4)
+SPure (Cons 111)
+Store
+SPure (Cons 5)
+SPure (Cons 44)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 119)
+Store
+SPure (Cons 8)
+SPure (Cons 111)
+Store
+SPure (Cons 9)
+SPure (Cons 114)
+Store
+SPure (Cons 10)
+SPure (Cons 108)
+Store
+SPure (Cons 11)
+SPure (Cons 100)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 111)
+Store
+SPure (Cons 14)
+SPure (Cons 102)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 115)
+Store
+SPure (Cons 17)
+SPure (Cons 112)
+Store
+SPure (Cons 18)
+SPure (Cons 97)
+Store
+SPure (Cons 19)
+SPure (Cons 99)
+Store
+SPure (Cons 20)
+SPure (Cons 101)
+Store
+SPure (Cons 21)
+SPure (Cons 115)
+Store
+SPure (Cons 22)
+SPure (Cons 33)
+Store
+SPure (Cons 23)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/hanoi.il b/.output/actual/ws/il/parsed/original/hanoi.il
index a855b81fb..0042b9aa4 100644
--- a/.output/actual/ws/il/parsed/original/hanoi.il
+++ b/.output/actual/ws/il/parsed/original/hanoi.il
@@ -1,631 +1,216 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "endhanoi" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 32)
+Store
+SPure (Cons 21)
+SPure (Cons 45)
+Store
+SPure (Cons 22)
+SPure (Cons 62)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Cons 3)
+SPure (Cons 2)
+Labeled (LArtificial "hanoi") Call
+End
+
+Mark (MArtificial "hanoi")
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+Load
+Labeled (LArtificial "endhanoi") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 101)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SPure (Cons 102)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+
+Mark (MArtificial "endhanoi")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/helloWorld.il b/.output/actual/ws/il/parsed/original/helloWorld.il
index a1823c1d8..ecdd99958 100644
--- a/.output/actual/ws/il/parsed/original/helloWorld.il
+++ b/.output/actual/ws/il/parsed/original/helloWorld.il
@@ -1,62 +1,25 @@
-[ IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 72)
+SIO OutputChar
+SPure (Cons 101)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+SPure (Cons 119)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 114)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 100)
+SIO OutputChar
+End
diff --git a/.output/actual/ws/il/parsed/original/locTest.il b/.output/actual/ws/il/parsed/original/locTest.il
index ed73dd5d8..470861ea4 100644
--- a/.output/actual/ws/il/parsed/original/locTest.il
+++ b/.output/actual/ws/il/parsed/original/locTest.il
@@ -1,344 +1,121 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
- )
-, IAL ( SIO OutputDec )
-, End
-, ICF
- ( Mark
- ( MArtificial "loctest" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
- )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "loctest") Call
+SIO OutputDec
+End
+
+Mark (MArtificial "loctest")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 2) Copy)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 2) Slide)
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/name.il b/.output/actual/ws/il/parsed/original/name.il
index 5172c96ad..ec1c152fe 100644
--- a/.output/actual/ws/il/parsed/original/name.il
+++ b/.output/actual/ws/il/parsed/original/name.il
@@ -1,449 +1,154 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 80 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 121 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "read" )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 80)
+Store
+SPure (Cons 1)
+SPure (Cons 108)
+Store
+SPure (Cons 2)
+SPure (Cons 101)
+Store
+SPure (Cons 3)
+SPure (Cons 97)
+Store
+SPure (Cons 4)
+SPure (Cons 115)
+Store
+SPure (Cons 5)
+SPure (Cons 101)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 101)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 116)
+Store
+SPure (Cons 10)
+SPure (Cons 101)
+Store
+SPure (Cons 11)
+SPure (Cons 114)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 121)
+Store
+SPure (Cons 14)
+SPure (Cons 111)
+Store
+SPure (Cons 15)
+SPure (Cons 117)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 32)
+Store
+SPure (Cons 18)
+SPure (Cons 110)
+Store
+SPure (Cons 19)
+SPure (Cons 97)
+Store
+SPure (Cons 20)
+SPure (Cons 109)
+Store
+SPure (Cons 21)
+SPure (Cons 101)
+Store
+SPure (Cons 22)
+SPure (Cons 58)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 30)
+SPure (Cons 72)
+Store
+SPure (Cons 31)
+SPure (Cons 101)
+Store
+SPure (Cons 32)
+SPure (Cons 108)
+Store
+SPure (Cons 33)
+SPure (Cons 108)
+Store
+SPure (Cons 34)
+SPure (Cons 111)
+Store
+SPure (Cons 35)
+SPure (Cons 32)
+Store
+SPure (Cons 36)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "read") Call
+SPure (Cons 30)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/actual/ws/il/parsed/original/truthMachine.il b/.output/actual/ws/il/parsed/original/truthMachine.il
index 58f623f86..2f79514c2 100644
--- a/.output/actual/ws/il/parsed/original/truthMachine.il
+++ b/.output/actual/ws/il/parsed/original/truthMachine.il
@@ -1,40 +1,15 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputDec )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x1" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x0" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SIO OutputDec )
-, End
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputDec
+Load
+Labeled (LArtificial "\NUL") (Branch EZ)
+
+Mark (MArtificial "\SOH")
+SPure (Cons 1)
+SIO OutputDec
+Labeled (LArtificial "\SOH") Jump
+
+Mark (MArtificial "\NUL")
+SPure (Cons 0)
+SIO OutputDec
+End
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact2\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
deleted file mode 100644
index 9be98ae96..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact2\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 516
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact3\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
deleted file mode 100644
index dbccf8304..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact3\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 526
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact4\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
deleted file mode 100644
index 5226ca98d..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact4\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 536
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact5\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
deleted file mode 100644
index 8ed534730..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact5\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 546
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact6\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
deleted file mode 100644
index a28ea7650..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact6\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 556
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact7\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
deleted file mode 100644
index 7db87e396..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact7\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 566
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact8\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
deleted file mode 100644
index 18745bd78..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact8\n.logged"
+++ /dev/null
@@ -1,735 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 16 )
- )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "38" )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 65 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
- , ICF
- ( Mark
- ( MNatural 66 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 181
- , returnStack = IS []
- }
- , memoryStack = fromList
- [ 576
- , 2
- ]
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
deleted file mode 100644
index 7baaa6b3a..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum0\n.logged"
+++ /dev/null
@@ -1,3 +0,0 @@
- [Undefined label 48]
-CPM.immediateInstruction
-CPM.topInstruction
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
deleted file mode 100644
index c00b305f7..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/readnum1\n.logged"
+++ /dev/null
@@ -1,3 +0,0 @@
- [Undefined label 49]
-CPM.immediateInstruction
-CPM.topInstruction
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact1\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact1\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact1\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact2\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact2\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact2\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact3\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact3\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact3\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact4\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact4\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact4\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact5\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact5\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact5\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact6\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact6\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact6\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact7\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact7\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact7\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/False/original/fact8\n.logged" "b/.output/golden/eta/eval/logged/Fast/False/original/fact8\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/False/original/fact8\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/golden/eta/eval/logged/Fast/False/original/hello2.logged b/.output/golden/eta/eval/logged/Fast/False/original/hello2.logged
deleted file mode 100644
index 38c6568e4..000000000
--- a/.output/golden/eta/eval/logged/Fast/False/original/hello2.logged
+++ /dev/null
@@ -1,190 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 33 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 72 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 22 )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "3" )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 337 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 7 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 52
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/golden/eta/eval/logged/Fast/True/original/bottles.logged b/.output/golden/eta/eval/logged/Fast/True/original/bottles.logged
deleted file mode 100644
index 6f271cdca..000000000
--- a/.output/golden/eta/eval/logged/Fast/True/original/bottles.logged
+++ /dev/null
@@ -1,964 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 155 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "1" )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "2" )
- )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SPure Halibut )
- , ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "3" )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 18828800 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "14" )
- )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
- , IAL
- ( SPure
- ( Cons 18 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 19 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 98 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 102 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754576 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 98 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL
- ( SPure
- ( Cons 25 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Cons 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 108 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754565 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Cons 104 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL
- ( SPure
- ( Cons 31 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , ICF ( Labeled Jump LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "31" )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 402523 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , IAL ( SIO InputChar )
- , IAL
- ( SPure
- ( Cons 1814 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 99 )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 34 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 36 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 117 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Cons 114 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 116 )
- )
- , IAL
- ( SPure
- ( Cons 105 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 115 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 112 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 44 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 119 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 100 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , IAL
- ( SPure
- ( Cons 110 )
- )
- , IAL
- ( SPure
- ( Cons 111 )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure
- ( Cons 101 )
- )
- , IAL
- ( SPure
- ( Cons 107 )
- )
- , IAL
- ( SPure
- ( Cons 97 )
- )
- , IAL
- ( SPure
- ( Cons 84 )
- )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Cons 43 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 45 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 254
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact1\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact1\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact1\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact2\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact2\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact2\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact3\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact3\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact3\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact4\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact4\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact4\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact5\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact5\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact5\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact6\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact6\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact6\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact7\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact7\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact7\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git "a/.output/golden/eta/eval/logged/Fast/True/original/fact8\n.logged" "b/.output/golden/eta/eval/logged/Fast/True/original/fact8\n.logged"
deleted file mode 100644
index 11c93e5ef..000000000
--- "a/.output/golden/eta/eval/logged/Fast/True/original/fact8\n.logged"
+++ /dev/null
@@ -1,750 +0,0 @@
-dump: Memory
- { memoryCM = CM
- { program =
- [ ICF
- ( Mark
- ( MNatural 1 )
- )
- , IAL
- ( SPure
- ( Cons 2 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 2 )
- )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 3 )
- )
- , IAL
- ( SPure
- ( Cons 4 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , ICF
- ( Mark
- ( MNatural 4 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
- , ICF
- ( Mark
- ( MNatural 5 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 6 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 7 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
- , ICF
- ( Mark
- ( MNatural 8 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
- , ICF
- ( Mark
- ( MNatural 9 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 10 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 11 )
- )
- , IAL
- ( SPure
- ( Cons 12 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
- , ICF
- ( Mark
- ( MNatural 12 )
- )
- , IAL
- ( SPure
- ( Cons 13 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , ICF
- ( Mark
- ( MNatural 13 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 14 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 15 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 16 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
- , ICF
- ( Mark
- ( MNatural 17 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
- , ICF
- ( Mark
- ( MNatural 18 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 19 )
- )
- , IAL
- ( SPure
- ( Cons 48 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 20 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 21 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "21" )
- )
- , IAL
- ( SPure
- ( Cons 22 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MNatural 22 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 23 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 24 )
- )
- , IAL ( SIO InputChar )
- , ICF
- ( Mark
- ( MNatural 25 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 32 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
- , ICF
- ( Mark
- ( MNatural 26 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 27 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
- , ICF
- ( Mark
- ( MNatural 28 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , ICF
- ( Mark
- ( MNatural 29 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
- , ICF
- ( Mark
- ( MNatural 30 )
- )
- , IAL ( SPure Discard )
- , ICF
- ( Mark
- ( MNatural 31 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 32 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 33 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 34 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
- , ICF
- ( Mark
- ( MNatural 35 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
- , ICF
- ( Mark
- ( MNatural 36 )
- )
- , IAL
- ( SPure
- ( Cons 10 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
- , ICF
- ( Mark
- ( MArtificial "36" )
- )
- , ICF
- ( Mark
- ( MNatural 37 )
- )
- , IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 38 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 39 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
- , ICF
- ( Mark
- ( MNatural 40 )
- )
- , IAL
- ( SPure
- ( Cons 41 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 41 )
- )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 42 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 43 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , ICF
- ( Mark
- ( MNatural 44 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 45 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 46 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 47 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
- , ICF
- ( Mark
- ( MNatural 48 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
- , ICF
- ( Mark
- ( MNatural 49 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 50 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 51 )
- )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 52 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Mark
- ( MNatural 53 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 54 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 55 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
- , ICF
- ( Mark
- ( MNatural 56 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 57 )
- )
- , IAL
- ( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF
- ( Mark
- ( MNatural 58 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 59 )
- )
- , IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
- , ICF
- ( Mark
- ( MNatural 60 )
- )
- , ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
- , ICF
- ( Mark
- ( MNatural 61 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
- , ICF
- ( Mark
- ( MNatural 62 )
- )
- , IAL ( SIO OutputChar )
- , ICF
- ( Mark
- ( MNatural 63 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
- , ICF
- ( Mark
- ( MNatural 64 )
- )
- , ICF
- ( Mark
- ( MNatural 0 )
- )
- , End
- ]
- , programCounter = 185
- , returnStack = IS []
- }
- , memoryStack = fromList []
- , memoryRAM = []
- }
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/bottles.logged b/.output/golden/eta/eval/logged/Fast/from-eas/bottles.logged
similarity index 83%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/bottles.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/bottles.logged
index 7b8165328..ce8ccd7f9 100644
--- a/.output/golden/eta/eval/logged/Fast/False/from-eas/bottles.logged
+++ b/.output/golden/eta/eval/logged/Fast/from-eas/bottles.logged
@@ -6,8 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 31 )
+ ( Labeled
+ ( LImmediate 31 ) Jump
)
, ICF
( Mark
@@ -15,8 +15,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -34,8 +34,8 @@ dump: Memory
( MNatural 4 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
)
, ICF
( Mark
@@ -43,7 +43,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 6 )
@@ -54,8 +54,8 @@ dump: Memory
( MNatural 7 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -67,8 +67,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -77,13 +77,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) ( Branch NE )
)
, ICF
( Mark
@@ -95,16 +95,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 11 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -112,8 +112,8 @@ dump: Memory
( MNatural 12 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -122,8 +122,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) Jump
)
, ICF
( Mark
@@ -151,20 +151,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -172,8 +172,8 @@ dump: Memory
( MNatural 17 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) Jump
)
, ICF
( Mark
@@ -184,14 +184,14 @@ dump: Memory
( Cons 19 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 19 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 20 )
@@ -202,8 +202,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -215,8 +215,8 @@ dump: Memory
( Cons 23 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) Jump
)
, ICF
( Mark
@@ -299,22 +299,22 @@ dump: Memory
( Cons 25 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 25 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 26 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -326,8 +326,8 @@ dump: Memory
( Cons 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 21 )
+ ( Labeled
+ ( LImmediate 21 ) Jump
)
, ICF
( Mark
@@ -394,14 +394,14 @@ dump: Memory
( Cons 30 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 30 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 31 )
@@ -416,8 +416,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -425,8 +425,8 @@ dump: Memory
( Cons 33 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -448,8 +448,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -457,8 +457,8 @@ dump: Memory
( Cons 35 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 21 )
+ ( Labeled
+ ( LImmediate 21 ) Jump
)
, ICF
( Mark
@@ -606,8 +606,8 @@ dump: Memory
( Cons 38 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -615,18 +615,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 39 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -634,8 +634,8 @@ dump: Memory
( Cons 40 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -657,21 +657,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 42 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) ( Branch NE )
)
, ICF
( Mark
@@ -683,7 +683,7 @@ dump: Memory
)
, End
]
- , programCounter = 175
+ , programCounter = 173
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/divmod.logged b/.output/golden/eta/eval/logged/Fast/from-eas/divmod.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/divmod.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/divmod.logged
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact0\n.logged" "b/.output/golden/eta/eval/logged/Fast/from-eas/fact0\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/from-eas/fact0\n.logged"
rename to ".output/golden/eta/eval/logged/Fast/from-eas/fact0\n.logged"
index 041d795f8..bb9ab5475 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact0\n.logged"
+++ "b/.output/golden/eta/eval/logged/Fast/from-eas/fact0\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact1\n.logged" "b/.output/golden/eta/eval/logged/Fast/from-eas/fact1\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/from-eas/fact1\n.logged"
rename to ".output/golden/eta/eval/logged/Fast/from-eas/fact1\n.logged"
index 9ca8b2fd7..e20f74506 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/from-eas/fact1\n.logged"
+++ "b/.output/golden/eta/eval/logged/Fast/from-eas/fact1\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact9\n.logged" "b/.output/golden/eta/eval/logged/Fast/from-eas/fact9\n.logged"
similarity index 69%
rename from ".output/golden/eta/eval/logged/Fast/False/from-eas/fact9\n.logged"
rename to ".output/golden/eta/eval/logged/Fast/from-eas/fact9\n.logged"
index af25ac312..29d095b3a 100644
--- "a/.output/golden/eta/eval/logged/Fast/False/from-eas/fact9\n.logged"
+++ "b/.output/golden/eta/eval/logged/Fast/from-eas/fact9\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -217,8 +212,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -234,8 +229,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 44 )
+ ( Labeled
+ ( LImmediate 44 ) Jump
)
, ICF
( Mark
@@ -247,8 +242,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -270,27 +265,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -298,27 +293,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -326,21 +321,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -353,16 +348,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -373,8 +363,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -383,13 +373,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) ( Branch NE )
)
, ICF
( Mark
@@ -401,16 +391,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 35 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -418,8 +408,8 @@ dump: Memory
( MNatural 36 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
+ ( Labeled
+ ( LImmediate 38 ) ( Branch NE )
)
, ICF
( Mark
@@ -428,8 +418,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -457,20 +447,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 40 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -478,8 +468,8 @@ dump: Memory
( MNatural 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 35 )
+ ( Labeled
+ ( LImmediate 35 ) Jump
)
, ICF
( Mark
@@ -490,28 +480,28 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
( MNatural 43 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -528,8 +518,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -538,8 +528,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -548,8 +538,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -557,16 +547,16 @@ dump: Memory
( MNatural 49 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
+ ( Labeled
+ ( LImmediate 51 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 50 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -574,18 +564,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 52 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -598,8 +588,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -616,8 +606,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -626,8 +616,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -635,8 +625,8 @@ dump: Memory
( MNatural 57 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 48 )
+ ( Labeled
+ ( LImmediate 48 ) Jump
)
, ICF
( Mark
@@ -644,36 +634,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 59 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 60 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -682,8 +667,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -691,8 +676,8 @@ dump: Memory
( MNatural 62 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
+ ( Labeled
+ ( LImmediate 64 ) ( Branch NE )
)
, ICF
( Mark
@@ -700,7 +685,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 64 )
@@ -711,8 +696,8 @@ dump: Memory
( MNatural 65 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 60 )
+ ( Labeled
+ ( LImmediate 60 ) Jump
)
, ICF
( Mark
@@ -724,7 +709,7 @@ dump: Memory
)
, End
]
- , programCounter = 181
+ , programCounter = 170
, returnStack = IS []
}
, memoryStack = fromList
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello.logged b/.output/golden/eta/eval/logged/Fast/from-eas/hello.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/hello.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/hello.logged
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello2.logged b/.output/golden/eta/eval/logged/Fast/from-eas/hello2.logged
similarity index 86%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/hello2.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/hello2.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/golden/eta/eval/logged/Fast/False/from-eas/hello2.logged
+++ b/.output/golden/eta/eval/logged/Fast/from-eas/hello2.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello3.logged b/.output/golden/eta/eval/logged/Fast/from-eas/hello3.logged
similarity index 86%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/hello3.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/hello3.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello3.logged
+++ b/.output/golden/eta/eval/logged/Fast/from-eas/hello3.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello4.logged b/.output/golden/eta/eval/logged/Fast/from-eas/hello4.logged
similarity index 86%
rename from .output/actual/eta/eval/logged/Fast/False/from-eas/hello4.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/hello4.logged
index 26bb6dbb5..9b5000b57 100644
--- a/.output/actual/eta/eval/logged/Fast/False/from-eas/hello4.logged
+++ b/.output/golden/eta/eval/logged/Fast/from-eas/hello4.logged
@@ -74,16 +74,16 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
( MNatural 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -91,8 +91,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -101,8 +101,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -110,8 +110,8 @@ dump: Memory
( MNatural 6 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) ( Branch NE )
)
, ICF
( Mark
@@ -119,7 +119,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 8 )
@@ -130,8 +130,8 @@ dump: Memory
( MNatural 9 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/readcharA.logged b/.output/golden/eta/eval/logged/Fast/from-eas/readcharA.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/readcharA.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/readcharA.logged
diff --git "a/.output/golden/eta/eval/logged/Fast/from-eas/readnum0\n.logged" "b/.output/golden/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
new file mode 100644
index 000000000..2454d32a4
--- /dev/null
+++ "b/.output/golden/eta/eval/logged/Fast/from-eas/readnum0\n.logged"
@@ -0,0 +1,387 @@
+ALU.move index must be less then lenght [i 1] [ll 1]
+ [i IAL (SPure (Indexed (IImmediate 1) Move))] [Automaton.nextState Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 5 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 1 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 8 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 9 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 19 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 9 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 10 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 11 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 12 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 13 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 14 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 16 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 15 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 16 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 17 )
+ )
+ , IAL ( SPure Discard )
+ , ICF
+ ( Mark
+ ( MNatural 18 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 19 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 20 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 21 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 22 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 23 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 24 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 26 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 25 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 33 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 26 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 27 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 28 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 3 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 29 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 30 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 31 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 32 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 23 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 33 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Labeled LTop ( Branch NE ) )
+ , ICF
+ ( Mark
+ ( MNatural 34 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 47
+ , returnStack = IS []
+ }
+ , memoryStack = fromList [ 0 ]
+ , memoryRAM = []
+ }]
diff --git "a/.output/golden/eta/eval/logged/Fast/from-eas/readnum1\n.logged" "b/.output/golden/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
new file mode 100644
index 000000000..f6c37e591
--- /dev/null
+++ "b/.output/golden/eta/eval/logged/Fast/from-eas/readnum1\n.logged"
@@ -0,0 +1,387 @@
+ALU.move index must be less then lenght [i 1] [ll 1]
+ [i IAL (SPure (Indexed (IImmediate 1) Move))] [Automaton.nextState Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 5 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 1 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 8 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 9 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 19 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 9 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 10 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 11 )
+ )
+ , IAL ( SIO InputChar )
+ , ICF
+ ( Mark
+ ( MNatural 12 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 13 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 14 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 16 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 15 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 17 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 16 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 17 )
+ )
+ , IAL ( SPure Discard )
+ , ICF
+ ( Mark
+ ( MNatural 18 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 19 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 20 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 21 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 22 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 23 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 24 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 26 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 25 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 33 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 26 )
+ )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 27 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 28 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 3 ) Copy
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 29 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF
+ ( Mark
+ ( MNatural 30 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 31 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 2 ) Move
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 32 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 23 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 33 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF
+ ( Labeled LTop ( Branch NE ) )
+ , ICF
+ ( Mark
+ ( MNatural 34 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 47
+ , returnStack = IS []
+ }
+ , memoryStack = fromList [ 1 ]
+ , memoryRAM = []
+ }]
diff --git a/.output/golden/eta/eval/logged/Fast/False/from-eas/true.logged b/.output/golden/eta/eval/logged/Fast/from-eas/true.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Fast/False/from-eas/true.logged
rename to .output/golden/eta/eval/logged/Fast/from-eas/true.logged
diff --git a/.output/actual/eta/eval/logged/Fast/False/original/bottles.logged b/.output/golden/eta/eval/logged/Fast/original/bottles.logged
similarity index 72%
rename from .output/actual/eta/eval/logged/Fast/False/original/bottles.logged
rename to .output/golden/eta/eval/logged/Fast/original/bottles.logged
index 6f271cdca..feb3faacb 100644
--- a/.output/actual/eta/eval/logged/Fast/False/original/bottles.logged
+++ b/.output/golden/eta/eval/logged/Fast/original/bottles.logged
@@ -6,39 +6,24 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
- , IAL ( SIO OutputChar )
- , IAL
- ( SPure
- ( Cons 155 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
( MArtificial "1" )
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Cons 2 )
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -48,8 +33,8 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
)
, IAL
( SPure
@@ -62,27 +47,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Cons 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
, ICF
( Mark
@@ -100,53 +71,27 @@ dump: Memory
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL ( SPure Halibut )
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
- , IAL ( SIO InputChar )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SIO InputChar )
- , IAL ( SIO OutputChar )
- , IAL ( SIO OutputChar )
, ICF
( Mark
( MNatural 3 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 4 ) Jump
)
, ICF
( Mark
@@ -155,12 +100,12 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL
@@ -176,8 +121,8 @@ dump: Memory
( MNatural 4 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
)
, ICF
( Mark
@@ -185,7 +130,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 6 )
@@ -196,8 +141,8 @@ dump: Memory
( MNatural 7 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -209,8 +154,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -219,13 +164,13 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
+ ( Labeled
+ ( LImmediate 11 ) ( Branch NE )
)
, ICF
( Mark
@@ -237,16 +182,16 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
- , ICF ( Labeled Jump LTop )
+ ( Labeled LTop ( Branch NE ) )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 11 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -254,8 +199,8 @@ dump: Memory
( MNatural 12 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -264,8 +209,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) Jump
)
, ICF
( Mark
@@ -293,20 +238,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,16 +259,8 @@ dump: Memory
( MNatural 17 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
- , IAL
- ( SPure
- ( Cons 18 )
- )
- , ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
+ ( Labeled
+ ( LImmediate 11 ) Jump
)
, ICF
( Mark
@@ -334,22 +271,22 @@ dump: Memory
( Cons 19 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 19 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -361,8 +298,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 8 )
+ ( Labeled
+ ( LImmediate 8 ) Jump
)
, ICF
( Mark
@@ -405,16 +342,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754576 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "23" )
+ ( Labeled
+ ( LImmediate 23 ) Jump
)
, ICF
( Mark
@@ -453,16 +382,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "24" )
+ ( Labeled
+ ( LImmediate 24 ) Jump
)
, ICF
( Mark
@@ -473,22 +394,22 @@ dump: Memory
( Cons 25 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 25 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 26 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -500,8 +421,8 @@ dump: Memory
( Cons 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 20 )
+ ( Labeled
+ ( LImmediate 20 ) Jump
)
, ICF
( Mark
@@ -536,16 +457,8 @@ dump: Memory
( Cons 101 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
- , IAL
- ( SPure
- ( Cons 2348471754565 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "29" )
+ ( Labeled
+ ( LImmediate 29 ) Jump
)
, ICF
( Mark
@@ -576,16 +489,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
- , IAL
- ( SPure
- ( Cons 335495964812 )
- )
- , ICF
- ( Labeled Jump
- ( LArtificial "30" )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -596,29 +501,14 @@ dump: Memory
( Cons 31 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
( MNatural 31 )
)
- , ICF ( Labeled Jump LTop )
- , IAL ( SIO InputChar )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL
- ( SPure
- ( Cons 0 )
- )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MArtificial "31" )
@@ -626,8 +516,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) ( Branch NE )
)
, IAL
( SPure
@@ -656,8 +546,8 @@ dump: Memory
( Cons 1814 )
)
, ICF
- ( Labeled Jump
- ( LArtificial "32" )
+ ( Labeled
+ ( LArtificial "32" ) Jump
)
, ICF
( Mark
@@ -673,8 +563,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -682,8 +572,8 @@ dump: Memory
( Cons 34 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -705,8 +595,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -714,8 +604,8 @@ dump: Memory
( Cons 36 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 20 )
+ ( Labeled
+ ( LImmediate 20 ) Jump
)
, ICF
( Mark
@@ -879,8 +769,8 @@ dump: Memory
( Cons 43 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -888,18 +778,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 44 )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -907,8 +797,8 @@ dump: Memory
( Cons 45 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 26 )
+ ( Labeled
+ ( LImmediate 26 ) Jump
)
, ICF
( Mark
@@ -930,21 +820,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) ( Branch NE )
)
, ICF
( Mark
@@ -956,7 +846,7 @@ dump: Memory
)
, End
]
- , programCounter = 254
+ , programCounter = 222
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/eta/eval/logged/Fast/False/original/crlf.logged b/.output/golden/eta/eval/logged/Fast/original/crlf.logged
similarity index 90%
rename from .output/actual/eta/eval/logged/Fast/False/original/crlf.logged
rename to .output/golden/eta/eval/logged/Fast/original/crlf.logged
index b1aecee70..a5db7af96 100644
--- a/.output/actual/eta/eval/logged/Fast/False/original/crlf.logged
+++ b/.output/golden/eta/eval/logged/Fast/original/crlf.logged
@@ -6,8 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 3 )
+ ( Labeled
+ ( LImmediate 3 ) Jump
)
, ICF
( Mark
@@ -39,8 +39,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -62,8 +62,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -95,8 +95,8 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
diff --git "a/.output/actual/eta/eval/logged/Fast/True/original/fact1\n.logged" "b/.output/golden/eta/eval/logged/Fast/original/fact1\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/True/original/fact1\n.logged"
rename to ".output/golden/eta/eval/logged/Fast/original/fact1\n.logged"
index 11c93e5ef..624e498d1 100644
--- "a/.output/actual/eta/eval/logged/Fast/True/original/fact1\n.logged"
+++ "b/.output/golden/eta/eval/logged/Fast/original/fact1\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -209,18 +204,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 48 )
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -236,21 +231,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -269,10 +251,10 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -291,8 +273,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,27 +296,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -342,27 +324,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -370,21 +352,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -397,16 +379,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -417,8 +394,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -427,8 +404,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -436,8 +413,8 @@ dump: Memory
( MNatural 34 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
+ ( Labeled
+ ( LImmediate 36 ) ( Branch NE )
)
, ICF
( Mark
@@ -446,8 +423,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 40 )
+ ( Labeled
+ ( LImmediate 40 ) Jump
)
, ICF
( Mark
@@ -475,20 +452,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 38 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -496,8 +473,8 @@ dump: Memory
( MNatural 39 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) Jump
)
, ICF
( Mark
@@ -508,28 +485,28 @@ dump: Memory
( Cons 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
( MNatural 41 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 42 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -546,8 +523,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -556,8 +533,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -566,8 +543,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -575,16 +552,16 @@ dump: Memory
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
+ ( Labeled
+ ( LImmediate 49 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 48 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 56 )
+ ( Labeled
+ ( LImmediate 56 ) Jump
)
, ICF
( Mark
@@ -592,18 +569,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 50 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -616,8 +593,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -634,8 +611,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -644,8 +621,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -653,8 +630,8 @@ dump: Memory
( MNatural 55 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 46 )
+ ( Labeled
+ ( LImmediate 46 ) Jump
)
, ICF
( Mark
@@ -662,36 +639,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 57 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 58 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -700,8 +672,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -709,8 +681,8 @@ dump: Memory
( MNatural 60 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
+ ( Labeled
+ ( LImmediate 62 ) ( Branch NE )
)
, ICF
( Mark
@@ -718,7 +690,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 62 )
@@ -729,8 +701,8 @@ dump: Memory
( MNatural 63 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -742,7 +714,7 @@ dump: Memory
)
, End
]
- , programCounter = 185
+ , programCounter = 169
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/actual/eta/eval/logged/Fast/False/original/fact2\n.logged" "b/.output/golden/eta/eval/logged/Fast/original/fact9\n.logged"
similarity index 69%
rename from ".output/actual/eta/eval/logged/Fast/False/original/fact2\n.logged"
rename to ".output/golden/eta/eval/logged/Fast/original/fact9\n.logged"
index 11c93e5ef..624e498d1 100644
--- "a/.output/actual/eta/eval/logged/Fast/False/original/fact2\n.logged"
+++ "b/.output/golden/eta/eval/logged/Fast/original/fact9\n.logged"
@@ -10,8 +10,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) Jump
)
, ICF
( Mark
@@ -22,8 +22,8 @@ dump: Memory
( Cons 3 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -34,8 +34,8 @@ dump: Memory
( Cons 4 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 32 )
+ ( Labeled
+ ( LImmediate 32 ) Jump
)
, ICF
( Mark
@@ -47,8 +47,8 @@ dump: Memory
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LImmediate 0 )
+ ( Labeled
+ ( LImmediate 0 ) Jump
)
, ICF
( Mark
@@ -56,8 +56,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -66,8 +66,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -76,21 +76,21 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
+ ( Labeled
+ ( LImmediate 9 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 8 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 13 )
+ ( Labeled
+ ( LImmediate 13 ) Jump
)
, ICF
( Mark
@@ -98,8 +98,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -108,10 +108,10 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 11 )
@@ -121,8 +121,8 @@ dump: Memory
( Cons 12 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 5 )
+ ( Labeled
+ ( LImmediate 5 ) Jump
)
, ICF
( Mark
@@ -133,8 +133,8 @@ dump: Memory
( Cons 13 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -142,16 +142,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 14 )
@@ -163,31 +158,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 16 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
+ ( Labeled
+ ( LImmediate 18 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 17 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
+ ( Labeled
+ ( LImmediate 14 ) ( Branch NE )
)
, ICF
( Mark
@@ -199,8 +194,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -209,18 +204,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 48 )
+ ( Unary
+ ( UImmediate 48 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 20 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -236,21 +231,8 @@ dump: Memory
( Cons 22 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
- , IAL
- ( SPure ( Binary Sub ) )
- , ICF
- ( Labeled ( Branch NE ) LTop )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 42 ) Jump
)
, ICF
( Mark
@@ -269,10 +251,10 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -291,8 +273,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -314,27 +296,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 32 )
+ ( Unary
+ ( UImmediate 32 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
+ ( Labeled
+ ( LImmediate 27 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 26 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -342,27 +324,27 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
+ ( Labeled
+ ( LImmediate 29 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 28 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 30 )
+ ( Labeled
+ ( LImmediate 30 ) Jump
)
, ICF
( Mark
@@ -370,21 +352,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
+ ( Labeled
+ ( LImmediate 19 ) ( Branch NE )
)
, ICF
( Mark
@@ -397,16 +379,11 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 32 )
@@ -417,8 +394,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -427,8 +404,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -436,8 +413,8 @@ dump: Memory
( MNatural 34 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
+ ( Labeled
+ ( LImmediate 36 ) ( Branch NE )
)
, ICF
( Mark
@@ -446,8 +423,8 @@ dump: Memory
, IAL
( SPure ( Binary Sub ) )
, ICF
- ( Labeled Jump
- ( LImmediate 40 )
+ ( Labeled
+ ( LImmediate 40 ) Jump
)
, ICF
( Mark
@@ -475,20 +452,20 @@ dump: Memory
)
, IAL
( SPure
- ( Cons
- ( -48 )
+ ( Unary
+ ( UImmediate
+ ( -48 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 38 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -496,8 +473,8 @@ dump: Memory
( MNatural 39 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 33 )
+ ( Labeled
+ ( LImmediate 33 ) Jump
)
, ICF
( Mark
@@ -508,28 +485,28 @@ dump: Memory
( Cons 41 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
( MNatural 41 )
)
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 42 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -546,8 +523,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -556,8 +533,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -566,8 +543,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -575,16 +552,16 @@ dump: Memory
( MNatural 47 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
+ ( Labeled
+ ( LImmediate 49 ) ( Branch NE )
)
, ICF
( Mark
( MNatural 48 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 56 )
+ ( Labeled
+ ( LImmediate 56 ) Jump
)
, ICF
( Mark
@@ -592,18 +569,18 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
( Mark
( MNatural 50 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -616,8 +593,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
+ ( Indexed
+ ( IImmediate 3 ) Copy
)
)
, ICF
@@ -634,8 +611,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -644,8 +621,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
, ICF
@@ -653,8 +630,8 @@ dump: Memory
( MNatural 55 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 46 )
+ ( Labeled
+ ( LImmediate 46 ) Jump
)
, ICF
( Mark
@@ -662,36 +639,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
( Mark
( MNatural 57 )
)
, IAL
( SPure
- ( Cons 1 )
- )
- , IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
- , ICF
- ( Labeled ( Branch NE ) LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 58 )
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ICF
@@ -700,8 +672,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
@@ -709,8 +681,8 @@ dump: Memory
( MNatural 60 )
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
+ ( Labeled
+ ( LImmediate 62 ) ( Branch NE )
)
, ICF
( Mark
@@ -718,7 +690,7 @@ dump: Memory
)
, IAL
( SPure ( Binary Sub ) )
- , ICF ( Labeled Jump LTop )
+ , ICF ( Labeled LTop Jump )
, ICF
( Mark
( MNatural 62 )
@@ -729,8 +701,8 @@ dump: Memory
( MNatural 63 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 58 )
+ ( Labeled
+ ( LImmediate 58 ) Jump
)
, ICF
( Mark
@@ -742,7 +714,7 @@ dump: Memory
)
, End
]
- , programCounter = 185
+ , programCounter = 169
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/actual/eta/eval/logged/Fast/False/original/hello.logged b/.output/golden/eta/eval/logged/Fast/original/hello.logged
similarity index 87%
rename from .output/actual/eta/eval/logged/Fast/False/original/hello.logged
rename to .output/golden/eta/eval/logged/Fast/original/hello.logged
index 93f69c654..44fc3aea1 100644
--- a/.output/actual/eta/eval/logged/Fast/False/original/hello.logged
+++ b/.output/golden/eta/eval/logged/Fast/original/hello.logged
@@ -6,17 +6,8 @@ dump: Memory
( MNatural 1 )
)
, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
- , IAL ( SPure Halibut )
- , IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
+ ( Labeled
+ ( LImmediate 2 ) Jump
)
, ICF
( Mark
@@ -32,16 +23,16 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Cons 2 )
)
, IAL ( SIO InputChar )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure
( Binaries
@@ -51,8 +42,8 @@ dump: Memory
)
)
, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
)
, IAL
( SPure
@@ -84,15 +75,15 @@ dump: Memory
( Cons 111 )
)
, ICF
- ( Labeled Jump
- ( LArtificial "5" )
+ ( Labeled
+ ( LArtificial "5" ) Jump
)
, ICF
( Mark
( MNatural 5 )
)
, ICF
- ( Labeled ( Branch NE ) LTop )
+ ( Labeled LTop ( Branch NE ) )
, IAL
( SPure ( Binary Sub ) )
, IAL
@@ -203,7 +194,7 @@ dump: Memory
)
, End
]
- , programCounter = 63
+ , programCounter = 61
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/eta/eval/logged/Fast/original/hello2.logged b/.output/golden/eta/eval/logged/Fast/original/hello2.logged
new file mode 100644
index 000000000..bdbd3a91f
--- /dev/null
+++ b/.output/golden/eta/eval/logged/Fast/original/hello2.logged
@@ -0,0 +1,154 @@
+dump: Memory
+ { memoryCM = CM
+ { program =
+ [ ICF
+ ( Mark
+ ( MNatural 1 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 0 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 10 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 33 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 100 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 114 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 111 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 119 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 32 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 2 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 44 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 111 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 108 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 101 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 72 )
+ )
+ , IAL
+ ( SPure
+ ( Cons 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 3 )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 0 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MArtificial "3" )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) ( Branch NE )
+ )
+ , IAL ( SIO InputChar )
+ , IAL
+ ( SPure
+ ( Unary
+ ( UImmediate 337 Sub )
+ )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 4 )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 1 ) Move
+ )
+ )
+ , IAL
+ ( SPure
+ ( Indexed
+ ( IImmediate 0 ) Copy
+ )
+ )
+ , ICF
+ ( Labeled
+ ( LImmediate 6 ) ( Branch NE )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 5 )
+ )
+ , IAL
+ ( SPure ( Binary Sub ) )
+ , ICF ( Labeled LTop Jump )
+ , ICF
+ ( Mark
+ ( MNatural 6 )
+ )
+ , IAL ( SIO OutputChar )
+ , ICF
+ ( Labeled
+ ( LImmediate 4 ) Jump
+ )
+ , ICF
+ ( Mark
+ ( MNatural 7 )
+ )
+ , ICF
+ ( Mark
+ ( MNatural 0 )
+ )
+ , End
+ ]
+ , programCounter = 38
+ , returnStack = IS []
+ }
+ , memoryStack = fromList []
+ , memoryRAM = []
+ }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/bottles.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/bottles.logged
deleted file mode 100644
index da0f86435..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/bottles.logged
+++ /dev/null
@@ -1,613 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , T
- , E
- , N
- , I
- , O
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , A
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , T
- , I
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , R
- , N
- , T
- , E
- , H
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , I
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , H
- , H
- , E
- , N
- , I
- , I
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , A
- , N
- , T
- , E
- , N
- , O
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , H
- , S
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , O
- , E
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , N
- , E
- , T
- , R
- , N
- , S
- , A
- , E
- , O
- , N
- , I
- , I
- , E
- , O
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , R
- , N
- , E
- , N
- , T
- , O
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , A
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , I
- , E
- , N
- , A
- , T
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , A
- , A
- , O
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , A
- , A
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , N
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , I
- , I
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , A
- , T
- , A
- , E
- , N
- , T
- , S
- , S
- , E
- , N
- , T
- , N
- , H
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , E
- , H
- , A
- , N
- , T
- , E
- , N
- , O
- , N
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , N
- , T
- , O
- , E
- , O
- , O
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , E
- , T
- , R
- ]
- , programCounter = 605
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/divmod.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/divmod.logged
deleted file mode 100644
index 92245a505..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/divmod.logged
+++ /dev/null
@@ -1,19 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , A
- , E
- , N
- , T
- , E
- , E
- , R
- ]
- , programCounter = 8
- }
- , memoryStack = fromList
- [ 0
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact0\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
deleted file mode 100644
index 7395d6bd1..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact0\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 496
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact1\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
deleted file mode 100644
index b6805b878..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact1\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 506
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact2\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
deleted file mode 100644
index 136455bf3..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact2\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 516
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact3\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
deleted file mode 100644
index 405114a84..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact3\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 526
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact4\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
deleted file mode 100644
index 43f73ed08..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact4\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 536
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact5\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
deleted file mode 100644
index e448ca0b3..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact5\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 546
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact6\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
deleted file mode 100644
index f50a339f9..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact6\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 556
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact7\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
deleted file mode 100644
index 8575dbb00..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact7\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 566
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact8\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
deleted file mode 100644
index 0d753cd45..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact8\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 576
- , 2
- ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact9\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
deleted file mode 100644
index 485fc474a..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/fact9\n.logged"
+++ /dev/null
@@ -1,533 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ A
- , N
- , T
- , E
- , N
- , A
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , I
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , O
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , S
- , E
- , T
- , R
- , N
- , E
- , H
- , R
- , N
- , T
- , E
- , S
- , R
- , A
- , N
- , T
- , E
- , N
- , N
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , S
- , A
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , O
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , I
- , T
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , A
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , E
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , S
- , S
- , E
- , O
- , T
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , S
- , H
- , E
- , T
- , R
- , N
- , T
- , O
- , E
- , E
- , R
- , N
- , E
- , N
- , S
- , S
- , E
- , S
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , N
- , H
- , E
- , T
- , R
- , A
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , S
- , S
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , T
- , T
- , I
- , E
- , T
- , R
- ]
- , programCounter = 269
- }
- , memoryStack = fromList
- [ 586
- , 2
- ]
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/hello.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/hello.logged
deleted file mode 100644
index 090d6eb28..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/hello.logged
+++ /dev/null
@@ -1,94 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , I
- , I
- , E
- , R
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , O
- , O
- , O
- , O
- , O
- , O
- , O
- , R
- , N
- , T
- , O
- , E
- , R
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , R
- , O
- , O
- , O
- , O
- , O
- , O
- , O
- , R
- ]
- , programCounter = 86
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/hello2.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/hello2.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/hello2.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/hello3.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/hello3.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/hello3.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/hello4.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/hello4.logged
deleted file mode 100644
index 0e9847351..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/hello4.logged
+++ /dev/null
@@ -1,132 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ N
- , E
- , N
- , T
- , O
- , E
- , N
- , I
- , N
- , E
- , N
- , A
- , H
- , A
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , A
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , O
- , H
- , E
- , N
- , I
- , I
- , E
- , N
- , S
- , A
- , E
- , N
- , A
- , T
- , S
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , T
- , O
- , E
- , N
- , A
- , H
- , O
- , E
- , N
- , T
- , O
- , A
- , E
- , R
- , A
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , S
- , N
- , T
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , O
- , R
- , N
- , T
- , E
- , N
- , I
- , E
- , T
- , R
- ]
- , programCounter = 84
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/readcharA.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/readcharA.logged
deleted file mode 100644
index ebc722be7..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/readcharA.logged
+++ /dev/null
@@ -1,10 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- ]
- , programCounter = 2
- }
- , memoryStack = fromList [ 65 ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/readnum0\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
deleted file mode 100644
index b0248cef7..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/readnum0\n.logged"
+++ /dev/null
@@ -1,268 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , A
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , S
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , O
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- ]
- , programCounter = 157
- }
- , memoryStack = fromList [ 496 ]
- }
diff --git "a/.output/golden/eta/eval/logged/Original/False/from-eas/readnum1\n.logged" "b/.output/golden/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
deleted file mode 100644
index c7a26d08a..000000000
--- "a/.output/golden/eta/eval/logged/Original/False/from-eas/readnum1\n.logged"
+++ /dev/null
@@ -1,268 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program =
- [ I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , T
- , N
- , T
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , N
- , S
- , S
- , E
- , N
- , I
- , I
- , E
- , S
- , R
- , N
- , T
- , E
- , H
- , R
- , N
- , T
- , O
- , E
- , A
- , N
- , T
- , E
- , N
- , A
- , N
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , R
- , S
- , S
- , R
- , I
- , R
- , N
- , E
- , H
- , N
- , I
- , I
- , E
- , S
- , N
- , A
- , H
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , T
- , O
- , E
- , S
- , N
- , A
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , O
- , E
- , T
- , R
- , N
- , E
- , H
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , N
- , S
- , E
- , T
- , R
- , N
- , E
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- , N
- , A
- , E
- , H
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , H
- , R
- , A
- , N
- , E
- , N
- , T
- , E
- , S
- , S
- , T
- , R
- , N
- , T
- , E
- , N
- , I
- , N
- , E
- , T
- , R
- , N
- , T
- , E
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , E
- , N
- , E
- , N
- , O
- , E
- , S
- , H
- , R
- , S
- , S
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , A
- , E
- , H
- , R
- , N
- , T
- , E
- , N
- , O
- , A
- , E
- , T
- , R
- , N
- , T
- , E
- , H
- , T
- , R
- , N
- , T
- , E
- , N
- , A
- , E
- , H
- , T
- , R
- ]
- , programCounter = 157
- }
- , memoryStack = fromList [ 506 ]
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/from-eas/true.logged b/.output/golden/eta/eval/logged/Original/False/from-eas/true.logged
deleted file mode 100644
index b025006e9..000000000
--- a/.output/golden/eta/eval/logged/Original/False/from-eas/true.logged
+++ /dev/null
@@ -1,7 +0,0 @@
-dump: Memory
- { memoryIM = IM
- { program = []
- , programCounter = 0
- }
- , memoryStack = fromList []
- }
diff --git a/.output/golden/eta/eval/logged/Original/False/original/crlf.logged b/.output/golden/eta/eval/logged/Original/original/crlf.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Original/False/original/crlf.logged
rename to .output/golden/eta/eval/logged/Original/original/crlf.logged
diff --git a/.output/golden/eta/eval/logged/Original/False/original/hello.logged b/.output/golden/eta/eval/logged/Original/original/hello.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Original/False/original/hello.logged
rename to .output/golden/eta/eval/logged/Original/original/hello.logged
diff --git a/.output/golden/eta/eval/logged/Original/False/original/hello2.logged b/.output/golden/eta/eval/logged/Original/original/hello2.logged
similarity index 100%
rename from .output/golden/eta/eval/logged/Original/False/original/hello2.logged
rename to .output/golden/eta/eval/logged/Original/original/hello2.logged
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/bottles.output b/.output/golden/eta/eval/output/Fast/False/from-eas/bottles.output
deleted file mode 100644
index 6d9316acf..000000000
--- a/.output/golden/eta/eval/output/Fast/False/from-eas/bottles.output
+++ /dev/null
@@ -1,12 +0,0 @@
-3 bottles of beer on the wall, 3 bottles of beer
-Take one down, pass it around
-2 bottles of beer on the wall
-
-2 bottles of beer on the wall, 2 bottles of beer
-Take one down, pass it around
-1 bottles of beer on the wall
-
-1 bottles of beer on the wall, 1 bottles of beer
-Take one down, pass it around
-0 bottles of beer on the wall
-
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/divmod.output b/.output/golden/eta/eval/output/Fast/False/from-eas/divmod.output
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact0\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact0\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact1\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact1\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact2\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact2\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact3\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact3\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact4\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact4\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact5\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact5\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact6\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact6\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact7\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact7\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact8\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact8\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/fact9\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/fact9\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/hello3.output b/.output/golden/eta/eval/output/Fast/False/from-eas/hello3.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Fast/False/from-eas/hello3.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/hello4.output b/.output/golden/eta/eval/output/Fast/False/from-eas/hello4.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Fast/False/from-eas/hello4.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/readcharA.output b/.output/golden/eta/eval/output/Fast/False/from-eas/readcharA.output
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/readnum0\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/readnum0\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Fast/False/from-eas/readnum1\n.output" "b/.output/golden/eta/eval/output/Fast/False/from-eas/readnum1\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/true.output b/.output/golden/eta/eval/output/Fast/False/from-eas/true.output
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Fast/False/original/bottles.output b/.output/golden/eta/eval/output/Fast/False/original/bottles.output
deleted file mode 100644
index 9fa0b1d3c..000000000
--- a/.output/golden/eta/eval/output/Fast/False/original/bottles.output
+++ /dev/null
@@ -1,396 +0,0 @@
-99 bottles of beer on the wall, 99 bottles of beer
-Take one down, pass it around
-98 bottles of beer on the wall
-
-98 bottles of beer on the wall, 98 bottles of beer
-Take one down, pass it around
-97 bottles of beer on the wall
-
-97 bottles of beer on the wall, 97 bottles of beer
-Take one down, pass it around
-96 bottles of beer on the wall
-
-96 bottles of beer on the wall, 96 bottles of beer
-Take one down, pass it around
-95 bottles of beer on the wall
-
-95 bottles of beer on the wall, 95 bottles of beer
-Take one down, pass it around
-94 bottles of beer on the wall
-
-94 bottles of beer on the wall, 94 bottles of beer
-Take one down, pass it around
-93 bottles of beer on the wall
-
-93 bottles of beer on the wall, 93 bottles of beer
-Take one down, pass it around
-92 bottles of beer on the wall
-
-92 bottles of beer on the wall, 92 bottles of beer
-Take one down, pass it around
-91 bottles of beer on the wall
-
-91 bottles of beer on the wall, 91 bottles of beer
-Take one down, pass it around
-90 bottles of beer on the wall
-
-90 bottles of beer on the wall, 90 bottles of beer
-Take one down, pass it around
-89 bottles of beer on the wall
-
-89 bottles of beer on the wall, 89 bottles of beer
-Take one down, pass it around
-88 bottles of beer on the wall
-
-88 bottles of beer on the wall, 88 bottles of beer
-Take one down, pass it around
-87 bottles of beer on the wall
-
-87 bottles of beer on the wall, 87 bottles of beer
-Take one down, pass it around
-86 bottles of beer on the wall
-
-86 bottles of beer on the wall, 86 bottles of beer
-Take one down, pass it around
-85 bottles of beer on the wall
-
-85 bottles of beer on the wall, 85 bottles of beer
-Take one down, pass it around
-84 bottles of beer on the wall
-
-84 bottles of beer on the wall, 84 bottles of beer
-Take one down, pass it around
-83 bottles of beer on the wall
-
-83 bottles of beer on the wall, 83 bottles of beer
-Take one down, pass it around
-82 bottles of beer on the wall
-
-82 bottles of beer on the wall, 82 bottles of beer
-Take one down, pass it around
-81 bottles of beer on the wall
-
-81 bottles of beer on the wall, 81 bottles of beer
-Take one down, pass it around
-80 bottles of beer on the wall
-
-80 bottles of beer on the wall, 80 bottles of beer
-Take one down, pass it around
-79 bottles of beer on the wall
-
-79 bottles of beer on the wall, 79 bottles of beer
-Take one down, pass it around
-78 bottles of beer on the wall
-
-78 bottles of beer on the wall, 78 bottles of beer
-Take one down, pass it around
-77 bottles of beer on the wall
-
-77 bottles of beer on the wall, 77 bottles of beer
-Take one down, pass it around
-76 bottles of beer on the wall
-
-76 bottles of beer on the wall, 76 bottles of beer
-Take one down, pass it around
-75 bottles of beer on the wall
-
-75 bottles of beer on the wall, 75 bottles of beer
-Take one down, pass it around
-74 bottles of beer on the wall
-
-74 bottles of beer on the wall, 74 bottles of beer
-Take one down, pass it around
-73 bottles of beer on the wall
-
-73 bottles of beer on the wall, 73 bottles of beer
-Take one down, pass it around
-72 bottles of beer on the wall
-
-72 bottles of beer on the wall, 72 bottles of beer
-Take one down, pass it around
-71 bottles of beer on the wall
-
-71 bottles of beer on the wall, 71 bottles of beer
-Take one down, pass it around
-70 bottles of beer on the wall
-
-70 bottles of beer on the wall, 70 bottles of beer
-Take one down, pass it around
-69 bottles of beer on the wall
-
-69 bottles of beer on the wall, 69 bottles of beer
-Take one down, pass it around
-68 bottles of beer on the wall
-
-68 bottles of beer on the wall, 68 bottles of beer
-Take one down, pass it around
-67 bottles of beer on the wall
-
-67 bottles of beer on the wall, 67 bottles of beer
-Take one down, pass it around
-66 bottles of beer on the wall
-
-66 bottles of beer on the wall, 66 bottles of beer
-Take one down, pass it around
-65 bottles of beer on the wall
-
-65 bottles of beer on the wall, 65 bottles of beer
-Take one down, pass it around
-64 bottles of beer on the wall
-
-64 bottles of beer on the wall, 64 bottles of beer
-Take one down, pass it around
-63 bottles of beer on the wall
-
-63 bottles of beer on the wall, 63 bottles of beer
-Take one down, pass it around
-62 bottles of beer on the wall
-
-62 bottles of beer on the wall, 62 bottles of beer
-Take one down, pass it around
-61 bottles of beer on the wall
-
-61 bottles of beer on the wall, 61 bottles of beer
-Take one down, pass it around
-60 bottles of beer on the wall
-
-60 bottles of beer on the wall, 60 bottles of beer
-Take one down, pass it around
-59 bottles of beer on the wall
-
-59 bottles of beer on the wall, 59 bottles of beer
-Take one down, pass it around
-58 bottles of beer on the wall
-
-58 bottles of beer on the wall, 58 bottles of beer
-Take one down, pass it around
-57 bottles of beer on the wall
-
-57 bottles of beer on the wall, 57 bottles of beer
-Take one down, pass it around
-56 bottles of beer on the wall
-
-56 bottles of beer on the wall, 56 bottles of beer
-Take one down, pass it around
-55 bottles of beer on the wall
-
-55 bottles of beer on the wall, 55 bottles of beer
-Take one down, pass it around
-54 bottles of beer on the wall
-
-54 bottles of beer on the wall, 54 bottles of beer
-Take one down, pass it around
-53 bottles of beer on the wall
-
-53 bottles of beer on the wall, 53 bottles of beer
-Take one down, pass it around
-52 bottles of beer on the wall
-
-52 bottles of beer on the wall, 52 bottles of beer
-Take one down, pass it around
-51 bottles of beer on the wall
-
-51 bottles of beer on the wall, 51 bottles of beer
-Take one down, pass it around
-50 bottles of beer on the wall
-
-50 bottles of beer on the wall, 50 bottles of beer
-Take one down, pass it around
-49 bottles of beer on the wall
-
-49 bottles of beer on the wall, 49 bottles of beer
-Take one down, pass it around
-48 bottles of beer on the wall
-
-48 bottles of beer on the wall, 48 bottles of beer
-Take one down, pass it around
-47 bottles of beer on the wall
-
-47 bottles of beer on the wall, 47 bottles of beer
-Take one down, pass it around
-46 bottles of beer on the wall
-
-46 bottles of beer on the wall, 46 bottles of beer
-Take one down, pass it around
-45 bottles of beer on the wall
-
-45 bottles of beer on the wall, 45 bottles of beer
-Take one down, pass it around
-44 bottles of beer on the wall
-
-44 bottles of beer on the wall, 44 bottles of beer
-Take one down, pass it around
-43 bottles of beer on the wall
-
-43 bottles of beer on the wall, 43 bottles of beer
-Take one down, pass it around
-42 bottles of beer on the wall
-
-42 bottles of beer on the wall, 42 bottles of beer
-Take one down, pass it around
-41 bottles of beer on the wall
-
-41 bottles of beer on the wall, 41 bottles of beer
-Take one down, pass it around
-40 bottles of beer on the wall
-
-40 bottles of beer on the wall, 40 bottles of beer
-Take one down, pass it around
-39 bottles of beer on the wall
-
-39 bottles of beer on the wall, 39 bottles of beer
-Take one down, pass it around
-38 bottles of beer on the wall
-
-38 bottles of beer on the wall, 38 bottles of beer
-Take one down, pass it around
-37 bottles of beer on the wall
-
-37 bottles of beer on the wall, 37 bottles of beer
-Take one down, pass it around
-36 bottles of beer on the wall
-
-36 bottles of beer on the wall, 36 bottles of beer
-Take one down, pass it around
-35 bottles of beer on the wall
-
-35 bottles of beer on the wall, 35 bottles of beer
-Take one down, pass it around
-34 bottles of beer on the wall
-
-34 bottles of beer on the wall, 34 bottles of beer
-Take one down, pass it around
-33 bottles of beer on the wall
-
-33 bottles of beer on the wall, 33 bottles of beer
-Take one down, pass it around
-32 bottles of beer on the wall
-
-32 bottles of beer on the wall, 32 bottles of beer
-Take one down, pass it around
-31 bottles of beer on the wall
-
-31 bottles of beer on the wall, 31 bottles of beer
-Take one down, pass it around
-30 bottles of beer on the wall
-
-30 bottles of beer on the wall, 30 bottles of beer
-Take one down, pass it around
-29 bottles of beer on the wall
-
-29 bottles of beer on the wall, 29 bottles of beer
-Take one down, pass it around
-28 bottles of beer on the wall
-
-28 bottles of beer on the wall, 28 bottles of beer
-Take one down, pass it around
-27 bottles of beer on the wall
-
-27 bottles of beer on the wall, 27 bottles of beer
-Take one down, pass it around
-26 bottles of beer on the wall
-
-26 bottles of beer on the wall, 26 bottles of beer
-Take one down, pass it around
-25 bottles of beer on the wall
-
-25 bottles of beer on the wall, 25 bottles of beer
-Take one down, pass it around
-24 bottles of beer on the wall
-
-24 bottles of beer on the wall, 24 bottles of beer
-Take one down, pass it around
-23 bottles of beer on the wall
-
-23 bottles of beer on the wall, 23 bottles of beer
-Take one down, pass it around
-22 bottles of beer on the wall
-
-22 bottles of beer on the wall, 22 bottles of beer
-Take one down, pass it around
-21 bottles of beer on the wall
-
-21 bottles of beer on the wall, 21 bottles of beer
-Take one down, pass it around
-20 bottles of beer on the wall
-
-20 bottles of beer on the wall, 20 bottles of beer
-Take one down, pass it around
-19 bottles of beer on the wall
-
-19 bottles of beer on the wall, 19 bottles of beer
-Take one down, pass it around
-18 bottles of beer on the wall
-
-18 bottles of beer on the wall, 18 bottles of beer
-Take one down, pass it around
-17 bottles of beer on the wall
-
-17 bottles of beer on the wall, 17 bottles of beer
-Take one down, pass it around
-16 bottles of beer on the wall
-
-16 bottles of beer on the wall, 16 bottles of beer
-Take one down, pass it around
-15 bottles of beer on the wall
-
-15 bottles of beer on the wall, 15 bottles of beer
-Take one down, pass it around
-14 bottles of beer on the wall
-
-14 bottles of beer on the wall, 14 bottles of beer
-Take one down, pass it around
-13 bottles of beer on the wall
-
-13 bottles of beer on the wall, 13 bottles of beer
-Take one down, pass it around
-12 bottles of beer on the wall
-
-12 bottles of beer on the wall, 12 bottles of beer
-Take one down, pass it around
-11 bottles of beer on the wall
-
-11 bottles of beer on the wall, 11 bottles of beer
-Take one down, pass it around
-10 bottles of beer on the wall
-
-10 bottles of beer on the wall, 10 bottles of beer
-Take one down, pass it around
-9 bottles of beer on the wall
-
-9 bottles of beer on the wall, 9 bottles of beer
-Take one down, pass it around
-8 bottles of beer on the wall
-
-8 bottles of beer on the wall, 8 bottles of beer
-Take one down, pass it around
-7 bottles of beer on the wall
-
-7 bottles of beer on the wall, 7 bottles of beer
-Take one down, pass it around
-6 bottles of beer on the wall
-
-6 bottles of beer on the wall, 6 bottles of beer
-Take one down, pass it around
-5 bottles of beer on the wall
-
-5 bottles of beer on the wall, 5 bottles of beer
-Take one down, pass it around
-4 bottles of beer on the wall
-
-4 bottles of beer on the wall, 4 bottles of beer
-Take one down, pass it around
-3 bottles of beer on the wall
-
-3 bottles of beer on the wall, 3 bottles of beer
-Take one down, pass it around
-2 bottles of beer on the wall
-
-2 bottles of beer on the wall, 2 bottles of beer
-Take one down, pass it around
-1 bottles of beer on the wall
-
-1 bottles of beer on the wall, 1 bottles of beer
-Take one down, pass it around
-0 bottles of beer on the wall
-
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact1\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact1\n.output"
deleted file mode 100644
index d00491fd7..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact1\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-1
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact2\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact2\n.output"
deleted file mode 100644
index 0cfbf0888..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact2\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-2
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact3\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact3\n.output"
deleted file mode 100644
index 1e8b31496..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact3\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-6
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact4\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact4\n.output"
deleted file mode 100644
index a45fd52cc..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact4\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-24
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact5\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact5\n.output"
deleted file mode 100644
index 52bd8e43a..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact5\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-120
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact6\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact6\n.output"
deleted file mode 100644
index a1708fb1c..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact6\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-720
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact7\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact7\n.output"
deleted file mode 100644
index 89810b154..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact7\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-5040
diff --git "a/.output/golden/eta/eval/output/Fast/False/original/fact8\n.output" "b/.output/golden/eta/eval/output/Fast/False/original/fact8\n.output"
deleted file mode 100644
index 47ae14062..000000000
--- "a/.output/golden/eta/eval/output/Fast/False/original/fact8\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-40320
diff --git a/.output/golden/eta/eval/output/Fast/True/original/bottles.output b/.output/golden/eta/eval/output/Fast/True/original/bottles.output
deleted file mode 100644
index 9fa0b1d3c..000000000
--- a/.output/golden/eta/eval/output/Fast/True/original/bottles.output
+++ /dev/null
@@ -1,396 +0,0 @@
-99 bottles of beer on the wall, 99 bottles of beer
-Take one down, pass it around
-98 bottles of beer on the wall
-
-98 bottles of beer on the wall, 98 bottles of beer
-Take one down, pass it around
-97 bottles of beer on the wall
-
-97 bottles of beer on the wall, 97 bottles of beer
-Take one down, pass it around
-96 bottles of beer on the wall
-
-96 bottles of beer on the wall, 96 bottles of beer
-Take one down, pass it around
-95 bottles of beer on the wall
-
-95 bottles of beer on the wall, 95 bottles of beer
-Take one down, pass it around
-94 bottles of beer on the wall
-
-94 bottles of beer on the wall, 94 bottles of beer
-Take one down, pass it around
-93 bottles of beer on the wall
-
-93 bottles of beer on the wall, 93 bottles of beer
-Take one down, pass it around
-92 bottles of beer on the wall
-
-92 bottles of beer on the wall, 92 bottles of beer
-Take one down, pass it around
-91 bottles of beer on the wall
-
-91 bottles of beer on the wall, 91 bottles of beer
-Take one down, pass it around
-90 bottles of beer on the wall
-
-90 bottles of beer on the wall, 90 bottles of beer
-Take one down, pass it around
-89 bottles of beer on the wall
-
-89 bottles of beer on the wall, 89 bottles of beer
-Take one down, pass it around
-88 bottles of beer on the wall
-
-88 bottles of beer on the wall, 88 bottles of beer
-Take one down, pass it around
-87 bottles of beer on the wall
-
-87 bottles of beer on the wall, 87 bottles of beer
-Take one down, pass it around
-86 bottles of beer on the wall
-
-86 bottles of beer on the wall, 86 bottles of beer
-Take one down, pass it around
-85 bottles of beer on the wall
-
-85 bottles of beer on the wall, 85 bottles of beer
-Take one down, pass it around
-84 bottles of beer on the wall
-
-84 bottles of beer on the wall, 84 bottles of beer
-Take one down, pass it around
-83 bottles of beer on the wall
-
-83 bottles of beer on the wall, 83 bottles of beer
-Take one down, pass it around
-82 bottles of beer on the wall
-
-82 bottles of beer on the wall, 82 bottles of beer
-Take one down, pass it around
-81 bottles of beer on the wall
-
-81 bottles of beer on the wall, 81 bottles of beer
-Take one down, pass it around
-80 bottles of beer on the wall
-
-80 bottles of beer on the wall, 80 bottles of beer
-Take one down, pass it around
-79 bottles of beer on the wall
-
-79 bottles of beer on the wall, 79 bottles of beer
-Take one down, pass it around
-78 bottles of beer on the wall
-
-78 bottles of beer on the wall, 78 bottles of beer
-Take one down, pass it around
-77 bottles of beer on the wall
-
-77 bottles of beer on the wall, 77 bottles of beer
-Take one down, pass it around
-76 bottles of beer on the wall
-
-76 bottles of beer on the wall, 76 bottles of beer
-Take one down, pass it around
-75 bottles of beer on the wall
-
-75 bottles of beer on the wall, 75 bottles of beer
-Take one down, pass it around
-74 bottles of beer on the wall
-
-74 bottles of beer on the wall, 74 bottles of beer
-Take one down, pass it around
-73 bottles of beer on the wall
-
-73 bottles of beer on the wall, 73 bottles of beer
-Take one down, pass it around
-72 bottles of beer on the wall
-
-72 bottles of beer on the wall, 72 bottles of beer
-Take one down, pass it around
-71 bottles of beer on the wall
-
-71 bottles of beer on the wall, 71 bottles of beer
-Take one down, pass it around
-70 bottles of beer on the wall
-
-70 bottles of beer on the wall, 70 bottles of beer
-Take one down, pass it around
-69 bottles of beer on the wall
-
-69 bottles of beer on the wall, 69 bottles of beer
-Take one down, pass it around
-68 bottles of beer on the wall
-
-68 bottles of beer on the wall, 68 bottles of beer
-Take one down, pass it around
-67 bottles of beer on the wall
-
-67 bottles of beer on the wall, 67 bottles of beer
-Take one down, pass it around
-66 bottles of beer on the wall
-
-66 bottles of beer on the wall, 66 bottles of beer
-Take one down, pass it around
-65 bottles of beer on the wall
-
-65 bottles of beer on the wall, 65 bottles of beer
-Take one down, pass it around
-64 bottles of beer on the wall
-
-64 bottles of beer on the wall, 64 bottles of beer
-Take one down, pass it around
-63 bottles of beer on the wall
-
-63 bottles of beer on the wall, 63 bottles of beer
-Take one down, pass it around
-62 bottles of beer on the wall
-
-62 bottles of beer on the wall, 62 bottles of beer
-Take one down, pass it around
-61 bottles of beer on the wall
-
-61 bottles of beer on the wall, 61 bottles of beer
-Take one down, pass it around
-60 bottles of beer on the wall
-
-60 bottles of beer on the wall, 60 bottles of beer
-Take one down, pass it around
-59 bottles of beer on the wall
-
-59 bottles of beer on the wall, 59 bottles of beer
-Take one down, pass it around
-58 bottles of beer on the wall
-
-58 bottles of beer on the wall, 58 bottles of beer
-Take one down, pass it around
-57 bottles of beer on the wall
-
-57 bottles of beer on the wall, 57 bottles of beer
-Take one down, pass it around
-56 bottles of beer on the wall
-
-56 bottles of beer on the wall, 56 bottles of beer
-Take one down, pass it around
-55 bottles of beer on the wall
-
-55 bottles of beer on the wall, 55 bottles of beer
-Take one down, pass it around
-54 bottles of beer on the wall
-
-54 bottles of beer on the wall, 54 bottles of beer
-Take one down, pass it around
-53 bottles of beer on the wall
-
-53 bottles of beer on the wall, 53 bottles of beer
-Take one down, pass it around
-52 bottles of beer on the wall
-
-52 bottles of beer on the wall, 52 bottles of beer
-Take one down, pass it around
-51 bottles of beer on the wall
-
-51 bottles of beer on the wall, 51 bottles of beer
-Take one down, pass it around
-50 bottles of beer on the wall
-
-50 bottles of beer on the wall, 50 bottles of beer
-Take one down, pass it around
-49 bottles of beer on the wall
-
-49 bottles of beer on the wall, 49 bottles of beer
-Take one down, pass it around
-48 bottles of beer on the wall
-
-48 bottles of beer on the wall, 48 bottles of beer
-Take one down, pass it around
-47 bottles of beer on the wall
-
-47 bottles of beer on the wall, 47 bottles of beer
-Take one down, pass it around
-46 bottles of beer on the wall
-
-46 bottles of beer on the wall, 46 bottles of beer
-Take one down, pass it around
-45 bottles of beer on the wall
-
-45 bottles of beer on the wall, 45 bottles of beer
-Take one down, pass it around
-44 bottles of beer on the wall
-
-44 bottles of beer on the wall, 44 bottles of beer
-Take one down, pass it around
-43 bottles of beer on the wall
-
-43 bottles of beer on the wall, 43 bottles of beer
-Take one down, pass it around
-42 bottles of beer on the wall
-
-42 bottles of beer on the wall, 42 bottles of beer
-Take one down, pass it around
-41 bottles of beer on the wall
-
-41 bottles of beer on the wall, 41 bottles of beer
-Take one down, pass it around
-40 bottles of beer on the wall
-
-40 bottles of beer on the wall, 40 bottles of beer
-Take one down, pass it around
-39 bottles of beer on the wall
-
-39 bottles of beer on the wall, 39 bottles of beer
-Take one down, pass it around
-38 bottles of beer on the wall
-
-38 bottles of beer on the wall, 38 bottles of beer
-Take one down, pass it around
-37 bottles of beer on the wall
-
-37 bottles of beer on the wall, 37 bottles of beer
-Take one down, pass it around
-36 bottles of beer on the wall
-
-36 bottles of beer on the wall, 36 bottles of beer
-Take one down, pass it around
-35 bottles of beer on the wall
-
-35 bottles of beer on the wall, 35 bottles of beer
-Take one down, pass it around
-34 bottles of beer on the wall
-
-34 bottles of beer on the wall, 34 bottles of beer
-Take one down, pass it around
-33 bottles of beer on the wall
-
-33 bottles of beer on the wall, 33 bottles of beer
-Take one down, pass it around
-32 bottles of beer on the wall
-
-32 bottles of beer on the wall, 32 bottles of beer
-Take one down, pass it around
-31 bottles of beer on the wall
-
-31 bottles of beer on the wall, 31 bottles of beer
-Take one down, pass it around
-30 bottles of beer on the wall
-
-30 bottles of beer on the wall, 30 bottles of beer
-Take one down, pass it around
-29 bottles of beer on the wall
-
-29 bottles of beer on the wall, 29 bottles of beer
-Take one down, pass it around
-28 bottles of beer on the wall
-
-28 bottles of beer on the wall, 28 bottles of beer
-Take one down, pass it around
-27 bottles of beer on the wall
-
-27 bottles of beer on the wall, 27 bottles of beer
-Take one down, pass it around
-26 bottles of beer on the wall
-
-26 bottles of beer on the wall, 26 bottles of beer
-Take one down, pass it around
-25 bottles of beer on the wall
-
-25 bottles of beer on the wall, 25 bottles of beer
-Take one down, pass it around
-24 bottles of beer on the wall
-
-24 bottles of beer on the wall, 24 bottles of beer
-Take one down, pass it around
-23 bottles of beer on the wall
-
-23 bottles of beer on the wall, 23 bottles of beer
-Take one down, pass it around
-22 bottles of beer on the wall
-
-22 bottles of beer on the wall, 22 bottles of beer
-Take one down, pass it around
-21 bottles of beer on the wall
-
-21 bottles of beer on the wall, 21 bottles of beer
-Take one down, pass it around
-20 bottles of beer on the wall
-
-20 bottles of beer on the wall, 20 bottles of beer
-Take one down, pass it around
-19 bottles of beer on the wall
-
-19 bottles of beer on the wall, 19 bottles of beer
-Take one down, pass it around
-18 bottles of beer on the wall
-
-18 bottles of beer on the wall, 18 bottles of beer
-Take one down, pass it around
-17 bottles of beer on the wall
-
-17 bottles of beer on the wall, 17 bottles of beer
-Take one down, pass it around
-16 bottles of beer on the wall
-
-16 bottles of beer on the wall, 16 bottles of beer
-Take one down, pass it around
-15 bottles of beer on the wall
-
-15 bottles of beer on the wall, 15 bottles of beer
-Take one down, pass it around
-14 bottles of beer on the wall
-
-14 bottles of beer on the wall, 14 bottles of beer
-Take one down, pass it around
-13 bottles of beer on the wall
-
-13 bottles of beer on the wall, 13 bottles of beer
-Take one down, pass it around
-12 bottles of beer on the wall
-
-12 bottles of beer on the wall, 12 bottles of beer
-Take one down, pass it around
-11 bottles of beer on the wall
-
-11 bottles of beer on the wall, 11 bottles of beer
-Take one down, pass it around
-10 bottles of beer on the wall
-
-10 bottles of beer on the wall, 10 bottles of beer
-Take one down, pass it around
-9 bottles of beer on the wall
-
-9 bottles of beer on the wall, 9 bottles of beer
-Take one down, pass it around
-8 bottles of beer on the wall
-
-8 bottles of beer on the wall, 8 bottles of beer
-Take one down, pass it around
-7 bottles of beer on the wall
-
-7 bottles of beer on the wall, 7 bottles of beer
-Take one down, pass it around
-6 bottles of beer on the wall
-
-6 bottles of beer on the wall, 6 bottles of beer
-Take one down, pass it around
-5 bottles of beer on the wall
-
-5 bottles of beer on the wall, 5 bottles of beer
-Take one down, pass it around
-4 bottles of beer on the wall
-
-4 bottles of beer on the wall, 4 bottles of beer
-Take one down, pass it around
-3 bottles of beer on the wall
-
-3 bottles of beer on the wall, 3 bottles of beer
-Take one down, pass it around
-2 bottles of beer on the wall
-
-2 bottles of beer on the wall, 2 bottles of beer
-Take one down, pass it around
-1 bottles of beer on the wall
-
-1 bottles of beer on the wall, 1 bottles of beer
-Take one down, pass it around
-0 bottles of beer on the wall
-
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact1\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact1\n.output"
deleted file mode 100644
index d00491fd7..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact1\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-1
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact2\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact2\n.output"
deleted file mode 100644
index 0cfbf0888..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact2\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-2
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact3\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact3\n.output"
deleted file mode 100644
index 1e8b31496..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact3\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-6
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact4\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact4\n.output"
deleted file mode 100644
index a45fd52cc..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact4\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-24
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact5\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact5\n.output"
deleted file mode 100644
index 52bd8e43a..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact5\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-120
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact6\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact6\n.output"
deleted file mode 100644
index a1708fb1c..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact6\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-720
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact7\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact7\n.output"
deleted file mode 100644
index 89810b154..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact7\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-5040
diff --git "a/.output/golden/eta/eval/output/Fast/True/original/fact8\n.output" "b/.output/golden/eta/eval/output/Fast/True/original/fact8\n.output"
deleted file mode 100644
index 47ae14062..000000000
--- "a/.output/golden/eta/eval/output/Fast/True/original/fact8\n.output"
+++ /dev/null
@@ -1 +0,0 @@
-40320
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/bottles.output b/.output/golden/eta/eval/output/Fast/from-eas/bottles.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/bottles.output
rename to .output/golden/eta/eval/output/Fast/from-eas/bottles.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/divmod.output b/.output/golden/eta/eval/output/Fast/from-eas/divmod.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/divmod.output
rename to .output/golden/eta/eval/output/Fast/from-eas/divmod.output
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact0\n.output" "b/.output/golden/eta/eval/output/Fast/from-eas/fact0\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Original/False/from-eas/fact0\n.output"
rename to ".output/golden/eta/eval/output/Fast/from-eas/fact0\n.output"
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact1\n.output" "b/.output/golden/eta/eval/output/Fast/from-eas/fact1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Original/False/from-eas/fact1\n.output"
rename to ".output/golden/eta/eval/output/Fast/from-eas/fact1\n.output"
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/fact9\n.output" "b/.output/golden/eta/eval/output/Fast/from-eas/fact9\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Original/False/from-eas/fact9\n.output"
rename to ".output/golden/eta/eval/output/Fast/from-eas/fact9\n.output"
diff --git a/.output/actual/eta/eval/output/Original/False/original/hello.output b/.output/golden/eta/eval/output/Fast/from-eas/hello.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/original/hello.output
rename to .output/golden/eta/eval/output/Fast/from-eas/hello.output
diff --git a/.output/actual/eta/eval/output/Original/False/original/hello2.output b/.output/golden/eta/eval/output/Fast/from-eas/hello2.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/original/hello2.output
rename to .output/golden/eta/eval/output/Fast/from-eas/hello2.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/hello3.output b/.output/golden/eta/eval/output/Fast/from-eas/hello3.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/hello3.output
rename to .output/golden/eta/eval/output/Fast/from-eas/hello3.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/hello4.output b/.output/golden/eta/eval/output/Fast/from-eas/hello4.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/hello4.output
rename to .output/golden/eta/eval/output/Fast/from-eas/hello4.output
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/readcharA.output b/.output/golden/eta/eval/output/Fast/from-eas/readcharA.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/readcharA.output
rename to .output/golden/eta/eval/output/Fast/from-eas/readcharA.output
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/readnum0\n.output" "b/.output/golden/eta/eval/output/Fast/from-eas/readnum0\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Original/False/from-eas/readnum0\n.output"
rename to ".output/golden/eta/eval/output/Fast/from-eas/readnum0\n.output"
diff --git "a/.output/actual/eta/eval/output/Original/False/from-eas/readnum1\n.output" "b/.output/golden/eta/eval/output/Fast/from-eas/readnum1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Original/False/from-eas/readnum1\n.output"
rename to ".output/golden/eta/eval/output/Fast/from-eas/readnum1\n.output"
diff --git a/.output/actual/eta/eval/output/Original/False/from-eas/true.output b/.output/golden/eta/eval/output/Fast/from-eas/true.output
similarity index 100%
rename from .output/actual/eta/eval/output/Original/False/from-eas/true.output
rename to .output/golden/eta/eval/output/Fast/from-eas/true.output
diff --git a/.output/actual/eta/eval/output/Fast/True/original/bottles.output b/.output/golden/eta/eval/output/Fast/original/bottles.output
similarity index 100%
rename from .output/actual/eta/eval/output/Fast/True/original/bottles.output
rename to .output/golden/eta/eval/output/Fast/original/bottles.output
diff --git a/.output/golden/eta/eval/output/Fast/False/original/crlf.output b/.output/golden/eta/eval/output/Fast/original/crlf.output
similarity index 100%
rename from .output/golden/eta/eval/output/Fast/False/original/crlf.output
rename to .output/golden/eta/eval/output/Fast/original/crlf.output
diff --git "a/.output/actual/eta/eval/output/Fast/True/original/fact1\n.output" "b/.output/golden/eta/eval/output/Fast/original/fact1\n.output"
similarity index 100%
rename from ".output/actual/eta/eval/output/Fast/True/original/fact1\n.output"
rename to ".output/golden/eta/eval/output/Fast/original/fact1\n.output"
diff --git "a/.output/golden/eta/eval/output/Fast/original/fact9\n.output" "b/.output/golden/eta/eval/output/Fast/original/fact9\n.output"
new file mode 100644
index 000000000..9c626aa4f
--- /dev/null
+++ "b/.output/golden/eta/eval/output/Fast/original/fact9\n.output"
@@ -0,0 +1 @@
+362880
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/hello.output b/.output/golden/eta/eval/output/Fast/original/hello.output
similarity index 100%
rename from .output/golden/eta/eval/output/Fast/False/from-eas/hello.output
rename to .output/golden/eta/eval/output/Fast/original/hello.output
diff --git a/.output/golden/eta/eval/output/Fast/False/from-eas/hello2.output b/.output/golden/eta/eval/output/Fast/original/hello2.output
similarity index 100%
rename from .output/golden/eta/eval/output/Fast/False/from-eas/hello2.output
rename to .output/golden/eta/eval/output/Fast/original/hello2.output
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/bottles.output b/.output/golden/eta/eval/output/Original/False/from-eas/bottles.output
deleted file mode 100644
index 6d9316acf..000000000
--- a/.output/golden/eta/eval/output/Original/False/from-eas/bottles.output
+++ /dev/null
@@ -1,12 +0,0 @@
-3 bottles of beer on the wall, 3 bottles of beer
-Take one down, pass it around
-2 bottles of beer on the wall
-
-2 bottles of beer on the wall, 2 bottles of beer
-Take one down, pass it around
-1 bottles of beer on the wall
-
-1 bottles of beer on the wall, 1 bottles of beer
-Take one down, pass it around
-0 bottles of beer on the wall
-
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/divmod.output b/.output/golden/eta/eval/output/Original/False/from-eas/divmod.output
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact0\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact0\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact1\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact1\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact2\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact2\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact3\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact3\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact4\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact4\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact5\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact5\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact6\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact6\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact7\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact7\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact8\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact8\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/fact9\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/fact9\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/hello.output b/.output/golden/eta/eval/output/Original/False/from-eas/hello.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/from-eas/hello.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/hello2.output b/.output/golden/eta/eval/output/Original/False/from-eas/hello2.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/from-eas/hello2.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/hello3.output b/.output/golden/eta/eval/output/Original/False/from-eas/hello3.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/from-eas/hello3.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/hello4.output b/.output/golden/eta/eval/output/Original/False/from-eas/hello4.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/from-eas/hello4.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/readcharA.output b/.output/golden/eta/eval/output/Original/False/from-eas/readcharA.output
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/readnum0\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/readnum0\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git "a/.output/golden/eta/eval/output/Original/False/from-eas/readnum1\n.output" "b/.output/golden/eta/eval/output/Original/False/from-eas/readnum1\n.output"
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Original/False/from-eas/true.output b/.output/golden/eta/eval/output/Original/False/from-eas/true.output
deleted file mode 100644
index e69de29bb..000000000
diff --git a/.output/golden/eta/eval/output/Original/False/original/hello.output b/.output/golden/eta/eval/output/Original/False/original/hello.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/original/hello.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/original/hello2.output b/.output/golden/eta/eval/output/Original/False/original/hello2.output
deleted file mode 100644
index af5626b4a..000000000
--- a/.output/golden/eta/eval/output/Original/False/original/hello2.output
+++ /dev/null
@@ -1 +0,0 @@
-Hello, world!
diff --git a/.output/golden/eta/eval/output/Original/False/original/crlf.output b/.output/golden/eta/eval/output/Original/original/crlf.output
similarity index 100%
rename from .output/golden/eta/eval/output/Original/False/original/crlf.output
rename to .output/golden/eta/eval/output/Original/original/crlf.output
diff --git a/.output/golden/eta/eval/output/Fast/False/original/hello.output b/.output/golden/eta/eval/output/Original/original/hello.output
similarity index 100%
rename from .output/golden/eta/eval/output/Fast/False/original/hello.output
rename to .output/golden/eta/eval/output/Original/original/hello.output
diff --git a/.output/golden/eta/eval/output/Fast/False/original/hello2.output b/.output/golden/eta/eval/output/Original/original/hello2.output
similarity index 100%
rename from .output/golden/eta/eval/output/Fast/False/original/hello2.output
rename to .output/golden/eta/eval/output/Original/original/hello2.output
diff --git a/.output/golden/eta/il/optimized/from-eas/bottles.il b/.output/golden/eta/il/optimized/from-eas/bottles.il
index f71c9c68f..eaead5bfc 100644
--- a/.output/golden/eta/il/optimized/from-eas/bottles.il
+++ b/.output/golden/eta/il/optimized/from-eas/bottles.il
@@ -1,682 +1,218 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 31 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 21 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 21 )
- )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 38 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 31) Jump
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 4)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 11) (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 11)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 12)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+Labeled (LImmediate 18) Jump
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 17)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 18)
+SPure (Cons 19)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 19)
+Labeled LTop Jump
+
+Mark (MNatural 20)
+
+Mark (MNatural 21)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 22)
+SPure (Cons 23)
+Labeled (LImmediate 8) Jump
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+
+Mark (MNatural 24)
+SPure (Cons 25)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 25)
+Labeled LTop Jump
+
+Mark (MNatural 26)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 27)
+SPure (Cons 28)
+Labeled (LImmediate 21) Jump
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+
+Mark (MNatural 29)
+SPure (Cons 30)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 30)
+Labeled LTop Jump
+
+Mark (MNatural 31)
+SPure (Cons 3)
+
+Mark (MNatural 32)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 33)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 33)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 34)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 35)
+Labeled (LImmediate 21) Jump
+
+Mark (MNatural 35)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 36)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 37)
+SPure (Cons 38)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 38)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 39)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 40)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 40)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 41)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 32) (Branch NE)
+
+Mark (MNatural 42)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 43)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/euclid.il b/.output/golden/eta/il/optimized/from-eas/euclid.il
index 111c3e0bc..435af23fa 100644
--- a/.output/golden/eta/il/optimized/from-eas/euclid.il
+++ b/.output/golden/eta/il/optimized/from-eas/euclid.il
@@ -1,140 +1,46 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "6" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+Labeled (LImmediate 10) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Copy)
+
+Mark (MNatural 6)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "6")
+
+Mark (MNatural 7)
+SPure (Indexed (IImmediate 1) Move)
+SPure Discard
+
+Mark (MNatural 8)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 9)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 10)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 12)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/fact.il b/.output/golden/eta/il/optimized/from-eas/fact.il
index dcf98e678..998a9f6b2 100644
--- a/.output/golden/eta/il/optimized/from-eas/fact.il
+++ b/.output/golden/eta/il/optimized/from-eas/fact.il
@@ -1,723 +1,238 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 44 )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 35 )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 38 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "38" )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 35 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 51 )
- )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 48 )
- )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 64 )
- )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 65 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 60 )
- )
-, ICF
- ( Mark
- ( MNatural 66 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+Labeled (LImmediate 14) Jump
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 3)
+SPure (Cons 4)
+Labeled (LImmediate 32) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 7)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LImmediate 9) (Branch NE)
+
+Mark (MNatural 8)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 10)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 12)
+SPure (Cons 13)
+Labeled (LImmediate 44) Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 16)
+Labeled (LImmediate 18) (Branch NE)
+
+Mark (MNatural 17)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 19)
+SPure (Cons 16)
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+Labeled (LImmediate 44) Jump
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 27) (Branch NE)
+
+Mark (MNatural 26)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 29) (Branch NE)
+
+Mark (MNatural 28)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 29)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 19) (Branch NE)
+
+Mark (MNatural 30)
+SPure Discard
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 35) (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 35)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 36)
+Labeled (LImmediate 38) (Branch NE)
+
+Mark (MNatural 37)
+SPure (Binary Sub)
+Labeled (LImmediate 42) Jump
+
+Mark (MNatural 38)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "38")
+
+Mark (MNatural 39)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 40)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 41)
+Labeled (LImmediate 35) Jump
+
+Mark (MNatural 42)
+SPure (Cons 43)
+Labeled (LImmediate 60) Jump
+
+Mark (MNatural 43)
+Labeled LTop Jump
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 45)
+SPure (Cons 0)
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 47)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 48)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 49)
+Labeled (LImmediate 51) (Branch NE)
+
+Mark (MNatural 50)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 51)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 52)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 53)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 54)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 55)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 56)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 57)
+Labeled (LImmediate 48) Jump
+
+Mark (MNatural 58)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 59)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 60)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 61)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 62)
+Labeled (LImmediate 64) (Branch NE)
+
+Mark (MNatural 63)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 64)
+SIO OutputChar
+
+Mark (MNatural 65)
+Labeled (LImmediate 60) Jump
+
+Mark (MNatural 66)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/function.il b/.output/golden/eta/il/optimized/from-eas/function.il
index 06a8f152c..80fe55795 100644
--- a/.output/golden/eta/il/optimized/from-eas/function.il
+++ b/.output/golden/eta/il/optimized/from-eas/function.il
@@ -1,84 +1,32 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 3)
+SPure (Cons 0)
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+
+Mark (MNatural 8)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/hello.il b/.output/golden/eta/il/optimized/from-eas/hello.il
index 20a3aec39..cc8950b8a 100644
--- a/.output/golden/eta/il/optimized/from-eas/hello.il
+++ b/.output/golden/eta/il/optimized/from-eas/hello.il
@@ -1,104 +1,45 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 3)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 4)
+SPure (Cons 10)
+
+Mark (MNatural 5)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 6)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/hello2.il b/.output/golden/eta/il/optimized/from-eas/hello2.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/golden/eta/il/optimized/from-eas/hello2.il
+++ b/.output/golden/eta/il/optimized/from-eas/hello2.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/hello3.il b/.output/golden/eta/il/optimized/from-eas/hello3.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/golden/eta/il/optimized/from-eas/hello3.il
+++ b/.output/golden/eta/il/optimized/from-eas/hello3.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/hello4.il b/.output/golden/eta/il/optimized/from-eas/hello4.il
index 7c9d35984..d8e6e9bdc 100644
--- a/.output/golden/eta/il/optimized/from-eas/hello4.il
+++ b/.output/golden/eta/il/optimized/from-eas/hello4.il
@@ -1,142 +1,48 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/multiply.il b/.output/golden/eta/il/optimized/from-eas/multiply.il
index 6f873408c..baf1464fb 100644
--- a/.output/golden/eta/il/optimized/from-eas/multiply.il
+++ b/.output/golden/eta/il/optimized/from-eas/multiply.il
@@ -1,178 +1,58 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 15 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Cons 0)
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 6)
+Labeled (LImmediate 8) (Branch NE)
+
+Mark (MNatural 7)
+Labeled (LImmediate 15) Jump
+
+Mark (MNatural 8)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 10)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 11)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 12)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 14)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 17)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/pip.il b/.output/golden/eta/il/optimized/from-eas/pip.il
index 4411ce474..5fc3b2fed 100644
--- a/.output/golden/eta/il/optimized/from-eas/pip.il
+++ b/.output/golden/eta/il/optimized/from-eas/pip.il
@@ -1,71 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+SPure (Unary (UImmediate (-1) Sub))
+
+Mark (MNatural 4)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 5)
+SPure Discard
+
+Mark (MNatural 6)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/pip2.il b/.output/golden/eta/il/optimized/from-eas/pip2.il
index 50bc5b9d6..4ea0059ee 100644
--- a/.output/golden/eta/il/optimized/from-eas/pip2.il
+++ b/.output/golden/eta/il/optimized/from-eas/pip2.il
@@ -1,47 +1,17 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 2)
+SIO OutputChar
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/readnum.il b/.output/golden/eta/il/optimized/from-eas/readnum.il
index 5e17cdcaa..233f81908 100644
--- a/.output/golden/eta/il/optimized/from-eas/readnum.il
+++ b/.output/golden/eta/il/optimized/from-eas/readnum.il
@@ -1,389 +1,123 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 16 )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+Labeled (LImmediate 1) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Unary (UImmediate 48 Sub))
+
+Mark (MNatural 7)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 8)
+SPure (Cons 10)
+SPure (Cons 9)
+Labeled (LImmediate 19) Jump
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 10)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SIO InputChar
+
+Mark (MNatural 12)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+Labeled (LImmediate 17) Jump
+
+Mark (MNatural 14)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 16) (Branch NE)
+
+Mark (MNatural 15)
+Labeled (LImmediate 17) Jump
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 17)
+SPure Discard
+
+Mark (MNatural 18)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 19)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 20)
+SPure (Cons 0)
+
+Mark (MNatural 21)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 22)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 23)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 24)
+Labeled (LImmediate 26) (Branch NE)
+
+Mark (MNatural 25)
+Labeled (LImmediate 33) Jump
+
+Mark (MNatural 26)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 29)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 30)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 32)
+Labeled (LImmediate 23) Jump
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/reverse.il b/.output/golden/eta/il/optimized/from-eas/reverse.il
index 6e0610c88..ea26e1041 100644
--- a/.output/golden/eta/il/optimized/from-eas/reverse.il
+++ b/.output/golden/eta/il/optimized/from-eas/reverse.il
@@ -1,92 +1,32 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons (-1))
+
+Mark (MNatural 2)
+SIO InputChar
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+
+Mark (MNatural 4)
+SPure Discard
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 6)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 8)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/true.il b/.output/golden/eta/il/optimized/from-eas/true.il
index 758d72ec4..1dba14281 100644
--- a/.output/golden/eta/il/optimized/from-eas/true.il
+++ b/.output/golden/eta/il/optimized/from-eas/true.il
@@ -1,10 +1,5 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/writenum.il b/.output/golden/eta/il/optimized/from-eas/writenum.il
index 4f7c42b6f..a09fa4321 100644
--- a/.output/golden/eta/il/optimized/from-eas/writenum.il
+++ b/.output/golden/eta/il/optimized/from-eas/writenum.il
@@ -1,193 +1,70 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 17 )
- )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 4) (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 5)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 7)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "7")
+
+Mark (MNatural 8)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 10)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 12)
+Labeled LTop Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 14)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 15)
+Labeled (LImmediate 17) (Branch NE)
+
+Mark (MNatural 16)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 17)
+SIO OutputChar
+
+Mark (MNatural 18)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 19)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/from-eas/writestr.il b/.output/golden/eta/il/optimized/from-eas/writestr.il
index fbb21cb86..37c5fc29c 100644
--- a/.output/golden/eta/il/optimized/from-eas/writestr.il
+++ b/.output/golden/eta/il/optimized/from-eas/writestr.il
@@ -1,58 +1,24 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+Labeled (LImmediate 5) (Branch NE)
+
+Mark (MNatural 4)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 5)
+SIO OutputChar
+
+Mark (MNatural 6)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/bottles.il b/.output/golden/eta/il/optimized/original/bottles.il
index cfe2a82ee..617024100 100644
--- a/.output/golden/eta/il/optimized/original/bottles.il
+++ b/.output/golden/eta/il/optimized/original/bottles.il
@@ -1,955 +1,276 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 155 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "2" )
- )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 18828800 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 11 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 11 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13128755 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 8 )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 23 )
- )
-, IAL
- ( SPure
- ( Cons 2348471754576 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 24 )
- )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 29 )
- )
-, IAL
- ( SPure
- ( Cons 2348471754565 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, ICF ( Labeled Jump LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "31" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 32 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 402523 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 1814 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 20 )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 26 )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 32) Jump
+
+Mark (MArtificial "1")
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+Labeled (LImmediate 4) (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 1) Move)
+Labeled (LImmediate 3) Jump
+
+Mark (MArtificial "2")
+SIO InputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure Halibut
+Labeled (LImmediate 3) Jump
+
+Mark (MNatural 3)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 4) Jump
+
+Mark (MArtificial "3")
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 18828800)
+SPure (Cons 4)
+
+Mark (MNatural 4)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 11) (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+Labeled LTop Jump
+
+Mark (MNatural 11)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 12)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+Labeled (LImmediate 18) Jump
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 16)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 17)
+Labeled (LImmediate 11) Jump
+
+Mark (MNatural 18)
+SPure (Cons 19)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 19)
+Labeled LTop Jump
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 22)
+Labeled (LImmediate 8) Jump
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+Labeled (LImmediate 23) Jump
+
+Mark (MNatural 23)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LImmediate 24) Jump
+
+Mark (MNatural 24)
+SPure (Cons 25)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 25)
+Labeled LTop Jump
+
+Mark (MNatural 26)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 27)
+SPure (Cons 28)
+Labeled (LImmediate 20) Jump
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+Labeled (LImmediate 29) Jump
+
+Mark (MNatural 29)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 30)
+SPure (Cons 31)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 31)
+Labeled LTop Jump
+
+Mark (MArtificial "31")
+SPure (Binary Sub)
+Labeled (LImmediate 32) (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 402523)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 1814)
+Labeled (LArtificial "32") Jump
+
+Mark (MNatural 32)
+SPure (Cons 99)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 34)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 34)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 35)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 36)
+Labeled (LImmediate 20) Jump
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+
+Mark (MNatural 38)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+
+Mark (MNatural 39)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+
+Mark (MNatural 40)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+
+Mark (MNatural 41)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+Labeled (LImmediate 2) Jump
+
+Mark (MNatural 43)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 45)
+Labeled (LImmediate 26) Jump
+
+Mark (MNatural 45)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 33) (Branch NE)
+
+Mark (MNatural 47)
+Labeled (LImmediate 0) (Branch NE)
+
+Mark (MNatural 48)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/crlf.il b/.output/golden/eta/il/optimized/original/crlf.il
index 7f74d7246..ed648a532 100644
--- a/.output/golden/eta/il/optimized/original/crlf.il
+++ b/.output/golden/eta/il/optimized/original/crlf.il
@@ -1,107 +1,43 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 3 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 75 )
- )
-, IAL
- ( SPure
- ( Cons 79 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 3) Jump
+
+Mark (MNatural 2)
+SPure (Cons 10)
+SPure (Cons 49)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 3)
+SPure (Cons 10)
+SPure (Cons 75)
+SPure (Cons 79)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SPure (Cons 50)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/fact.il b/.output/golden/eta/il/optimized/original/fact.il
index 510c8b2f4..259d0e23a 100644
--- a/.output/golden/eta/il/optimized/original/fact.il
+++ b/.output/golden/eta/il/optimized/original/fact.il
@@ -1,741 +1,236 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 9 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 13 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 5 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 18 )
- )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 14 )
- )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 42 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "21" )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 27 )
- )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 29 )
- )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 30 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 19 )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 36 )
- )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Jump
- ( LImmediate 40 )
- )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "36" )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -48 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 33 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 41 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 49 )
- )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 56 )
- )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 3 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 46 )
- )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 2 )
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 62 )
- )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 58 )
- )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+Labeled (LImmediate 14) Jump
+
+Mark (MNatural 2)
+SPure (Cons 3)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 3)
+SPure (Cons 4)
+Labeled (LImmediate 32) Jump
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 5)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 6)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 7)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LImmediate 9) (Branch NE)
+
+Mark (MNatural 8)
+Labeled (LImmediate 13) Jump
+
+Mark (MNatural 9)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 10)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 11)
+SPure (Cons 12)
+Labeled (LImmediate 5) Jump
+
+Mark (MNatural 12)
+SPure (Cons 13)
+Labeled (LImmediate 42) Jump
+
+Mark (MNatural 13)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+
+Mark (MNatural 16)
+Labeled (LImmediate 18) (Branch NE)
+
+Mark (MNatural 17)
+Labeled (LImmediate 14) (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 19)
+SPure (Unary (UImmediate 48 Sub))
+
+Mark (MNatural 20)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+Labeled (LImmediate 42) Jump
+
+Mark (MArtificial "21")
+SPure (Cons 22)
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 32 Sub))
+Labeled (LImmediate 27) (Branch NE)
+
+Mark (MNatural 26)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 27)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LImmediate 29) (Branch NE)
+
+Mark (MNatural 28)
+Labeled (LImmediate 30) Jump
+
+Mark (MNatural 29)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 19) (Branch NE)
+
+Mark (MNatural 30)
+SPure Discard
+
+Mark (MNatural 31)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 33)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 34)
+Labeled (LImmediate 36) (Branch NE)
+
+Mark (MNatural 35)
+SPure (Binary Sub)
+Labeled (LImmediate 40) Jump
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "36")
+
+Mark (MNatural 37)
+SPure (Unary (UImmediate (-48) Sub))
+
+Mark (MNatural 38)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 39)
+Labeled (LImmediate 33) Jump
+
+Mark (MNatural 40)
+SPure (Cons 41)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 41)
+Labeled LTop Jump
+
+Mark (MNatural 42)
+SPure (Indexed (IImmediate 2) Move)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 43)
+SPure (Cons 0)
+
+Mark (MNatural 44)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 45)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 46)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 47)
+Labeled (LImmediate 49) (Branch NE)
+
+Mark (MNatural 48)
+Labeled (LImmediate 56) Jump
+
+Mark (MNatural 49)
+SPure (Unary (UImmediate 1 Sub))
+
+Mark (MNatural 50)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 51)
+SPure (Cons 0)
+SPure (Indexed (IImmediate 3) Copy)
+
+Mark (MNatural 52)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 53)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 54)
+SPure (Indexed (IImmediate 2) Move)
+
+Mark (MNatural 55)
+Labeled (LImmediate 46) Jump
+
+Mark (MNatural 56)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 57)
+SPure (Indexed (IImmediate 1) Move)
+Labeled LTop Jump
+
+Mark (MNatural 58)
+SPure (Indexed (IImmediate 1) Move)
+
+Mark (MNatural 59)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 60)
+Labeled (LImmediate 62) (Branch NE)
+
+Mark (MNatural 61)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 62)
+SIO OutputChar
+
+Mark (MNatural 63)
+Labeled (LImmediate 58) Jump
+
+Mark (MNatural 64)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/hello.il b/.output/golden/eta/il/optimized/original/hello.il
index a8a85db1b..411b20f32 100644
--- a/.output/golden/eta/il/optimized/original/hello.il
+++ b/.output/golden/eta/il/optimized/original/hello.il
@@ -1,202 +1,77 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+Labeled (LImmediate 2) Jump
+
+Mark (MArtificial "1")
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+Labeled (LImmediate 4) (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+
+Mark (MNatural 3)
+SPure (Cons 32)
+
+Mark (MNatural 4)
+SPure (Cons 44)
+SPure (Cons 111)
+Labeled (LArtificial "5") Jump
+
+Mark (MNatural 5)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "5")
+
+Mark (MNatural 6)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+
+Mark (MNatural 7)
+SPure (Cons 72)
+
+Mark (MNatural 8)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 10)
+
+Mark (MNatural 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+
+Mark (MNatural 11)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 12)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/hello2.il b/.output/golden/eta/il/optimized/original/hello2.il
index fe4055d7b..10c422a79 100644
--- a/.output/golden/eta/il/optimized/original/hello2.il
+++ b/.output/golden/eta/il/optimized/original/hello2.il
@@ -1,181 +1,47 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 22 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 4 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 337 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 6 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF ( Labeled Jump LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SPure (Cons 3)
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 3)
+Labeled (LImmediate 0) Jump
+
+Mark (MArtificial "3")
+Labeled (LImmediate 4) (Branch NE)
+SIO InputChar
+SPure (Unary (UImmediate 337 Sub))
+
+Mark (MNatural 4)
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LImmediate 6) (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+Labeled LTop Jump
+
+Mark (MNatural 6)
+SIO OutputChar
+Labeled (LImmediate 4) Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/pip.il b/.output/golden/eta/il/optimized/original/pip.il
index 4411ce474..5fc3b2fed 100644
--- a/.output/golden/eta/il/optimized/original/pip.il
+++ b/.output/golden/eta/il/optimized/original/pip.il
@@ -1,71 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 7 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Indexed (IImmediate 0) Copy)
+
+Mark (MNatural 3)
+SPure (Unary (UImmediate (-1) Sub))
+
+Mark (MNatural 4)
+Labeled (LImmediate 7) (Branch NE)
+
+Mark (MNatural 5)
+SPure Discard
+
+Mark (MNatural 6)
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/optimized/original/pip2.il b/.output/golden/eta/il/optimized/original/pip2.il
index 50bc5b9d6..4ea0059ee 100644
--- a/.output/golden/eta/il/optimized/original/pip2.il
+++ b/.output/golden/eta/il/optimized/original/pip2.il
@@ -1,47 +1,17 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE )
- ( LImmediate 2 )
- )
-, IAL ( SPure Discard )
-, ICF
- ( Labeled Jump
- ( LImmediate 0 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LImmediate 1 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LImmediate 2) (Branch NE)
+SPure Discard
+Labeled (LImmediate 0) Jump
+
+Mark (MNatural 2)
+SIO OutputChar
+Labeled (LImmediate 1) Jump
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/bottles.il b/.output/golden/eta/il/parsed/from-eas/bottles.il
index 982bbdc9d..8a32f0e9f 100644
--- a/.output/golden/eta/il/parsed/from-eas/bottles.il
+++ b/.output/golden/eta/il/parsed/from-eas/bottles.il
@@ -1,848 +1,292 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure (Cons 31)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 4)
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 18)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 17)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 19)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 20)
+
+Mark (MNatural 21)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 22)
+SPure (Cons 23)
+SPure (Cons 1)
+SPure (Cons 8)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 27)
+SPure (Cons 28)
+SPure (Cons 1)
+SPure (Cons 21)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+
+Mark (MNatural 29)
+SPure (Cons 30)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 3)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 33)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 33)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 34)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 35)
+SPure (Cons 1)
+SPure (Cons 21)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 36)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 37)
+SPure (Cons 38)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 38)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 39)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 40)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 40)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 41)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/euclid.il b/.output/golden/eta/il/parsed/from-eas/euclid.il
index 717eda838..3500ea5c0 100644
--- a/.output/golden/eta/il/parsed/from-eas/euclid.il
+++ b/.output/golden/eta/il/parsed/from-eas/euclid.il
@@ -1,167 +1,66 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "6" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure (Cons 10)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "6")
+
+Mark (MNatural 7)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 12)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/fact.il b/.output/golden/eta/il/parsed/from-eas/fact.il
index a88478d88..1e8144aaf 100644
--- a/.output/golden/eta/il/parsed/from-eas/fact.il
+++ b/.output/golden/eta/il/parsed/from-eas/fact.il
@@ -1,952 +1,367 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "38" )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 65 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 66 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure (Cons 1)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 1)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 8)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 1)
+SPure (Cons 44)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 19)
+SPure (Cons 48)
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 44)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 27)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 27)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 29)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 34)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 36)
+SPure (Cons 37)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 37)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 38)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "38")
+
+Mark (MNatural 39)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 40)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 41)
+SPure (Cons 1)
+SPure (Cons 35)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+SPure (Cons 1)
+SPure (Cons 60)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 44)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 45)
+SPure (Cons 0)
+
+Mark (MNatural 46)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 47)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 48)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 49)
+SPure (Cons 50)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 50)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 51)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 52)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 53)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 54)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 55)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 56)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 57)
+SPure (Cons 1)
+SPure (Cons 48)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 58)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 59)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 60)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 61)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 62)
+SPure (Cons 63)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 63)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 64)
+SIO OutputChar
+
+Mark (MNatural 65)
+SPure (Cons 1)
+SPure (Cons 60)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 66)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/function.il b/.output/golden/eta/il/parsed/from-eas/function.il
index 2b8e41e61..ff12ba76e 100644
--- a/.output/golden/eta/il/parsed/from-eas/function.il
+++ b/.output/golden/eta/il/parsed/from-eas/function.il
@@ -1,80 +1,36 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+
+Mark (MNatural 8)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/hello.il b/.output/golden/eta/il/parsed/from-eas/hello.il
index 20a3aec39..cc8950b8a 100644
--- a/.output/golden/eta/il/parsed/from-eas/hello.il
+++ b/.output/golden/eta/il/parsed/from-eas/hello.il
@@ -1,104 +1,45 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 3)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 4)
+SPure (Cons 10)
+
+Mark (MNatural 5)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 6)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/hello2.il b/.output/golden/eta/il/parsed/from-eas/hello2.il
index f474aa692..d348d0a6d 100644
--- a/.output/golden/eta/il/parsed/from-eas/hello2.il
+++ b/.output/golden/eta/il/parsed/from-eas/hello2.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/hello3.il b/.output/golden/eta/il/parsed/from-eas/hello3.il
index f474aa692..d348d0a6d 100644
--- a/.output/golden/eta/il/parsed/from-eas/hello3.il
+++ b/.output/golden/eta/il/parsed/from-eas/hello3.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/hello4.il b/.output/golden/eta/il/parsed/from-eas/hello4.il
index f474aa692..d348d0a6d 100644
--- a/.output/golden/eta/il/parsed/from-eas/hello4.il
+++ b/.output/golden/eta/il/parsed/from-eas/hello4.il
@@ -1,182 +1,64 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/multiply.il b/.output/golden/eta/il/parsed/from-eas/multiply.il
index a74e8e783..5430b0af9 100644
--- a/.output/golden/eta/il/parsed/from-eas/multiply.il
+++ b/.output/golden/eta/il/parsed/from-eas/multiply.il
@@ -1,199 +1,82 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+
+Mark (MNatural 3)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 4)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 7)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 15)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 9)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 11)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 12)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 13)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 14)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 15)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/pip.il b/.output/golden/eta/il/parsed/from-eas/pip.il
index d8a581105..f88e592e6 100644
--- a/.output/golden/eta/il/parsed/from-eas/pip.il
+++ b/.output/golden/eta/il/parsed/from-eas/pip.il
@@ -1,98 +1,41 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 7)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/pip2.il b/.output/golden/eta/il/parsed/from-eas/pip2.il
index 1f4275f90..e11bc328c 100644
--- a/.output/golden/eta/il/parsed/from-eas/pip2.il
+++ b/.output/golden/eta/il/parsed/from-eas/pip2.il
@@ -1,74 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/readnum.il b/.output/golden/eta/il/parsed/from-eas/readnum.il
index 380a18fd5..00ea65045 100644
--- a/.output/golden/eta/il/parsed/from-eas/readnum.il
+++ b/.output/golden/eta/il/parsed/from-eas/readnum.il
@@ -1,472 +1,184 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 48)
+SPure (Binary Sub)
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 8)
+SPure (Cons 10)
+SPure (Cons 9)
+SPure (Cons 1)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SIO InputChar
+
+Mark (MNatural 12)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 17)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 16)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 15)
+SPure (Cons 1)
+SPure (Cons 17)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 6)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 20)
+SPure (Cons 0)
+
+Mark (MNatural 21)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 22)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 27)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 29)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 30)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 31)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 32)
+SPure (Cons 1)
+SPure (Cons 23)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 33)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/reverse.il b/.output/golden/eta/il/parsed/from-eas/reverse.il
index 865d26f68..def8d566a 100644
--- a/.output/golden/eta/il/parsed/from-eas/reverse.il
+++ b/.output/golden/eta/il/parsed/from-eas/reverse.il
@@ -1,150 +1,58 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 2)
+SIO InputChar
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/true.il b/.output/golden/eta/il/parsed/from-eas/true.il
index 758d72ec4..1dba14281 100644
--- a/.output/golden/eta/il/parsed/from-eas/true.il
+++ b/.output/golden/eta/il/parsed/from-eas/true.il
@@ -1,10 +1,5 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/writenum.il b/.output/golden/eta/il/parsed/from-eas/writenum.il
index 3f15902fd..10bae4d99 100644
--- a/.output/golden/eta/il/parsed/from-eas/writenum.il
+++ b/.output/golden/eta/il/parsed/from-eas/writenum.il
@@ -1,287 +1,111 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 5)
+SPure (Cons 6)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "7")
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 9)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 14)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 15)
+SPure (Cons 16)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 16)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SIO OutputChar
+
+Mark (MNatural 18)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/from-eas/writestr.il b/.output/golden/eta/il/parsed/from-eas/writestr.il
index 95d6260fb..c9a375218 100644
--- a/.output/golden/eta/il/parsed/from-eas/writestr.il
+++ b/.output/golden/eta/il/parsed/from-eas/writestr.il
@@ -1,86 +1,36 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SIO OutputChar
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/bottles.il b/.output/golden/eta/il/parsed/original/bottles.il
index dec3f8f67..7d2744f4a 100644
--- a/.output/golden/eta/il/parsed/original/bottles.il
+++ b/.output/golden/eta/il/parsed/original/bottles.il
@@ -1,1184 +1,402 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 141 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 155 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "2" )
- )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 18828800 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "14" )
- )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 13128773 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2348471754576 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "23" )
- )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "24" )
- )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2348471754565 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "29" )
- )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 335495964812 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "30" )
- )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "31" )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 402523 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 1814 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "32" )
- )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 141)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+SIO OutputChar
+SPure (Cons 155)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "1")
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+SPure (Cons 1)
+SPure Halibut
+SPure (Cons 1)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 3)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "2")
+SIO InputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure Halibut
+SPure (Cons 3)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SIO InputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "3")
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Cons 18828800)
+SPure (Cons 4)
+
+Mark (MNatural 4)
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 10)
+SPure (Cons 48)
+SIO OutputChar
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 11)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 18)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "14")
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 17)
+SPure (Cons 1)
+SPure (Cons 11)
+Labeled LTop (Branch NE)
+SPure (Cons 18)
+SPure (Cons 11)
+SPure (Cons 18)
+SPure (Cons 13128773)
+SPure (Cons 1)
+SPure Halibut
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 19)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 19)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 8)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 23)
+Labeled LTop (Branch NE)
+SPure (Cons 2348471754576)
+Labeled (LArtificial "23") Jump
+
+Mark (MNatural 23)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 24)
+Labeled LTop (Branch NE)
+SPure (Cons 335495964812)
+Labeled (LArtificial "24") Jump
+
+Mark (MNatural 24)
+SPure (Cons 25)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 25)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 27)
+SPure (Cons 28)
+SPure (Cons 1)
+SPure (Cons 20)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 1)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+SPure (Cons 2348471754565)
+Labeled (LArtificial "29") Jump
+
+Mark (MNatural 29)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+SPure (Cons 335495964812)
+Labeled (LArtificial "30") Jump
+
+Mark (MNatural 30)
+SPure (Cons 31)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "31")
+SPure (Binary Sub)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 402523)
+SPure (Binaries [Mod,Div])
+SIO InputChar
+SPure (Cons 1814)
+Labeled (LArtificial "32") Jump
+
+Mark (MNatural 32)
+SPure (Cons 99)
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 34)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 34)
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+
+Mark (MNatural 35)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 36)
+SPure (Cons 1)
+SPure (Cons 20)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SIO OutputChar
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+
+Mark (MNatural 38)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+
+Mark (MNatural 39)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+
+Mark (MNatural 40)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+
+Mark (MNatural 41)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+
+Mark (MNatural 42)
+SPure (Cons 43)
+SPure (Cons 1)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 43)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 44)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 45)
+SPure (Cons 1)
+SPure (Cons 26)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 45)
+SPure (Cons 10)
+SPure (Cons 10)
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 46)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 47)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 48)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/crlf.il b/.output/golden/eta/il/parsed/original/crlf.il
index 4742e7e36..b6267aaa6 100644
--- a/.output/golden/eta/il/parsed/original/crlf.il
+++ b/.output/golden/eta/il/parsed/original/crlf.il
@@ -1,131 +1,51 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 75 )
- )
-, IAL
- ( SPure
- ( Cons 79 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 1)
+SPure (Cons 3)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 10)
+SPure (Cons 49)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 10)
+SPure (Cons 75)
+SPure (Cons 79)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SPure (Cons 50)
+SPure (Cons 68)
+SPure (Cons 65)
+SPure (Cons 66)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/fact.il b/.output/golden/eta/il/parsed/original/fact.il
index 59fc5f2b7..5a4ec05e1 100644
--- a/.output/golden/eta/il/parsed/original/fact.il
+++ b/.output/golden/eta/il/parsed/original/fact.il
@@ -1,941 +1,359 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 14 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 15 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 16 )
- )
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 17 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 18 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 19 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 20 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 21 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "21" )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MNatural 22 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 23 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 24 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 25 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 26 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 27 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 28 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 29 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 30 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 31 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 32 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 33 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 34 )
- )
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 35 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 40 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 36 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "36" )
- )
-, ICF
- ( Mark
- ( MNatural 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 38 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 39 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 40 )
- )
-, IAL
- ( SPure
- ( Cons 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 41 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 42 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 43 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MNatural 44 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 45 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 46 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 47 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 48 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 56 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 49 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 50 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 51 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 52 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 53 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 54 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 55 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 56 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 57 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 58 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 59 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 60 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 61 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 62 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 63 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 64 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 2)
+SPure (Cons 1)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 4)
+SPure (Cons 1)
+SPure (Cons 32)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 4)
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 6)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 7)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 8)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 13)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 10)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 11)
+SPure (Cons 12)
+SPure (Cons 1)
+SPure (Cons 5)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 12)
+SPure (Cons 13)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 13)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 14)
+SIO InputChar
+
+Mark (MNatural 15)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+
+Mark (MNatural 16)
+SPure (Cons 17)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 17)
+SPure (Cons 0)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+SPure (Cons 14)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 18)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 19)
+SPure (Cons 48)
+SPure (Binary Sub)
+
+Mark (MNatural 20)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 21)
+SPure (Cons 10)
+SPure (Cons 22)
+SPure (Cons 1)
+SPure (Cons 42)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SPure Halibut
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "21")
+SPure (Cons 22)
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SIO InputChar
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+
+Mark (MNatural 22)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 23)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 24)
+SIO InputChar
+
+Mark (MNatural 25)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 32)
+SPure (Binary Sub)
+SPure (Cons 27)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 26)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 27)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 10)
+SPure (Binary Sub)
+SPure (Cons 29)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 28)
+SPure (Cons 1)
+SPure (Cons 30)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 29)
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 19)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 30)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 31)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 32)
+SPure (Cons 0)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 33)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 34)
+SPure (Cons 35)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 35)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 40)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 36)
+SPure (Cons 10)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "36")
+
+Mark (MNatural 37)
+SPure (Cons 0)
+SPure (Cons 48)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 38)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 39)
+SPure (Cons 1)
+SPure (Cons 33)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 40)
+SPure (Cons 41)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 41)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 42)
+SPure (Cons 2)
+SPure Halibut
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 43)
+SPure (Cons 0)
+
+Mark (MNatural 44)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 45)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 46)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 47)
+SPure (Cons 48)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 48)
+SPure (Cons 1)
+SPure (Cons 56)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 49)
+SPure (Cons 1)
+SPure (Binary Sub)
+
+Mark (MNatural 50)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 51)
+SPure (Cons 0)
+SPure (Cons 0)
+SPure (Cons 3)
+SPure (Binary Sub)
+SPure Halibut
+
+Mark (MNatural 52)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 53)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 54)
+SPure (Cons 2)
+SPure Halibut
+
+Mark (MNatural 55)
+SPure (Cons 1)
+SPure (Cons 46)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 56)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 57)
+SPure (Cons 1)
+SPure (Cons 2)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 58)
+SPure (Cons 1)
+SPure Halibut
+
+Mark (MNatural 59)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 60)
+SPure (Cons 61)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 61)
+SPure (Binary Sub)
+SPure (Cons 1)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 62)
+SIO OutputChar
+
+Mark (MNatural 63)
+SPure (Cons 1)
+SPure (Cons 58)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 64)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/hello.il b/.output/golden/eta/il/parsed/original/hello.il
index 002d23a17..2e860d314 100644
--- a/.output/golden/eta/il/parsed/original/hello.il
+++ b/.output/golden/eta/il/parsed/original/hello.il
@@ -1,216 +1,84 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "1" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "5" )
- )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, ICF
- ( Mark
- ( MNatural 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ICF
- ( Mark
- ( MNatural 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ICF
- ( Mark
- ( MNatural 12 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 13 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 21)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure Halibut
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "1")
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO InputChar
+Labeled LTop (Branch NE)
+Labeled LTop (Branch NE)
+SPure (Binaries [Mod,Div])
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Cons 2)
+SIO OutputChar
+
+Mark (MNatural 2)
+
+Mark (MNatural 3)
+SPure (Cons 32)
+
+Mark (MNatural 4)
+SPure (Cons 44)
+SPure (Cons 111)
+Labeled (LArtificial "5") Jump
+
+Mark (MNatural 5)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "5")
+
+Mark (MNatural 6)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+
+Mark (MNatural 7)
+SPure (Cons 72)
+SPure (Cons 0)
+SPure (Binary Sub)
+
+Mark (MNatural 8)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 9)
+SPure (Cons 10)
+
+Mark (MNatural 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+
+Mark (MNatural 11)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+
+Mark (MNatural 12)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+
+Mark (MNatural 13)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/hello2.il b/.output/golden/eta/il/parsed/original/hello2.il
index 059ffb4fa..d82002f32 100644
--- a/.output/golden/eta/il/parsed/original/hello2.il
+++ b/.output/golden/eta/il/parsed/original/hello2.il
@@ -1,229 +1,80 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Binaries
- [ Mod
- , Div
- ]
- )
- )
-, ICF
- ( Mark
- ( MArtificial "3" )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 337 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "7" )
- )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+
+Mark (MNatural 2)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SPure (Cons 3)
+SPure (Cons 1)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+SPure (Cons 4)
+SPure (Cons 22)
+Labeled LTop (Branch NE)
+SIO InputChar
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+SIO OutputChar
+SIO OutputChar
+SPure (Binaries [Mod,Div])
+
+Mark (MArtificial "3")
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SIO InputChar
+SPure (Cons 337)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 1)
+SPure Halibut
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Binary Sub)
+SPure (Cons 11)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SIO OutputChar
+SPure (Cons 7)
+SPure (Cons 4)
+Labeled LTop (Branch NE)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SIO InputChar
+SPure (Cons 7)
+SPure (Cons 0)
+Labeled (LArtificial "7") Jump
+
+Mark (MNatural 7)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/pip.il b/.output/golden/eta/il/parsed/original/pip.il
index d8a581105..f88e592e6 100644
--- a/.output/golden/eta/il/parsed/original/pip.il
+++ b/.output/golden/eta/il/parsed/original/pip.il
@@ -1,98 +1,41 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Mark
- ( MNatural 4 )
- )
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 5 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 6 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 7 )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Mark
- ( MNatural 8 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 9 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+
+Mark (MNatural 2)
+SPure (Cons 0)
+SPure Halibut
+
+Mark (MNatural 3)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+
+Mark (MNatural 4)
+SPure (Cons 7)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 5)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+
+Mark (MNatural 6)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 7)
+SIO OutputChar
+
+Mark (MNatural 8)
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 9)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/il/parsed/original/pip2.il b/.output/golden/eta/il/parsed/original/pip2.il
index 1f4275f90..e11bc328c 100644
--- a/.output/golden/eta/il/parsed/original/pip2.il
+++ b/.output/golden/eta/il/parsed/original/pip2.il
@@ -1,74 +1,29 @@
-[ ICF
- ( Mark
- ( MNatural 1 )
- )
-, IAL ( SIO InputChar )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SPure Halibut )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Halibut )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 2 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Labeled ( Branch NE ) LTop )
-, ICF
- ( Mark
- ( MNatural 3 )
- )
-, ICF
- ( Mark
- ( MNatural 0 )
- )
-, End
-]
\ No newline at end of file
+
+Mark (MNatural 1)
+SIO InputChar
+SPure (Cons 0)
+SPure Halibut
+SPure (Cons 0)
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Binary Sub)
+SPure (Cons 2)
+Labeled LTop (Branch NE)
+SPure (Cons 0)
+SPure (Cons 1)
+SPure Halibut
+Labeled LTop (Branch NE)
+SPure (Cons 1)
+SPure (Cons 0)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 2)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Cons 1)
+Labeled LTop (Branch NE)
+
+Mark (MNatural 3)
+
+Mark (MNatural 0)
+End
diff --git a/.output/golden/eta/minified/from-eas/readnum.eta b/.output/golden/eta/minified/from-eas/readnum.eta
index 6e7c7253c..266b08171 100644
--- a/.output/golden/eta/minified/from-eas/readnum.eta
+++ b/.output/golden/eta/minified/from-eas/readnum.eta
@@ -3,7 +3,7 @@ NEHNIIES
ANENTESST
NENTETNTET
NENTEH
-NSSENIIES
+NSSES
NTEH
NTOEANTENANET
NENTEH
@@ -31,4 +31,4 @@ NAEH
NAEH
NTENOAET
NTEHT
-NTENAEHT
+NTENAEHT
\ No newline at end of file
diff --git a/.output/golden/f/il/helma/copy.il b/.output/golden/f/il/helma/copy.il
index 3334bc959..c72f32181 100644
--- a/.output/golden/f/il/helma/copy.il
+++ b/.output/golden/f/il/helma/copy.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/helma/factorial.il b/.output/golden/f/il/helma/factorial.il
index a69f129be..dac4931b6 100644
--- a/.output/golden/f/il/helma/factorial.il
+++ b/.output/golden/f/il/helma/factorial.il
@@ -2,8 +2,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -25,8 +25,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -71,16 +71,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/helma/primeNumber.il b/.output/golden/f/il/helma/primeNumber.il
index ba9e9aed1..359190330 100644
--- a/.output/golden/f/il/helma/primeNumber.il
+++ b/.output/golden/f/il/helma/primeNumber.il
@@ -24,8 +24,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -34,64 +34,64 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -121,16 +121,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -150,16 +150,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -175,8 +175,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/benHoyt/bin2f.il b/.output/golden/f/il/other/benHoyt/bin2f.il
index 4816480bc..18f047f66 100644
--- a/.output/golden/f/il/other/benHoyt/bin2f.il
+++ b/.output/golden/f/il/other/benHoyt/bin2f.il
@@ -6,8 +6,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/benHoyt/fac.il b/.output/golden/f/il/other/benHoyt/fac.il
index 9c7a88322..3540172e3 100644
--- a/.output/golden/f/il/other/benHoyt/fac.il
+++ b/.output/golden/f/il/other/benHoyt/fac.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -21,8 +21,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -30,8 +30,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -46,8 +46,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -61,8 +61,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -107,16 +107,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/morphett/factorial.il b/.output/golden/f/il/other/morphett/factorial.il
index b14f5a74f..0cb8583d7 100644
--- a/.output/golden/f/il/other/morphett/factorial.il
+++ b/.output/golden/f/il/other/morphett/factorial.il
@@ -2,8 +2,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -20,8 +20,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -29,8 +29,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -45,8 +45,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -60,8 +60,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/morphett/factorial2.il b/.output/golden/f/il/other/morphett/factorial2.il
index 71defb229..81fc7b9ab 100644
--- a/.output/golden/f/il/other/morphett/factorial2.il
+++ b/.output/golden/f/il/other/morphett/factorial2.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -15,8 +15,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -33,16 +33,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -59,32 +59,32 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/morphett/reverse.il b/.output/golden/f/il/other/morphett/reverse.il
index cc09e701c..e4f25902a 100644
--- a/.output/golden/f/il/other/morphett/reverse.il
+++ b/.output/golden/f/il/other/morphett/reverse.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/other/thunderseethe/prog.il b/.output/golden/f/il/other/thunderseethe/prog.il
index 904db3acd..656265da8 100644
--- a/.output/golden/f/il/other/thunderseethe/prog.il
+++ b/.output/golden/f/il/other/thunderseethe/prog.il
@@ -15,8 +15,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -58,8 +58,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Ben_Schaeffer/detab.il b/.output/golden/f/il/strlen/contrib/Ben_Schaeffer/detab.il
index b8588970b..5d64846f0 100644
--- a/.output/golden/f/il/strlen/contrib/Ben_Schaeffer/detab.il
+++ b/.output/golden/f/il/strlen/contrib/Ben_Schaeffer/detab.il
@@ -10,16 +10,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
index c0820a388..cdda4be0f 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/chkbrack.il
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -58,8 +58,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -93,8 +93,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -128,8 +128,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -163,8 +163,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -198,8 +198,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -233,8 +233,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -287,8 +287,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -324,8 +324,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -361,8 +361,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/countwl.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
index f646479fb..b756b0b4f 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/countwl.il
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -58,8 +58,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -101,16 +101,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -161,8 +161,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/crunch.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
index 5966a0080..f0e5271e9 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/crunch.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
index f89e16fa3..a79fa974f 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/decrunch.il
@@ -5,8 +5,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -70,8 +70,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/depack.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/depack.il
index c1a40dca3..ee2e4c21a 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/depack.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/depack.il
@@ -41,8 +41,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/remcom.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
index 3a958bab2..3efdad7a2 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/remcom.il
@@ -38,16 +38,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/split.il b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/split.il
index a40d76b62..5c329a773 100644
--- a/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/split.il
+++ b/.output/golden/f/il/strlen/contrib/Eelko_de_Vos/split.il
@@ -72,8 +72,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il b/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
index 34e380487..06c22e2ea 100644
--- a/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
+++ b/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/queens.il
@@ -9,8 +9,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -27,8 +27,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -42,8 +42,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -71,8 +71,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -95,16 +95,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -119,8 +119,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -164,8 +164,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -190,8 +190,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -286,16 +286,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -328,8 +328,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -338,8 +338,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -348,8 +348,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -358,8 +358,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -392,24 +392,24 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il b/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
index c3f9c6705..d335b9da9 100644
--- a/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
+++ b/.output/golden/f/il/strlen/contrib/Marcel_van_Kervinck/tic.il
@@ -9,8 +9,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -33,16 +33,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -57,8 +57,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -79,8 +79,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -91,8 +91,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -120,8 +120,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -130,8 +130,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -142,8 +142,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -152,8 +152,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -173,8 +173,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -206,8 +206,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -216,8 +216,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -258,8 +258,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -302,8 +302,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -316,8 +316,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -326,8 +326,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -340,8 +340,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -356,8 +356,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il b/.output/golden/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
index 5e05ab9dd..a657ed472 100644
--- a/.output/golden/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
+++ b/.output/golden/f/il/strlen/contrib/Peter_Bengtsson/DoASC.il
@@ -18,8 +18,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -47,8 +47,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -75,8 +75,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -93,8 +93,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -126,8 +126,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -145,16 +145,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -171,8 +171,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -241,8 +241,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -264,8 +264,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il b/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
index 4ddecb6ef..1aa661240 100644
--- a/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
+++ b/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/htmlcol.il
@@ -14,8 +14,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -40,8 +40,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -51,8 +51,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -90,8 +90,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -125,8 +125,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -151,8 +151,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -162,8 +162,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il b/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
index 94f975ad3..068a71df0 100644
--- a/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
+++ b/.output/golden/f/il/strlen/contrib/Steinar_Knutsen/passwdc.il
@@ -11,8 +11,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/Thomas_Fischbacher/life.il b/.output/golden/f/il/strlen/contrib/Thomas_Fischbacher/life.il
index 5fda508c8..459120940 100644
--- a/.output/golden/f/il/strlen/contrib/Thomas_Fischbacher/life.il
+++ b/.output/golden/f/il/strlen/contrib/Thomas_Fischbacher/life.il
@@ -43,8 +43,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -76,8 +76,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -98,16 +98,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -128,8 +128,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -138,8 +138,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -165,8 +165,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/contrib/self.il b/.output/golden/f/il/strlen/contrib/self.il
index aca1f3eda..910fe7841 100644
--- a/.output/golden/f/il/strlen/contrib/self.il
+++ b/.output/golden/f/il/strlen/contrib/self.il
@@ -19,8 +19,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/addcr.il b/.output/golden/f/il/strlen/examples/addcr.il
index bd23cbf82..96b219f17 100644
--- a/.output/golden/f/il/strlen/examples/addcr.il
+++ b/.output/golden/f/il/strlen/examples/addcr.il
@@ -7,16 +7,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/arg.il b/.output/golden/f/il/strlen/examples/arg.il
index ef025707c..4f4fcc71d 100644
--- a/.output/golden/f/il/strlen/examples/arg.il
+++ b/.output/golden/f/il/strlen/examples/arg.il
@@ -22,8 +22,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -53,8 +53,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/argtest.il b/.output/golden/f/il/strlen/examples/argtest.il
index cbab2112a..0b4f8da24 100644
--- a/.output/golden/f/il/strlen/examples/argtest.il
+++ b/.output/golden/f/il/strlen/examples/argtest.il
@@ -18,8 +18,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/lambda.il b/.output/golden/f/il/strlen/examples/lambda.il
index 1cafadebb..1616620a2 100644
--- a/.output/golden/f/il/strlen/examples/lambda.il
+++ b/.output/golden/f/il/strlen/examples/lambda.il
@@ -4,8 +4,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -30,8 +30,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -46,24 +46,24 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -76,8 +76,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -86,8 +86,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -100,8 +100,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -111,16 +111,16 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -133,8 +133,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/prime.il b/.output/golden/f/il/strlen/examples/prime.il
index 5f031bd13..f7268a226 100644
--- a/.output/golden/f/il/strlen/examples/prime.il
+++ b/.output/golden/f/il/strlen/examples/prime.il
@@ -25,8 +25,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -35,80 +35,80 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -138,16 +138,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -157,8 +157,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
@@ -175,16 +175,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -204,16 +204,16 @@
[ Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -230,8 +230,8 @@
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
)
diff --git a/.output/golden/f/il/strlen/examples/strip.il b/.output/golden/f/il/strlen/examples/strip.il
index 0d19f1278..64296bb1d 100644
--- a/.output/golden/f/il/strlen/examples/strip.il
+++ b/.output/golden/f/il/strlen/examples/strip.il
@@ -6,16 +6,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -57,8 +57,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/inline/copy.il b/.output/golden/f/il/strlen/inline/copy.il
index 24b05c4f0..f84862002 100644
--- a/.output/golden/f/il/strlen/inline/copy.il
+++ b/.output/golden/f/il/strlen/inline/copy.il
@@ -6,8 +6,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/inline/factorial.il b/.output/golden/f/il/strlen/inline/factorial.il
index 93ed4cb60..fcbbf9b96 100644
--- a/.output/golden/f/il/strlen/inline/factorial.il
+++ b/.output/golden/f/il/strlen/inline/factorial.il
@@ -3,8 +3,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -26,8 +26,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -72,16 +72,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/f/il/strlen/inline/primeNumber.il b/.output/golden/f/il/strlen/inline/primeNumber.il
index 7f826cebd..e40aaf82d 100644
--- a/.output/golden/f/il/strlen/inline/primeNumber.il
+++ b/.output/golden/f/il/strlen/inline/primeNumber.il
@@ -25,8 +25,8 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -35,64 +35,64 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -122,16 +122,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
@@ -151,16 +151,16 @@
, Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
, Inst
( IAL
( SPure
- ( Indexed Move
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Move
)
)
)
@@ -176,8 +176,8 @@
[ Inst
( IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
)
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
index cc3628ead..d7cfefc56 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/bottles.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -141,13 +141,13 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -220,8 +220,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
@@ -344,19 +344,19 @@ dump: Memory
( Cons 84 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -477,30 +477,30 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "010011000100111101001111010100000011101000110001" )
+ ( Labeled
+ ( LArtificial "010011000100111101001111010100000011101000110001" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01001100010011110100111101010000" )
+ ( Labeled
+ ( LArtificial "01001100010011110100111101010000" ) Jump
)
, ICF
( Mark
@@ -513,18 +513,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -537,8 +537,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
@@ -547,7 +547,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 128
+ , programCounter = 127
, returnStack = IS []
}
, memoryStack = fromList [ 0 ]
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
index e4e419d2b..d1a6d5412 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello2.logged
@@ -62,8 +62,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, End
, ICF
@@ -72,18 +72,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -96,8 +96,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
index 86141872e..f522cf884 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/hello4.logged
@@ -58,8 +58,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, End
, ICF
@@ -68,18 +68,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -92,8 +92,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
index 8361de9c8..20d3e249b 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/from-wsa/prim.logged
@@ -90,8 +90,8 @@ dump: Memory
( Cons 112 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, IAL
( SPure
@@ -103,32 +103,32 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110001" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110001" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 1 )
@@ -136,13 +136,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110001" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110001" ) Jump
)
, ICF
( Mark
@@ -159,19 +159,19 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110010" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110010" ) ( Branch EZ )
)
, IAL
( SPure
@@ -183,24 +183,24 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110011" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110011" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -209,21 +209,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -232,15 +232,15 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
@@ -257,10 +257,10 @@ dump: Memory
( SPure ( Binary Mul ) )
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -268,13 +268,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110011" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110011" ) Jump
)
, ICF
( Mark
@@ -283,13 +283,13 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110010" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110010" ) Jump
)
, ICF
( Mark
@@ -306,41 +306,41 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110100" )
+ ( Labeled
+ ( LArtificial "011001100101111101100110011010010110111001101001011100110110100001100101011001000101111100110100" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011011100110111101100100011100100110000101110111" )
+ ( Labeled
+ ( LArtificial "011011100110111101100100011100100110000101110111" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -353,8 +353,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, ICF
( Mark
@@ -362,13 +362,13 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110100" )
+ ( Labeled
+ ( LArtificial "011001100101111101110011011101000110000101110010011101000101111100110100" ) Jump
)
, ICF
( Mark
@@ -380,8 +380,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
+ ( Labeled
+ ( LArtificial "0111000001110010011010010110111001110100011100110110110001101110" ) Call
)
, End
, ICF
@@ -390,18 +390,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110100101101110011101000111001101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Jump
)
, ICF
( Mark
@@ -414,8 +414,8 @@ dump: Memory
( MArtificial "0111000001110010011010010110111001110100011100110110110001101110" )
)
, ICF
- ( Labeled Call
- ( LArtificial "011100000111001001101001011011100111010001110011" )
+ ( Labeled
+ ( LArtificial "011100000111001001101001011011100111010001110011" ) Call
)
, IAL
( SPure
@@ -424,7 +424,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 105
+ , programCounter = 94
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
index 11a0a3c32..e9f52c753 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110111101100111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110111101100111011001010110111001100100" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "01101100011011110110111101110000" )
+ ( Labeled
+ ( LArtificial "01101100011011110110111101110000" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/original/count.logged b/.output/golden/ws/eval/logged/stn/asciiOff/original/count.logged
index d421faaf0..651750622 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/original/count.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01000101" )
+ ( Labeled
+ ( LArtificial "01000101" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01000011" )
+ ( Labeled
+ ( LArtificial "01000011" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/fact10\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
index d4c64fd20..c4614275d 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" )
+ ( Labeled
+ ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/golden/ws/eval/logged/stn/asciiOff/original/hWorld.logged b/.output/golden/ws/eval/logged/stn/asciiOff/original/hWorld.logged
index 62cd16277..fa789ab5a 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOff/original/hWorld.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOff/original/hWorld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
index d4ad84ab8..775a9f355 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
index c807f9c34..70c9fcfb0 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/locTest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01101100011011110110001101110100011001010111001101110100" )
+ ( Labeled
+ ( LArtificial "01101100011011110110001101110100011001010111001101110100" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
index e6c4ddf5d..70fcbca32 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
index b415410a3..ea53b5ca6 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOff/original/truthMachine0\n.logged"
@@ -12,8 +12,8 @@ dump: Memory
, ILS ( MIO InputDec )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0" )
+ ( Labeled
+ ( LArtificial "0" ) ( Branch EZ )
)
, ICF
( Mark
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Jump
- ( LArtificial "1" )
+ ( Labeled
+ ( LArtificial "1" ) Jump
)
, ICF
( Mark
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
index e341d32f7..e68672e95 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/bottles.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -141,13 +141,13 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -220,8 +220,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
@@ -344,19 +344,19 @@ dump: Memory
( Cons 84 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -477,30 +477,30 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
+ ( Labeled
+ ( LArtificial "LOOP:1" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
+ ( Labeled
+ ( LArtificial "LOOP" ) Jump
)
, ICF
( Mark
@@ -513,18 +513,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -537,8 +537,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
@@ -547,7 +547,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 128
+ , programCounter = 127
, returnStack = IS []
}
, memoryStack = fromList [ 0 ]
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
index 08bd31b64..dfc401116 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello2.logged
@@ -62,8 +62,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, End
, ICF
@@ -72,18 +72,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -96,8 +96,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
index 23d1889db..fbe810fc3 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/hello4.logged
@@ -58,8 +58,8 @@ dump: Memory
( Cons 72 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, End
, ICF
@@ -68,18 +68,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -92,8 +92,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
index 32df691ee..0b9033cc2 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/from-wsa/prim.logged
@@ -90,8 +90,8 @@ dump: Memory
( Cons 112 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, IAL
( SPure
@@ -103,32 +103,32 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
+ ( Labeled
+ ( LArtificial "f_finished_1" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 1 )
@@ -136,13 +136,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
+ ( Labeled
+ ( LArtificial "f_start_1" ) Jump
)
, ICF
( Mark
@@ -159,19 +159,19 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
+ ( Labeled
+ ( LArtificial "f_finished_2" ) ( Branch EZ )
)
, IAL
( SPure
@@ -183,24 +183,24 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
+ ( Labeled
+ ( LArtificial "f_finished_3" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -209,21 +209,21 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
@@ -232,15 +232,15 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, IAL
@@ -257,10 +257,10 @@ dump: Memory
( SPure ( Binary Mul ) )
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -268,13 +268,13 @@ dump: Memory
, ILS Store
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
+ ( Labeled
+ ( LArtificial "f_start_3" ) Jump
)
, ICF
( Mark
@@ -283,13 +283,13 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
+ ( Labeled
+ ( LArtificial "f_start_2" ) Jump
)
, ICF
( Mark
@@ -306,41 +306,41 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
+ ( Labeled
+ ( LArtificial "f_finished_4" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 100 )
+ ( Unary
+ ( UImmediate 100 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
+ ( Labeled
+ ( LArtificial "nodraw" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -353,8 +353,8 @@ dump: Memory
( Cons 32 )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, ICF
( Mark
@@ -362,13 +362,13 @@ dump: Memory
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
+ ( Labeled
+ ( LArtificial "f_start_4" ) Jump
)
, ICF
( Mark
@@ -380,8 +380,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
+ ( Labeled
+ ( LArtificial "printsln" ) Call
)
, End
, ICF
@@ -390,18 +390,18 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
+ ( Labeled
+ ( LArtificial "prints_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Jump
)
, ICF
( Mark
@@ -414,8 +414,8 @@ dump: Memory
( MArtificial "printsln" )
)
, ICF
- ( Labeled Call
- ( LArtificial "prints" )
+ ( Labeled
+ ( LArtificial "prints" ) Call
)
, IAL
( SPure
@@ -424,7 +424,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 105
+ , programCounter = 94
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
index 6cbb2fff8..1d797795c 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
+ ( Labeled
+ ( LArtificial "progend" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
+ ( Labeled
+ ( LArtificial "loop" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/original/count.logged b/.output/golden/ws/eval/logged/stn/asciiOn/original/count.logged
index 80d2cf08c..295a6d24b 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/original/count.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
+ ( Labeled
+ ( LArtificial "E" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "C" )
+ ( Labeled
+ ( LArtificial "C" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/fact10\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
index 3724b13a9..d696c8c37 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
+ ( Labeled
+ ( LArtificial "factbase" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/golden/ws/eval/logged/stn/asciiOn/original/hWorld.logged b/.output/golden/ws/eval/logged/stn/asciiOn/original/hWorld.logged
index 183155c79..549c75cd6 100644
--- a/.output/golden/ws/eval/logged/stn/asciiOn/original/hWorld.logged
+++ b/.output/golden/ws/eval/logged/stn/asciiOn/original/hWorld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
index 6005a7442..4261bac29 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
+ ( Labeled
+ ( LArtificial "endhanoi" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
index 92ad9b7f2..8b88a0eeb 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/locTest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
+ ( Labeled
+ ( LArtificial "loctest" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
index 8ac0fea5e..d5ea6e6fc 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged" "b/.output/golden/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
index 300718081..24f88495d 100644
--- "a/.output/golden/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
+++ "b/.output/golden/ws/eval/logged/stn/asciiOn/original/truthMachine0\n.logged"
@@ -12,8 +12,8 @@ dump: Memory
, ILS ( MIO InputDec )
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
+ ( Labeled
+ ( LArtificial "\x0" ) ( Branch EZ )
)
, ICF
( Mark
@@ -25,8 +25,8 @@ dump: Memory
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
+ ( Labeled
+ ( LArtificial "\x1" ) Jump
)
, ICF
( Mark
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
index 11a0a3c32..e9f52c753 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOff/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01110000011100100110111101100111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "01110000011100100110111101100111011001010110111001100100" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "01101100011011110110111101110000" )
+ ( Labeled
+ ( LArtificial "01101100011011110110111101110000" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/ws/eval/logged/ws/asciiOff/original/count.logged b/.output/golden/ws/eval/logged/ws/asciiOff/original/count.logged
index d421faaf0..651750622 100644
--- a/.output/golden/ws/eval/logged/ws/asciiOff/original/count.logged
+++ b/.output/golden/ws/eval/logged/ws/asciiOff/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "01000101" )
+ ( Labeled
+ ( LArtificial "01000101" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "01000011" )
+ ( Labeled
+ ( LArtificial "01000011" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOff/original/fact10\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
index d4c64fd20..c4614275d 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOff/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" )
+ ( Labeled
+ ( LArtificial "0110011001100001011000110111010001100010011000010111001101100101" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "01100110011000010110001101110100" )
+ ( Labeled
+ ( LArtificial "01100110011000010110001101110100" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
index d4ad84ab8..775a9f355 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOff/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110010101101110011001000110100001100001011011100110111101101001" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "0110100001100001011011100110111101101001" )
+ ( Labeled
+ ( LArtificial "0110100001100001011011100110111101101001" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/golden/ws/eval/logged/ws/asciiOff/original/hworld.logged b/.output/golden/ws/eval/logged/ws/asciiOff/original/hworld.logged
index 62cd16277..fa789ab5a 100644
--- a/.output/golden/ws/eval/logged/ws/asciiOff/original/hworld.logged
+++ b/.output/golden/ws/eval/logged/ws/asciiOff/original/hworld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
index c807f9c34..70c9fcfb0 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOff/original/loctest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "01101100011011110110001101110100011001010111001101110100" )
+ ( Labeled
+ ( LArtificial "01101100011011110110001101110100011001010111001101110100" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
index e6c4ddf5d..70fcbca32 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOff/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "01101110011001010111011101101100011010010110111001100101" )
+ ( Labeled
+ ( LArtificial "01101110011001010111011101101100011010010110111001100101" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "011101110111001001101001011101000110010101011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "0111011101110010011010010111010001100101" )
+ ( Labeled
+ ( LArtificial "0111011101110010011010010111010001100101" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" )
+ ( Labeled
+ ( LArtificial "0111001001100101011000010110010001011111011001010110111001100100" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "01110010011001010110000101100100" )
+ ( Labeled
+ ( LArtificial "01110010011001010110000101100100" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
index 6cbb2fff8..1d797795c 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOn/original/calc-1\n.logged"
@@ -510,12 +510,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -535,8 +535,8 @@ dump: Memory
( Cons 42 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -550,21 +550,21 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons
- ( -1 )
+ ( Unary
+ ( UImmediate
+ ( -1 ) Sub
+ )
)
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
+ ( Labeled
+ ( LArtificial "progend" ) ( Branch EZ )
)
, IAL
( SPure
@@ -579,14 +579,14 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
+ ( Labeled
+ ( LArtificial "loop" ) Jump
)
, ICF
( Mark
@@ -598,8 +598,8 @@ dump: Memory
( Cons 60 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -608,8 +608,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -625,31 +625,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -664,44 +664,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -710,10 +710,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -736,7 +736,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 201
+ , programCounter = 200
, returnStack = IS []
}
, memoryStack = fromList []
diff --git a/.output/golden/ws/eval/logged/ws/asciiOn/original/count.logged b/.output/golden/ws/eval/logged/ws/asciiOn/original/count.logged
index 80d2cf08c..295a6d24b 100644
--- a/.output/golden/ws/eval/logged/ws/asciiOn/original/count.logged
+++ b/.output/golden/ws/eval/logged/ws/asciiOn/original/count.logged
@@ -11,8 +11,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL ( SIO OutputDec )
@@ -23,29 +23,29 @@ dump: Memory
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 11 )
+ ( Unary
+ ( UImmediate 11 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
+ ( Labeled
+ ( LArtificial "E" ) ( Branch EZ )
)
, ICF
- ( Labeled Jump
- ( LArtificial "C" )
+ ( Labeled
+ ( LArtificial "C" ) Jump
)
, ICF
( Mark
@@ -66,31 +66,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -105,44 +105,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -151,10 +151,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
@@ -177,7 +177,7 @@ dump: Memory
, IAL ( SIO OutputChar )
, ICF Return
]
- , programCounter = 16
+ , programCounter = 14
, returnStack = IS []
}
, memoryStack = fromList []
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOn/original/fact10\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
index 3724b13a9..d696c8c37 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOn/original/fact10\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -218,8 +218,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure
@@ -232,13 +232,13 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -247,35 +247,35 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
+ ( Labeled
+ ( LArtificial "factbase" ) ( Branch EZ )
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled Call
- ( LArtificial "fact" )
+ ( Labeled
+ ( LArtificial "fact" ) Call
)
, IAL
( SPure ( Binary Mul ) )
@@ -298,31 +298,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -337,44 +337,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -383,10 +383,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
index 6005a7442..4261bac29 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOn/original/hanoi1\n.logged"
@@ -204,8 +204,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -230,8 +230,8 @@ dump: Memory
( Cons 2 )
)
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, End
, ICF
@@ -244,8 +244,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -255,8 +255,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -266,8 +266,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -277,8 +277,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -288,8 +288,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
+ ( Labeled
+ ( LArtificial "endhanoi" ) ( Branch EZ )
)
, IAL
( SPure
@@ -318,10 +318,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 101 )
@@ -338,8 +338,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -347,8 +347,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -358,8 +358,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -369,8 +369,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -380,8 +380,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -396,8 +396,8 @@ dump: Memory
( Cons 20 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -406,8 +406,8 @@ dump: Memory
, ILS Load
, IAL ( SIO OutputDec )
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, IAL
( SPure
@@ -436,10 +436,10 @@ dump: Memory
, ILS Load
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, IAL
( SPure
( Cons 103 )
@@ -456,8 +456,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
+ ( Labeled
+ ( LArtificial "hanoi" ) Call
)
, IAL
( SPure
@@ -465,8 +465,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -476,8 +476,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -487,8 +487,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -498,8 +498,8 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Move
- ( ImmediateO 1 )
+ ( Indexed
+ ( IImmediate 1 ) Move
)
)
, ILS Store
@@ -521,31 +521,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -560,44 +560,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -606,10 +606,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/golden/ws/eval/logged/ws/asciiOn/original/hworld.logged b/.output/golden/ws/eval/logged/ws/asciiOn/original/hworld.logged
index 183155c79..549c75cd6 100644
--- a/.output/golden/ws/eval/logged/ws/asciiOn/original/hworld.logged
+++ b/.output/golden/ws/eval/logged/ws/asciiOn/original/hworld.logged
@@ -222,12 +222,12 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -243,31 +243,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -282,44 +282,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -328,10 +328,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
index 92ad9b7f2..8b88a0eeb 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOn/original/loctest1\n2\n.logged"
@@ -159,8 +159,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -172,8 +172,8 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
@@ -191,8 +191,8 @@ dump: Memory
)
, ILS Load
, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
+ ( Labeled
+ ( LArtificial "loctest" ) Call
)
, IAL ( SIO OutputDec )
, End
@@ -202,22 +202,22 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Copy
)
)
, IAL
( SPure ( Binary Add ) )
, IAL
( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
+ ( Indexed
+ ( IImmediate 2 ) Slide
)
)
, ICF Return
@@ -234,31 +234,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -273,44 +273,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -319,10 +319,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git "a/.output/golden/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged" "b/.output/golden/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
index 8ac0fea5e..d5ea6e6fc 100644
--- "a/.output/golden/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
+++ "b/.output/golden/ws/eval/logged/ws/asciiOn/original/nameWriteOnly\n.logged"
@@ -294,36 +294,36 @@ dump: Memory
( Cons 0 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Call
)
, IAL
( SPure
( Cons 30 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, IAL
( SPure
( Cons 100 )
)
, ICF
- ( Labeled Call
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Call
)
, ICF
- ( Labeled Call
- ( LArtificial "newline" )
+ ( Labeled
+ ( LArtificial "newline" ) Call
)
, End
, ICF
@@ -339,31 +339,31 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
+ ( Labeled
+ ( LArtificial "write_end" ) ( Branch EZ )
)
, IAL ( SIO OutputChar )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "write" )
+ ( Labeled
+ ( LArtificial "write" ) Jump
)
, ICF
( Mark
@@ -378,44 +378,44 @@ dump: Memory
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, ILS ( MIO InputChar )
, ILS Load
, IAL
( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
+ ( Indexed
+ ( IImmediate 0 ) Copy
)
)
, IAL
( SPure
- ( Cons 10 )
+ ( Unary
+ ( UImmediate 10 Sub )
+ )
)
- , IAL
- ( SPure ( Binary Sub ) )
, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
+ ( Labeled
+ ( LArtificial "read_end" ) ( Branch EZ )
)
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, ICF
- ( Labeled Jump
- ( LArtificial "read" )
+ ( Labeled
+ ( LArtificial "read" ) Jump
)
, ICF
( Mark
@@ -424,10 +424,10 @@ dump: Memory
, IAL ( SPure Discard )
, IAL
( SPure
- ( Cons 1 )
+ ( Unary
+ ( UImmediate 1 Add )
+ )
)
- , IAL
- ( SPure ( Binary Add ) )
, IAL
( SPure
( Cons 0 )
diff --git a/.output/golden/ws/il/optimized/from-wsa/bottles.il b/.output/golden/ws/il/optimized/from-wsa/bottles.il
index 9cbf81b80..b62c76af0 100644
--- a/.output/golden/ws/il/optimized/from-wsa/bottles.il
+++ b/.output/golden/ws/il/optimized/from-wsa/bottles.il
@@ -1,546 +1,145 @@
-[ IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP:1" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 3)
+
+Mark (MArtificial "LOOP")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+Labeled (LArtificial "printsln") Call
+SPure (Unary (UImmediate 1 Sub))
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "LOOP:1") (Branch EZ)
+Labeled (LArtificial "LOOP") Jump
+
+Mark (MArtificial "LOOP:1")
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/from-wsa/hello.il b/.output/golden/ws/il/optimized/from-wsa/hello.il
index d6ebfb03e..810994ec0 100644
--- a/.output/golden/ws/il/optimized/from-wsa/hello.il
+++ b/.output/golden/ws/il/optimized/from-wsa/hello.il
@@ -1,72 +1,29 @@
-[ IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+End
diff --git a/.output/golden/ws/il/optimized/from-wsa/hello2.il b/.output/golden/ws/il/optimized/from-wsa/hello2.il
index d98e121f2..0581fba7e 100644
--- a/.output/golden/ws/il/optimized/from-wsa/hello2.il
+++ b/.output/golden/ws/il/optimized/from-wsa/hello2.il
@@ -1,105 +1,33 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "prints") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/from-wsa/hello4.il b/.output/golden/ws/il/optimized/from-wsa/hello4.il
index 69bf91bba..b149339c6 100644
--- a/.output/golden/ws/il/optimized/from-wsa/hello4.il
+++ b/.output/golden/ws/il/optimized/from-wsa/hello4.il
@@ -1,101 +1,32 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/from-wsa/prim.il b/.output/golden/ws/il/optimized/from-wsa/prim.il
index 730749f61..079896ed6 100644
--- a/.output/golden/ws/il/optimized/from-wsa/prim.il
+++ b/.output/golden/ws/il/optimized/from-wsa/prim.il
@@ -1,423 +1,120 @@
-[ ICF
- ( Mark
- ( MArtificial "st" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 93 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 91 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_1" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_2" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Mul ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_3" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_2" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_4" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+
+Mark (MArtificial "st")
+SPure (Cons 0)
+SPure (Cons 93)
+SPure (Cons 48)
+SPure (Cons 48)
+SPure (Cons 49)
+SPure (Cons 45)
+SPure (Cons 50)
+SPure (Cons 91)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 109)
+SPure (Cons 117)
+SPure (Cons 110)
+SPure (Cons 32)
+SPure (Cons 109)
+SPure (Cons 105)
+SPure (Cons 114)
+SPure (Cons 112)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+
+Mark (MArtificial "f_start_1")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_1") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Add))
+SPure (Cons 1)
+Store
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_1") Jump
+
+Mark (MArtificial "f_finished_1")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_2")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 11 Sub))
+Labeled (LArtificial "f_finished_2") (Branch EZ)
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_3")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_3") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 2)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Cons 1)
+Load
+SPure (Cons 2)
+Load
+SPure (Binary Mul)
+SPure (Unary (UImmediate 100 Add))
+SPure (Cons 0)
+Store
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_3") Jump
+
+Mark (MArtificial "f_finished_3")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_2") Jump
+
+Mark (MArtificial "f_finished_2")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_4")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Sub))
+Labeled (LArtificial "f_finished_4") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 100 Add))
+Load
+Labeled (LArtificial "nodraw") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+
+Mark (MArtificial "nodraw")
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "f_start_4") Jump
+
+Mark (MArtificial "f_finished_4")
+SPure Discard
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/from-wsa/true.il b/.output/golden/ws/il/optimized/from-wsa/true.il
index 7f93ef7d9..528694d82 100644
--- a/.output/golden/ws/il/optimized/from-wsa/true.il
+++ b/.output/golden/ws/il/optimized/from-wsa/true.il
@@ -1 +1 @@
-[ End ]
\ No newline at end of file
+End
diff --git a/.output/golden/ws/il/optimized/original/calc.il b/.output/golden/ws/il/optimized/original/calc.il
index efc0fc485..ccee63384 100644
--- a/.output/golden/ws/il/optimized/original/calc.il
+++ b/.output/golden/ws/il/optimized/original/calc.il
@@ -1,735 +1,246 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, IAL
- ( SPure
- ( Cons 78 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 47 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 64 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 67 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "loop" )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
- )
-, ICF
- ( Mark
- ( MArtificial "progend" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 115)
+Store
+SPure (Cons 7)
+SPure (Cons 111)
+Store
+SPure (Cons 8)
+SPure (Cons 109)
+Store
+SPure (Cons 9)
+SPure (Cons 101)
+Store
+SPure (Cons 10)
+SPure (Cons 32)
+Store
+SPure (Cons 11)
+SPure (Cons 110)
+Store
+SPure (Cons 12)
+SPure (Cons 117)
+Store
+SPure (Cons 13)
+SPure (Cons 109)
+Store
+SPure (Cons 14)
+SPure (Cons 98)
+Store
+SPure (Cons 15)
+SPure (Cons 101)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 115)
+Store
+SPure (Cons 18)
+SPure (Cons 44)
+Store
+SPure (Cons 19)
+SPure (Cons 32)
+Store
+SPure (Cons 20)
+SPure (Cons 116)
+Store
+SPure (Cons 21)
+SPure (Cons 104)
+Store
+SPure (Cons 22)
+SPure (Cons 101)
+Store
+SPure (Cons 23)
+SPure (Cons 110)
+Store
+SPure (Cons 24)
+SPure (Cons 32)
+Store
+SPure (Cons 25)
+SPure (Cons 45)
+Store
+SPure (Cons 26)
+SPure (Cons 49)
+Store
+SPure (Cons 27)
+SPure (Cons 32)
+Store
+SPure (Cons 28)
+SPure (Cons 116)
+Store
+SPure (Cons 29)
+SPure (Cons 111)
+Store
+SPure (Cons 30)
+SPure (Cons 32)
+Store
+SPure (Cons 31)
+SPure (Cons 102)
+Store
+SPure (Cons 32)
+SPure (Cons 105)
+Store
+SPure (Cons 33)
+SPure (Cons 110)
+Store
+SPure (Cons 34)
+SPure (Cons 105)
+Store
+SPure (Cons 35)
+SPure (Cons 115)
+Store
+SPure (Cons 36)
+SPure (Cons 104)
+Store
+SPure (Cons 37)
+SPure (Cons 0)
+Store
+SPure (Cons 42)
+SPure (Cons 78)
+Store
+SPure (Cons 43)
+SPure (Cons 117)
+Store
+SPure (Cons 44)
+SPure (Cons 109)
+Store
+SPure (Cons 45)
+SPure (Cons 98)
+Store
+SPure (Cons 46)
+SPure (Cons 101)
+Store
+SPure (Cons 47)
+SPure (Cons 114)
+Store
+SPure (Cons 48)
+SPure (Cons 58)
+Store
+SPure (Cons 49)
+SPure (Cons 0)
+Store
+SPure (Cons 60)
+SPure (Cons 84)
+Store
+SPure (Cons 61)
+SPure (Cons 111)
+Store
+SPure (Cons 62)
+SPure (Cons 116)
+Store
+SPure (Cons 63)
+SPure (Cons 97)
+Store
+SPure (Cons 64)
+SPure (Cons 108)
+Store
+SPure (Cons 65)
+SPure (Cons 32)
+Store
+SPure (Cons 66)
+SPure (Cons 105)
+Store
+SPure (Cons 67)
+SPure (Cons 115)
+Store
+SPure (Cons 68)
+SPure (Cons 32)
+Store
+SPure (Cons 69)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+SPure (Cons 0)
+Store
+
+Mark (MArtificial "loop")
+SPure (Cons 42)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 101)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate (-1) Sub))
+Labeled (LArtificial "progend") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Binary Add)
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+Labeled (LArtificial "loop") Jump
+
+Mark (MArtificial "progend")
+SPure Discard
+SPure (Cons 60)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/count.il b/.output/golden/ws/il/optimized/original/count.il
index fbad311e4..9675b61ad 100644
--- a/.output/golden/ws/il/optimized/original/count.il
+++ b/.output/golden/ws/il/optimized/original/count.il
@@ -1,176 +1,60 @@
-[ IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MArtificial "C" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "C" )
- )
-, ICF
- ( Mark
- ( MArtificial "E" )
- )
-, IAL ( SPure Discard )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 1)
+
+Mark (MArtificial "C")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 10)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 11 Sub))
+Labeled (LArtificial "E") (Branch EZ)
+Labeled (LArtificial "C") Jump
+
+Mark (MArtificial "E")
+SPure Discard
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/fact.il b/.output/golden/ws/il/optimized/original/fact.il
index b136631b2..1d1a66a58 100644
--- a/.output/golden/ws/il/optimized/original/fact.il
+++ b/.output/golden/ws/il/optimized/original/fact.il
@@ -1,408 +1,138 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure ( Binary Mul ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "factbase" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 33)
+Store
+SPure (Cons 21)
+SPure (Cons 32)
+Store
+SPure (Cons 22)
+SPure (Cons 61)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+Labeled (LArtificial "fact") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "fact")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LArtificial "factbase") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 1 Sub))
+Labeled (LArtificial "fact") Call
+SPure (Binary Mul)
+Return
+
+Mark (MArtificial "factbase")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/hWorld.il b/.output/golden/ws/il/optimized/original/hWorld.il
index 65a60dd01..539715d4e 100644
--- a/.output/golden/ws/il/optimized/original/hWorld.il
+++ b/.output/golden/ws/il/optimized/original/hWorld.il
@@ -1,353 +1,120 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 72)
+Store
+SPure (Cons 1)
+SPure (Cons 101)
+Store
+SPure (Cons 2)
+SPure (Cons 108)
+Store
+SPure (Cons 3)
+SPure (Cons 108)
+Store
+SPure (Cons 4)
+SPure (Cons 111)
+Store
+SPure (Cons 5)
+SPure (Cons 44)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 119)
+Store
+SPure (Cons 8)
+SPure (Cons 111)
+Store
+SPure (Cons 9)
+SPure (Cons 114)
+Store
+SPure (Cons 10)
+SPure (Cons 108)
+Store
+SPure (Cons 11)
+SPure (Cons 100)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 111)
+Store
+SPure (Cons 14)
+SPure (Cons 102)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 115)
+Store
+SPure (Cons 17)
+SPure (Cons 112)
+Store
+SPure (Cons 18)
+SPure (Cons 97)
+Store
+SPure (Cons 19)
+SPure (Cons 99)
+Store
+SPure (Cons 20)
+SPure (Cons 101)
+Store
+SPure (Cons 21)
+SPure (Cons 115)
+Store
+SPure (Cons 22)
+SPure (Cons 33)
+Store
+SPure (Cons 23)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/hanoi.il b/.output/golden/ws/il/optimized/original/hanoi.il
index a855b81fb..21cc266fa 100644
--- a/.output/golden/ws/il/optimized/original/hanoi.il
+++ b/.output/golden/ws/il/optimized/original/hanoi.il
@@ -1,631 +1,210 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "endhanoi" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 32)
+Store
+SPure (Cons 21)
+SPure (Cons 45)
+Store
+SPure (Cons 22)
+SPure (Cons 62)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Cons 3)
+SPure (Cons 2)
+Labeled (LArtificial "hanoi") Call
+End
+
+Mark (MArtificial "hanoi")
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+Load
+Labeled (LArtificial "endhanoi") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Unary (UImmediate 1 Sub))
+SPure (Cons 101)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SPure (Cons 102)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Unary (UImmediate 1 Sub))
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+
+Mark (MArtificial "endhanoi")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/helloWorld.il b/.output/golden/ws/il/optimized/original/helloWorld.il
index a1823c1d8..ecdd99958 100644
--- a/.output/golden/ws/il/optimized/original/helloWorld.il
+++ b/.output/golden/ws/il/optimized/original/helloWorld.il
@@ -1,62 +1,25 @@
-[ IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 72)
+SIO OutputChar
+SPure (Cons 101)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+SPure (Cons 119)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 114)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 100)
+SIO OutputChar
+End
diff --git a/.output/golden/ws/il/optimized/original/locTest.il b/.output/golden/ws/il/optimized/original/locTest.il
index ed73dd5d8..ec8de2a3f 100644
--- a/.output/golden/ws/il/optimized/original/locTest.il
+++ b/.output/golden/ws/il/optimized/original/locTest.il
@@ -1,344 +1,117 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
- )
-, IAL ( SIO OutputDec )
-, End
-, ICF
- ( Mark
- ( MArtificial "loctest" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
- )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "loctest") Call
+SIO OutputDec
+End
+
+Mark (MArtificial "loctest")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 2) Copy)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 2) Slide)
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/name.il b/.output/golden/ws/il/optimized/original/name.il
index 5172c96ad..256994b54 100644
--- a/.output/golden/ws/il/optimized/original/name.il
+++ b/.output/golden/ws/il/optimized/original/name.il
@@ -1,449 +1,150 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 80 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 121 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "read" )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 80)
+Store
+SPure (Cons 1)
+SPure (Cons 108)
+Store
+SPure (Cons 2)
+SPure (Cons 101)
+Store
+SPure (Cons 3)
+SPure (Cons 97)
+Store
+SPure (Cons 4)
+SPure (Cons 115)
+Store
+SPure (Cons 5)
+SPure (Cons 101)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 101)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 116)
+Store
+SPure (Cons 10)
+SPure (Cons 101)
+Store
+SPure (Cons 11)
+SPure (Cons 114)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 121)
+Store
+SPure (Cons 14)
+SPure (Cons 111)
+Store
+SPure (Cons 15)
+SPure (Cons 117)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 32)
+Store
+SPure (Cons 18)
+SPure (Cons 110)
+Store
+SPure (Cons 19)
+SPure (Cons 97)
+Store
+SPure (Cons 20)
+SPure (Cons 109)
+Store
+SPure (Cons 21)
+SPure (Cons 101)
+Store
+SPure (Cons 22)
+SPure (Cons 58)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 30)
+SPure (Cons 72)
+Store
+SPure (Cons 31)
+SPure (Cons 101)
+Store
+SPure (Cons 32)
+SPure (Cons 108)
+Store
+SPure (Cons 33)
+SPure (Cons 108)
+Store
+SPure (Cons 34)
+SPure (Cons 111)
+Store
+SPure (Cons 35)
+SPure (Cons 32)
+Store
+SPure (Cons 36)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "read") Call
+SPure (Cons 30)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Unary (UImmediate 10 Sub))
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Unary (UImmediate 1 Add))
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/optimized/original/truthMachine.il b/.output/golden/ws/il/optimized/original/truthMachine.il
index fa8255be1..3674303af 100644
--- a/.output/golden/ws/il/optimized/original/truthMachine.il
+++ b/.output/golden/ws/il/optimized/original/truthMachine.il
@@ -1,38 +1,15 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS ( MIO InputDec )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x1" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x0" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SIO OutputDec )
-, End
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 0)
+MIO InputDec
+Load
+Labeled (LArtificial "\NUL") (Branch EZ)
+
+Mark (MArtificial "\SOH")
+SPure (Cons 1)
+SIO OutputDec
+Labeled (LArtificial "\SOH") Jump
+
+Mark (MArtificial "\NUL")
+SPure (Cons 0)
+SIO OutputDec
+End
diff --git a/.output/golden/ws/il/parsed/from-wsa/bottles.il b/.output/golden/ws/il/parsed/from-wsa/bottles.il
index 9cbf81b80..0d4417f22 100644
--- a/.output/golden/ws/il/parsed/from-wsa/bottles.il
+++ b/.output/golden/ws/il/parsed/from-wsa/bottles.il
@@ -1,546 +1,146 @@
-[ IAL
- ( SPure
- ( Cons 3 )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 107 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "LOOP:1" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "LOOP" )
- )
-, ICF
- ( Mark
- ( MArtificial "LOOP:1" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 3)
+
+Mark (MArtificial "LOOP")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+SPure (Cons 100)
+SPure (Cons 110)
+SPure (Cons 117)
+SPure (Cons 111)
+SPure (Cons 114)
+SPure (Cons 97)
+SPure (Cons 32)
+SPure (Cons 116)
+SPure (Cons 105)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 115)
+SPure (Cons 97)
+SPure (Cons 112)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 110)
+SPure (Cons 119)
+SPure (Cons 111)
+SPure (Cons 100)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 107)
+SPure (Cons 97)
+SPure (Cons 84)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 97)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 101)
+SPure (Cons 104)
+SPure (Cons 116)
+SPure (Cons 32)
+SPure (Cons 110)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 32)
+SPure (Cons 102)
+SPure (Cons 111)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 101)
+SPure (Cons 108)
+SPure (Cons 116)
+SPure (Cons 116)
+SPure (Cons 111)
+SPure (Cons 98)
+SPure (Cons 32)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "LOOP:1") (Branch EZ)
+Labeled (LArtificial "LOOP") Jump
+
+Mark (MArtificial "LOOP:1")
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/from-wsa/hello.il b/.output/golden/ws/il/parsed/from-wsa/hello.il
index d6ebfb03e..810994ec0 100644
--- a/.output/golden/ws/il/parsed/from-wsa/hello.il
+++ b/.output/golden/ws/il/parsed/from-wsa/hello.il
@@ -1,72 +1,29 @@
-[ IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+SIO OutputChar
+End
diff --git a/.output/golden/ws/il/parsed/from-wsa/hello2.il b/.output/golden/ws/il/parsed/from-wsa/hello2.il
index d98e121f2..0581fba7e 100644
--- a/.output/golden/ws/il/parsed/from-wsa/hello2.il
+++ b/.output/golden/ws/il/parsed/from-wsa/hello2.il
@@ -1,105 +1,33 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 10)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "prints") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/from-wsa/hello4.il b/.output/golden/ws/il/parsed/from-wsa/hello4.il
index 69bf91bba..b149339c6 100644
--- a/.output/golden/ws/il/parsed/from-wsa/hello4.il
+++ b/.output/golden/ws/il/parsed/from-wsa/hello4.il
@@ -1,101 +1,32 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 33)
+SPure (Cons 100)
+SPure (Cons 108)
+SPure (Cons 114)
+SPure (Cons 111)
+SPure (Cons 119)
+SPure (Cons 32)
+SPure (Cons 44)
+SPure (Cons 111)
+SPure (Cons 108)
+SPure (Cons 108)
+SPure (Cons 101)
+SPure (Cons 72)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/from-wsa/prim.il b/.output/golden/ws/il/parsed/from-wsa/prim.il
index 730749f61..72865a7c1 100644
--- a/.output/golden/ws/il/parsed/from-wsa/prim.il
+++ b/.output/golden/ws/il/parsed/from-wsa/prim.il
@@ -1,423 +1,131 @@
-[ ICF
- ( Mark
- ( MArtificial "st" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 93 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 50 )
- )
-, IAL
- ( SPure
- ( Cons 91 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_1" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_1" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_1" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_2" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_2" )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_3" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Mul ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_3" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_3" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_2" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_2" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Mark
- ( MArtificial "f_start_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "f_finished_4" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "nodraw" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "f_start_4" )
- )
-, ICF
- ( Mark
- ( MArtificial "f_finished_4" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "printsln" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "prints_end" )
- )
-, IAL ( SIO OutputChar )
-, ICF
- ( Labeled Jump
- ( LArtificial "prints" )
- )
-, ICF
- ( Mark
- ( MArtificial "prints_end" )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "printsln" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "prints" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+
+Mark (MArtificial "st")
+SPure (Cons 0)
+SPure (Cons 93)
+SPure (Cons 48)
+SPure (Cons 48)
+SPure (Cons 49)
+SPure (Cons 45)
+SPure (Cons 50)
+SPure (Cons 91)
+SPure (Cons 32)
+SPure (Cons 115)
+SPure (Cons 114)
+SPure (Cons 101)
+SPure (Cons 98)
+SPure (Cons 109)
+SPure (Cons 117)
+SPure (Cons 110)
+SPure (Cons 32)
+SPure (Cons 109)
+SPure (Cons 105)
+SPure (Cons 114)
+SPure (Cons 112)
+Labeled (LArtificial "printsln") Call
+SPure (Cons 0)
+
+Mark (MArtificial "f_start_1")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_1") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Add)
+SPure (Cons 1)
+Store
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_1") Jump
+
+Mark (MArtificial "f_finished_1")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_2")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 11)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_2") (Branch EZ)
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_3")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_3") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 2)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Indexed (IImmediate 1) Move)
+SPure (Cons 1)
+Load
+SPure (Cons 2)
+Load
+SPure (Binary Mul)
+SPure (Cons 100)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_3") Jump
+
+Mark (MArtificial "f_finished_3")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_2") Jump
+
+Mark (MArtificial "f_finished_2")
+SPure Discard
+SPure (Cons 2)
+
+Mark (MArtificial "f_start_4")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Sub)
+Labeled (LArtificial "f_finished_4") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 100)
+SPure (Binary Add)
+Load
+Labeled (LArtificial "nodraw") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 0)
+SPure (Cons 32)
+Labeled (LArtificial "prints") Call
+
+Mark (MArtificial "nodraw")
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "f_start_4") Jump
+
+Mark (MArtificial "f_finished_4")
+SPure Discard
+SPure (Cons 0)
+Labeled (LArtificial "printsln") Call
+End
+
+Mark (MArtificial "prints")
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "prints_end") (Branch EZ)
+SIO OutputChar
+Labeled (LArtificial "prints") Jump
+
+Mark (MArtificial "prints_end")
+SPure Discard
+Return
+
+Mark (MArtificial "printsln")
+Labeled (LArtificial "prints") Call
+SPure (Cons 10)
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/from-wsa/true.il b/.output/golden/ws/il/parsed/from-wsa/true.il
index 7f93ef7d9..528694d82 100644
--- a/.output/golden/ws/il/parsed/from-wsa/true.il
+++ b/.output/golden/ws/il/parsed/from-wsa/true.il
@@ -1 +1 @@
-[ End ]
\ No newline at end of file
+End
diff --git a/.output/golden/ws/il/parsed/original/calc.il b/.output/golden/ws/il/parsed/original/calc.il
index efc0fc485..c8b0cdc0a 100644
--- a/.output/golden/ws/il/parsed/original/calc.il
+++ b/.output/golden/ws/il/parsed/original/calc.il
@@ -1,735 +1,251 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 25 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 26 )
- )
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 27 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 28 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 29 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 104 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 37 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, IAL
- ( SPure
- ( Cons 78 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 43 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 46 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 47 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 48 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 49 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, IAL
- ( SPure
- ( Cons 84 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 63 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 64 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 65 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 66 )
- )
-, IAL
- ( SPure
- ( Cons 105 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 67 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 68 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "loop" )
- )
-, IAL
- ( SPure
- ( Cons 42 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons
- ( -1 )
- )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "progend" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Labeled Jump
- ( LArtificial "loop" )
- )
-, ICF
- ( Mark
- ( MArtificial "progend" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 60 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 115)
+Store
+SPure (Cons 7)
+SPure (Cons 111)
+Store
+SPure (Cons 8)
+SPure (Cons 109)
+Store
+SPure (Cons 9)
+SPure (Cons 101)
+Store
+SPure (Cons 10)
+SPure (Cons 32)
+Store
+SPure (Cons 11)
+SPure (Cons 110)
+Store
+SPure (Cons 12)
+SPure (Cons 117)
+Store
+SPure (Cons 13)
+SPure (Cons 109)
+Store
+SPure (Cons 14)
+SPure (Cons 98)
+Store
+SPure (Cons 15)
+SPure (Cons 101)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 115)
+Store
+SPure (Cons 18)
+SPure (Cons 44)
+Store
+SPure (Cons 19)
+SPure (Cons 32)
+Store
+SPure (Cons 20)
+SPure (Cons 116)
+Store
+SPure (Cons 21)
+SPure (Cons 104)
+Store
+SPure (Cons 22)
+SPure (Cons 101)
+Store
+SPure (Cons 23)
+SPure (Cons 110)
+Store
+SPure (Cons 24)
+SPure (Cons 32)
+Store
+SPure (Cons 25)
+SPure (Cons 45)
+Store
+SPure (Cons 26)
+SPure (Cons 49)
+Store
+SPure (Cons 27)
+SPure (Cons 32)
+Store
+SPure (Cons 28)
+SPure (Cons 116)
+Store
+SPure (Cons 29)
+SPure (Cons 111)
+Store
+SPure (Cons 30)
+SPure (Cons 32)
+Store
+SPure (Cons 31)
+SPure (Cons 102)
+Store
+SPure (Cons 32)
+SPure (Cons 105)
+Store
+SPure (Cons 33)
+SPure (Cons 110)
+Store
+SPure (Cons 34)
+SPure (Cons 105)
+Store
+SPure (Cons 35)
+SPure (Cons 115)
+Store
+SPure (Cons 36)
+SPure (Cons 104)
+Store
+SPure (Cons 37)
+SPure (Cons 0)
+Store
+SPure (Cons 42)
+SPure (Cons 78)
+Store
+SPure (Cons 43)
+SPure (Cons 117)
+Store
+SPure (Cons 44)
+SPure (Cons 109)
+Store
+SPure (Cons 45)
+SPure (Cons 98)
+Store
+SPure (Cons 46)
+SPure (Cons 101)
+Store
+SPure (Cons 47)
+SPure (Cons 114)
+Store
+SPure (Cons 48)
+SPure (Cons 58)
+Store
+SPure (Cons 49)
+SPure (Cons 0)
+Store
+SPure (Cons 60)
+SPure (Cons 84)
+Store
+SPure (Cons 61)
+SPure (Cons 111)
+Store
+SPure (Cons 62)
+SPure (Cons 116)
+Store
+SPure (Cons 63)
+SPure (Cons 97)
+Store
+SPure (Cons 64)
+SPure (Cons 108)
+Store
+SPure (Cons 65)
+SPure (Cons 32)
+Store
+SPure (Cons 66)
+SPure (Cons 105)
+Store
+SPure (Cons 67)
+SPure (Cons 115)
+Store
+SPure (Cons 68)
+SPure (Cons 32)
+Store
+SPure (Cons 69)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+SPure (Cons 0)
+Store
+
+Mark (MArtificial "loop")
+SPure (Cons 42)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 101)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons (-1))
+SPure (Binary Sub)
+Labeled (LArtificial "progend") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Binary Add)
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+Labeled (LArtificial "loop") Jump
+
+Mark (MArtificial "progend")
+SPure Discard
+SPure (Cons 60)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/count.il b/.output/golden/ws/il/parsed/original/count.il
index fbad311e4..92cabbb58 100644
--- a/.output/golden/ws/il/parsed/original/count.il
+++ b/.output/golden/ws/il/parsed/original/count.il
@@ -1,176 +1,66 @@
-[ IAL
- ( SPure
- ( Cons 1 )
- )
-, ICF
- ( Mark
- ( MArtificial "C" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "E" )
- )
-, ICF
- ( Labeled Jump
- ( LArtificial "C" )
- )
-, ICF
- ( Mark
- ( MArtificial "E" )
- )
-, IAL ( SPure Discard )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 1)
+
+Mark (MArtificial "C")
+SPure (Indexed (IImmediate 0) Copy)
+SIO OutputDec
+SPure (Cons 10)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 11)
+SPure (Binary Sub)
+Labeled (LArtificial "E") (Branch EZ)
+Labeled (LArtificial "C") Jump
+
+Mark (MArtificial "E")
+SPure Discard
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/fact.il b/.output/golden/ws/il/parsed/original/fact.il
index 456407ef5..cfc111811 100644
--- a/.output/golden/ws/il/parsed/original/fact.il
+++ b/.output/golden/ws/il/parsed/original/fact.il
@@ -1,413 +1,146 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 61 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "fact" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled Call
- ( LArtificial "fact" )
- )
-, IAL
- ( SPure ( Binary Mul ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "factbase" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 33)
+Store
+SPure (Cons 21)
+SPure (Cons 32)
+Store
+SPure (Cons 22)
+SPure (Cons 61)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+Labeled (LArtificial "fact") Call
+SPure (Cons 100)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "fact")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Binary Sub)
+Labeled (LArtificial "factbase") (Branch EZ)
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 1)
+SPure (Binary Sub)
+Labeled (LArtificial "fact") Call
+SPure (Binary Mul)
+Return
+
+Mark (MArtificial "factbase")
+SPure (Cons 1)
+SPure Discard
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/hWorld.il b/.output/golden/ws/il/parsed/original/hWorld.il
index 65a60dd01..39380554a 100644
--- a/.output/golden/ws/il/parsed/original/hWorld.il
+++ b/.output/golden/ws/il/parsed/original/hWorld.il
@@ -1,353 +1,124 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 112 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 99 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 72)
+Store
+SPure (Cons 1)
+SPure (Cons 101)
+Store
+SPure (Cons 2)
+SPure (Cons 108)
+Store
+SPure (Cons 3)
+SPure (Cons 108)
+Store
+SPure (Cons 4)
+SPure (Cons 111)
+Store
+SPure (Cons 5)
+SPure (Cons 44)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 119)
+Store
+SPure (Cons 8)
+SPure (Cons 111)
+Store
+SPure (Cons 9)
+SPure (Cons 114)
+Store
+SPure (Cons 10)
+SPure (Cons 108)
+Store
+SPure (Cons 11)
+SPure (Cons 100)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 111)
+Store
+SPure (Cons 14)
+SPure (Cons 102)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 115)
+Store
+SPure (Cons 17)
+SPure (Cons 112)
+Store
+SPure (Cons 18)
+SPure (Cons 97)
+Store
+SPure (Cons 19)
+SPure (Cons 99)
+Store
+SPure (Cons 20)
+SPure (Cons 101)
+Store
+SPure (Cons 21)
+SPure (Cons 115)
+Store
+SPure (Cons 22)
+SPure (Cons 33)
+Store
+SPure (Cons 23)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/hanoi.il b/.output/golden/ws/il/parsed/original/hanoi.il
index a855b81fb..0042b9aa4 100644
--- a/.output/golden/ws/il/parsed/original/hanoi.il
+++ b/.output/golden/ws/il/parsed/original/hanoi.il
@@ -1,631 +1,216 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 45 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 62 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "endhanoi" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "hanoi" )
- )
-, IAL
- ( SPure
- ( Cons 103 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 102 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL
- ( SPure
- ( Indexed Move
- ( ImmediateO 1 )
- )
- )
-, ILS Store
-, ICF
- ( Mark
- ( MArtificial "endhanoi" )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 20)
+SPure (Cons 32)
+Store
+SPure (Cons 21)
+SPure (Cons 45)
+Store
+SPure (Cons 22)
+SPure (Cons 62)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Cons 3)
+SPure (Cons 2)
+Labeled (LArtificial "hanoi") Call
+End
+
+Mark (MArtificial "hanoi")
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+Load
+Labeled (LArtificial "endhanoi") (Branch EZ)
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 101)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+Load
+SIO OutputDec
+SPure (Cons 20)
+Labeled (LArtificial "write") Call
+SPure (Cons 102)
+Load
+SIO OutputDec
+Labeled (LArtificial "newline") Call
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 103)
+Load
+SPure (Cons 100)
+Load
+SPure (Cons 1)
+SPure (Binary Sub)
+SPure (Cons 103)
+Load
+SPure (Cons 102)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "hanoi") Call
+SPure (Cons 103)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 102)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 101)
+SPure (Indexed (IImmediate 1) Move)
+Store
+SPure (Cons 100)
+SPure (Indexed (IImmediate 1) Move)
+Store
+
+Mark (MArtificial "endhanoi")
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/helloWorld.il b/.output/golden/ws/il/parsed/original/helloWorld.il
index a1823c1d8..ecdd99958 100644
--- a/.output/golden/ws/il/parsed/original/helloWorld.il
+++ b/.output/golden/ws/il/parsed/original/helloWorld.il
@@ -1,62 +1,25 @@
-[ IAL
- ( SPure
- ( Cons 72 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 44 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 119 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, IAL ( SIO OutputChar )
-, End
-]
\ No newline at end of file
+SPure (Cons 72)
+SIO OutputChar
+SPure (Cons 101)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 44)
+SIO OutputChar
+SPure (Cons 32)
+SIO OutputChar
+SPure (Cons 119)
+SIO OutputChar
+SPure (Cons 111)
+SIO OutputChar
+SPure (Cons 114)
+SIO OutputChar
+SPure (Cons 108)
+SIO OutputChar
+SPure (Cons 100)
+SIO OutputChar
+End
diff --git a/.output/golden/ws/il/parsed/original/locTest.il b/.output/golden/ws/il/parsed/original/locTest.il
index ed73dd5d8..470861ea4 100644
--- a/.output/golden/ws/il/parsed/original/locTest.il
+++ b/.output/golden/ws/il/parsed/original/locTest.il
@@ -1,344 +1,121 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 69 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 98 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS ( MIO InputDec )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Load
-, ICF
- ( Labeled Call
- ( LArtificial "loctest" )
- )
-, IAL ( SIO OutputDec )
-, End
-, ICF
- ( Mark
- ( MArtificial "loctest" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 2 )
- )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Indexed Slide
- ( ImmediateO 2 )
- )
- )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 69)
+Store
+SPure (Cons 1)
+SPure (Cons 110)
+Store
+SPure (Cons 2)
+SPure (Cons 116)
+Store
+SPure (Cons 3)
+SPure (Cons 101)
+Store
+SPure (Cons 4)
+SPure (Cons 114)
+Store
+SPure (Cons 5)
+SPure (Cons 32)
+Store
+SPure (Cons 6)
+SPure (Cons 97)
+Store
+SPure (Cons 7)
+SPure (Cons 32)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 117)
+Store
+SPure (Cons 10)
+SPure (Cons 109)
+Store
+SPure (Cons 11)
+SPure (Cons 98)
+Store
+SPure (Cons 12)
+SPure (Cons 101)
+Store
+SPure (Cons 13)
+SPure (Cons 114)
+Store
+SPure (Cons 14)
+SPure (Cons 58)
+Store
+SPure (Cons 15)
+SPure (Cons 32)
+Store
+SPure (Cons 16)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+MIO InputDec
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 101)
+MIO InputDec
+SPure (Cons 100)
+Load
+SPure (Cons 101)
+Load
+Labeled (LArtificial "loctest") Call
+SIO OutputDec
+End
+
+Mark (MArtificial "loctest")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 2) Copy)
+SPure (Binary Add)
+SPure (Indexed (IImmediate 2) Slide)
+Return
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/name.il b/.output/golden/ws/il/parsed/original/name.il
index 5172c96ad..ec1c152fe 100644
--- a/.output/golden/ws/il/parsed/original/name.il
+++ b/.output/golden/ws/il/parsed/original/name.il
@@ -1,449 +1,154 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Cons 80 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 2 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 3 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 4 )
- )
-, IAL
- ( SPure
- ( Cons 115 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 5 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 6 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 7 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 8 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 9 )
- )
-, IAL
- ( SPure
- ( Cons 116 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 11 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 12 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL
- ( SPure
- ( Cons 121 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 14 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 15 )
- )
-, IAL
- ( SPure
- ( Cons 117 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 16 )
- )
-, IAL
- ( SPure
- ( Cons 114 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 17 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 18 )
- )
-, IAL
- ( SPure
- ( Cons 110 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 19 )
- )
-, IAL
- ( SPure
- ( Cons 97 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 20 )
- )
-, IAL
- ( SPure
- ( Cons 109 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 21 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 22 )
- )
-, IAL
- ( SPure
- ( Cons 58 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 23 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 24 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, IAL
- ( SPure
- ( Cons 72 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 31 )
- )
-, IAL
- ( SPure
- ( Cons 101 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 33 )
- )
-, IAL
- ( SPure
- ( Cons 108 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 34 )
- )
-, IAL
- ( SPure
- ( Cons 111 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 35 )
- )
-, IAL
- ( SPure
- ( Cons 32 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 36 )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "read" )
- )
-, IAL
- ( SPure
- ( Cons 30 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, IAL
- ( SPure
- ( Cons 100 )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "write" )
- )
-, ICF
- ( Labeled Call
- ( LArtificial "newline" )
- )
-, End
-, ICF
- ( Mark
- ( MArtificial "add" )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "write" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "write_end" )
- )
-, IAL ( SIO OutputChar )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "write" )
- )
-, ICF
- ( Mark
- ( MArtificial "write_end" )
- )
-, IAL ( SPure Discard )
-, IAL ( SPure Discard )
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "read" )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputChar )
-, ILS Load
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure ( Binary Sub ) )
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, ICF
- ( Labeled Jump
- ( LArtificial "read" )
- )
-, ICF
- ( Mark
- ( MArtificial "read_end" )
- )
-, IAL ( SPure Discard )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL
- ( SPure ( Binary Add ) )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, ILS Store
-, ICF Return
-, ICF
- ( Mark
- ( MArtificial "newline" )
- )
-, IAL
- ( SPure
- ( Cons 10 )
- )
-, IAL
- ( SPure
- ( Cons 13 )
- )
-, IAL ( SIO OutputChar )
-, IAL ( SIO OutputChar )
-, ICF Return
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Cons 80)
+Store
+SPure (Cons 1)
+SPure (Cons 108)
+Store
+SPure (Cons 2)
+SPure (Cons 101)
+Store
+SPure (Cons 3)
+SPure (Cons 97)
+Store
+SPure (Cons 4)
+SPure (Cons 115)
+Store
+SPure (Cons 5)
+SPure (Cons 101)
+Store
+SPure (Cons 6)
+SPure (Cons 32)
+Store
+SPure (Cons 7)
+SPure (Cons 101)
+Store
+SPure (Cons 8)
+SPure (Cons 110)
+Store
+SPure (Cons 9)
+SPure (Cons 116)
+Store
+SPure (Cons 10)
+SPure (Cons 101)
+Store
+SPure (Cons 11)
+SPure (Cons 114)
+Store
+SPure (Cons 12)
+SPure (Cons 32)
+Store
+SPure (Cons 13)
+SPure (Cons 121)
+Store
+SPure (Cons 14)
+SPure (Cons 111)
+Store
+SPure (Cons 15)
+SPure (Cons 117)
+Store
+SPure (Cons 16)
+SPure (Cons 114)
+Store
+SPure (Cons 17)
+SPure (Cons 32)
+Store
+SPure (Cons 18)
+SPure (Cons 110)
+Store
+SPure (Cons 19)
+SPure (Cons 97)
+Store
+SPure (Cons 20)
+SPure (Cons 109)
+Store
+SPure (Cons 21)
+SPure (Cons 101)
+Store
+SPure (Cons 22)
+SPure (Cons 58)
+Store
+SPure (Cons 23)
+SPure (Cons 32)
+Store
+SPure (Cons 24)
+SPure (Cons 0)
+Store
+SPure (Cons 30)
+SPure (Cons 72)
+Store
+SPure (Cons 31)
+SPure (Cons 101)
+Store
+SPure (Cons 32)
+SPure (Cons 108)
+Store
+SPure (Cons 33)
+SPure (Cons 108)
+Store
+SPure (Cons 34)
+SPure (Cons 111)
+Store
+SPure (Cons 35)
+SPure (Cons 32)
+Store
+SPure (Cons 36)
+SPure (Cons 0)
+Store
+SPure (Cons 0)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "read") Call
+SPure (Cons 30)
+Labeled (LArtificial "write") Call
+SPure (Cons 100)
+Labeled (LArtificial "write") Call
+Labeled (LArtificial "newline") Call
+End
+
+Mark (MArtificial "add")
+SPure (Binary Add)
+Return
+
+Mark (MArtificial "write")
+SPure (Indexed (IImmediate 0) Copy)
+Load
+SPure (Indexed (IImmediate 0) Copy)
+Labeled (LArtificial "write_end") (Branch EZ)
+SIO OutputChar
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "write") Jump
+
+Mark (MArtificial "write_end")
+SPure Discard
+SPure Discard
+Return
+
+Mark (MArtificial "read")
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputChar
+Load
+SPure (Indexed (IImmediate 0) Copy)
+SPure (Cons 10)
+SPure (Binary Sub)
+Labeled (LArtificial "read_end") (Branch EZ)
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+Labeled (LArtificial "read") Jump
+
+Mark (MArtificial "read_end")
+SPure Discard
+SPure (Cons 1)
+SPure (Binary Add)
+SPure (Cons 0)
+Store
+Return
+
+Mark (MArtificial "newline")
+SPure (Cons 10)
+SPure (Cons 13)
+SIO OutputChar
+SIO OutputChar
+Return
diff --git a/.output/golden/ws/il/parsed/original/truthMachine.il b/.output/golden/ws/il/parsed/original/truthMachine.il
index 58f623f86..2f79514c2 100644
--- a/.output/golden/ws/il/parsed/original/truthMachine.il
+++ b/.output/golden/ws/il/parsed/original/truthMachine.il
@@ -1,40 +1,15 @@
-[ IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL
- ( SPure
- ( Indexed Copy
- ( ImmediateO 0 )
- )
- )
-, ILS ( MIO InputDec )
-, ILS Load
-, ICF
- ( Labeled ( Branch EZ )
- ( LArtificial "\x0" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x1" )
- )
-, IAL
- ( SPure
- ( Cons 1 )
- )
-, IAL ( SIO OutputDec )
-, ICF
- ( Labeled Jump
- ( LArtificial "\x1" )
- )
-, ICF
- ( Mark
- ( MArtificial "\x0" )
- )
-, IAL
- ( SPure
- ( Cons 0 )
- )
-, IAL ( SIO OutputDec )
-, End
-]
\ No newline at end of file
+SPure (Cons 0)
+SPure (Indexed (IImmediate 0) Copy)
+MIO InputDec
+Load
+Labeled (LArtificial "\NUL") (Branch EZ)
+
+Mark (MArtificial "\SOH")
+SPure (Cons 1)
+SIO OutputDec
+Labeled (LArtificial "\SOH") Jump
+
+Mark (MArtificial "\NUL")
+SPure (Cons 0)
+SIO OutputDec
+End
diff --git a/docs/developers/CHANGELOG.md b/docs/developers/CHANGELOG.md
index b76c7fa0d..ec9ec3d9e 100644
--- a/docs/developers/CHANGELOG.md
+++ b/docs/developers/CHANGELOG.md
@@ -1,5 +1,9 @@
# 📅 Revision history for HelMA
+## 0.8.4.6 -- 2023-04-10
+
+* Add optimize
+
## 0.8.4.5 -- 2023-03-27
* Add optimize
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
deleted file mode 100644
index f4db5f44a..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
+++ /dev/null
@@ -1,108 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Automaton (
- 2 run,
- 3 newMemory,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.ETA.Addressing
- 7 import HelVM.HelMA.Automata.ETA.OperandParsers
- 8 import HelVM.HelMA.Automata.ETA.Token
- 9
- 10 import HelVM.HelMA.Automaton.Loop
- 11
- 12 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 13
- 14 import HelVM.HelMA.Automaton.Combiner.ALU as Stack
- 15
- 16 import Control.Monad.Extra
- 17 import Control.Type.Operator
- 18 import HelVM.HelMA.Automata.ETA.Symbol
- 19
- 20 import qualified Data.Vector as Vector
- 21
- 22 import Prelude hiding (divMod)
- 23
- 24 run :: (SAutomatonIO e s m) => Maybe Natural -> Memory s -> m $ Memory s
- 25 run = loopMWithLimit nextState
- 26
- 27 nextState :: (SAutomatonIO e s m) => Memory s -> m $ MemorySame s
- 28 nextState (Memory iu s) = build =<< nextIM iu where build (t , iu') = doInstruction t (Memory iu' s)
- 29
- 30 doInstruction :: (SAutomatonIO e s m) => Maybe Token -> Memory s -> m $ MemorySame s
- 31 -- | IO instructions
- 32 doInstruction (Just O) u = Left . updateStack u <$> doOutputChar2 (memoryStack u)
- 33 doInstruction (Just I) u = Left . updateStack u <$> doInputChar2 (memoryStack u)
- 34
- 35 -- | Stack instructions
- 36 doInstruction (Just N) (Memory iu s) = build <$> parseNumber iu where build (symbol , iu') = Left (Memory iu' (push1 symbol s))
- 37 doInstruction (Just H) u = Left . updateStack u <$> halibut (memoryStack u)
- 38
- 39 -- | Arithmetic
- 40 doInstruction (Just S) u = Left . updateStack u <$> sub (memoryStack u)
- 41 doInstruction (Just E) u = Left . updateStack u <$> divMod (memoryStack u)
- 42
- 43 -- | Control
- 44 doInstruction (Just R) u = pure $ Left u
- 45 doInstruction (Just A) (Memory iu@(IM il ic) s) = pure $ Left ((Memory iu . flipPush1 s . genericNextLabel il) ic)
- 46 doInstruction (Just T) u = transfer u
- 47 doInstruction Nothing u = end u
- 48
- 49 transfer :: (SAutomatonIO e s m) => Memory s -> m $ MemorySame s
- 50 transfer = branch <=< pop2ForStack where
- 51 branch (_ , 0 , u) = pure $ Left u
- 52 branch (0 , _ , u) = end u
- 53 branch (l , _ , u) = Left . updateAddress u <$> genericFindAddress (memoryProgram u) l
- 54
- 55 pop2ForStack :: (SAutomatonIO e s m) => Memory s -> m (e , e , Memory s)
- 56 pop2ForStack u = build <$> pop2 (memoryStack u) where
- 57 build (s1 , s2 , s') = (s1 , s2 , updateStack u s')
- 58
- 59 -- | Terminate instruction
- 60 end :: (SAutomatonIO e s m) => Memory s -> m $ MemorySame s
- 61 end = pure . Right
- 62
- 63 -- | Memory methods
- 64
- 65 newMemory :: TokenList -> s -> Memory s
- 66 newMemory tl = Memory (IM (Vector.fromList tl) 0)
- 67
- 68 updateStack :: Memory s -> s -> Memory s
- 69 updateStack u s = u {memoryStack = s}
- 70
- 71 updateAddress :: Memory s -> InstructionCounter -> Memory s
- 72 updateAddress u a = u {memoryIM = updatePC (memoryIM u) a}
- 73
- 74 memoryProgram :: Memory s -> TokenVector
- 75 memoryProgram = program . memoryIM
- 76
- 77 -- | Types
- 78
- 79 type MemorySame s = Same (Memory s)
- 80
- 81 data Memory s = Memory
- 82 { memoryIM :: !InstructionMemory
- 83 , memoryStack :: s
- 84 }
- 85 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
deleted file mode 100644
index 606643d69..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
+++ /dev/null
@@ -1,81 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Evaluator (
- 2 simpleEval,
- 3 evalParams,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.ETA.API.ETAImplType
- 7
- 8 import HelVM.HelMA.Automata.ETA.Automaton
- 9 import HelVM.HelMA.Automata.ETA.Lexer
- 10 import HelVM.HelMA.Automata.ETA.Optimizer
- 11 import qualified HelVM.HelMA.Automata.ETA.SimpleParams as S
- 12 import HelVM.HelMA.Automata.ETA.Symbol
- 13 import HelVM.HelMA.Automata.ETA.Token
- 14
- 15 import HelVM.HelMA.Automaton.API.AutoOptions
- 16 import qualified HelVM.HelMA.Automaton.API.AutomatonOptions as Automaton
- 17 import HelVM.HelMA.Automaton.API.EvalParams
- 18 import HelVM.HelMA.Automaton.API.IOTypes
- 19
- 20 import qualified HelVM.HelMA.Automaton.Automaton as Automaton
- 21
- 22 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 23 import HelVM.HelMA.Automaton.IO.BusinessIO
- 24
- 25 import HelVM.HelMA.Automaton.Types.DumpType
- 26 import HelVM.HelMA.Automaton.Types.StackType
- 27
- 28 import HelVM.HelIO.Collections.SList as SList
- 29
- 30 import qualified Data.Sequence as Seq
- 31
- 32 import Prelude hiding (divMod)
- 33
- 34 simpleEval :: BIO m => S.SimpleParams -> m ()
- 35 simpleEval p = evalSource (S.implType p) (S.source p) (S.stackType p) (S.autoOptions p)
- 36
- 37 ----
- 38
- 39 evalParams :: BIO m => ETAImplType -> EvalParams -> m ()
- 40 evalParams e p = evalSource e (source p) (stackAutoOptions p) (autoOptions p)
- 41
- 42 evalSource :: (AutomatonIO Symbol m) => ETAImplType -> Source -> StackType -> AutoOptions -> m ()
- 43 evalSource etaImplType source = evalTL etaImplType (tokenize source)
- 44
- 45 evalTL :: (AutomatonIO Symbol m) => ETAImplType -> TokenList -> StackType -> AutoOptions -> m ()
- 46 evalTL Fast = fastEval
- 47 evalTL Original = originalEval
- 48
- 49 fastEval :: (AutomatonIO Symbol m) => TokenList -> StackType -> AutoOptions -> m ()
- 50 fastEval tl s a = flip Automaton.start (Automaton.withDefaultRam s a) =<< optimize tl
- 51
- 52 originalEval :: (AutomatonIO Symbol m) => TokenList -> StackType -> AutoOptions -> m ()
- 53 originalEval tl ListStackType = eval tl []
- 54 originalEval tl SeqStackType = eval tl Seq.empty
- 55 originalEval tl SListStackType = eval tl SList.sListEmpty
- 56
- 57 eval :: (SAutomatonIO Symbol s m) => TokenList -> s -> AutoOptions -> m ()
- 58 eval tl s (AutoOptions _ _ limit dt) = logDump dt =<< run limit (newMemory tl s)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
deleted file mode 100644
index 78a7cbd86..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
+++ /dev/null
@@ -1,135 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Optimizer (
- 2 optimize,
- 3 )
- 4 where
- 5
- 6 import HelVM.HelMA.Automata.ETA.OperandParsers
- 7 import HelVM.HelMA.Automata.ETA.Token
- 8
- 9 import HelVM.HelMA.Automaton.Instruction
- 10
- 11 import HelVM.HelIO.Control.Safe
- 12
- 13 import Control.Applicative.Tools
- 14
- 15 import Data.List.Extra
- 16 import qualified Data.List.Index as List
- 17
- 18 import qualified Data.ListLike as LL
- 19
- 20 optimize :: MonadSafe m => TokenList -> m InstructionList
- 21 optimize = appendEnd <.> join <.> optimizeLines
- 22
- 23 appendEnd :: InstructionList -> InstructionList
- 24 appendEnd l = l <> one End
- 25
- 26 optimizeLines :: MonadSafe m => TokenList -> m [InstructionList]
- 27 optimizeLines = sequence . optimizeLineInit <.> lineFromTuple2 <.> splitOnRAndIndex2
- 28
- 29 splitOnRAndIndex2 :: TokenList -> [(Natural, [TokenList])]
- 30 splitOnRAndIndex2 = indexedByNaturalWithOffset 1 <.> List.indexed . filterNull . tails . splitOn [R]
- 31
- 32 indexedByNaturalWithOffset :: Int -> (Int , a) -> (Natural , a)
- 33 indexedByNaturalWithOffset offset (i , a) = (fromIntegral (i + offset) , a)
- 34
- 35 optimizeLineInit :: MonadSafe m => Line -> m InstructionList
- 36 optimizeLineInit line = (dMarkI (currentAddress line) : ) <$> optimizeLineTail line
- 37
- 38 optimizeLineTail:: MonadSafe m => Line -> m InstructionList
- 39 optimizeLineTail line = check (currentTL line) where
- 40 check (t : tl) = optimizeLineForToken t $ line { currentTL = tl }
- 41 check [] = pure []
- 42
- 43 optimizeLineForToken :: MonadSafe m => Token -> Line -> m InstructionList
- 44 optimizeLineForToken O = (sOutputI : ) <.> optimizeLineTail
- 45 optimizeLineForToken I = (sInputI : ) <.> optimizeLineTail
- 46
- 47 optimizeLineForToken S = (subI : ) <.> optimizeLineTail
- 48 optimizeLineForToken E = prependDivMod
- 49
- 50 optimizeLineForToken H = (halibutI : ) <.> optimizeLineTail
- 51 optimizeLineForToken T = (Transfer : ) <.> optimizeLineTail
- 52
- 53 optimizeLineForToken A = prependAddress
- 54 optimizeLineForToken N = prependNumber
- 55
- 56 optimizeLineForToken R = optimizeLineTail
- 57
- 58 prependDivMod :: MonadSafe m => Line -> m InstructionList
- 59 prependDivMod line = check $ numberFlag line where
- 60 check False = prependDivModSimple line
- 61 check True = prependStaticMakr line <.> optimizeLineTail $ line {numberFlag = False}
- 62
- 63 prependStaticMakr :: Line -> InstructionList -> InstructionList
- 64 prependStaticMakr line il = divModI : sMarkIN (currentAddress line) : il
- 65
- 66 prependDivModSimple :: MonadSafe m => Line -> m InstructionList
- 67 prependDivModSimple = (divModI : ) <.> optimizeLineTail
- 68
- 69 prependAddress :: MonadSafe m => Line -> m InstructionList
- 70 prependAddress line = ((consI $ fromIntegral $ nextAddress line) : ) <$> optimizeLineTail line
- 71
- 72 prependNumber :: MonadSafe m => Line -> m InstructionList
- 73 prependNumber line = flip buildNumber line =<< parseNumberFromTLL (currentTL line , nextTLL line)
- 74
- 75 buildNumber :: MonadSafe m => (Integer , (TokenList , [TokenList])) -> Line -> m InstructionList
- 76 buildNumber (n , (tl , ttl) ) line = build (LL.length (nextTLL line) - LL.length ttl) where
- 77 build 0 = (consI n :) <$> optimizeLineTail (line {currentTL = tl})
- 78 build offset = pure [consI n , sJumpIN $ currentAddress line + fromIntegral offset]
- 79
- 80 -- | Accessors
- 81
- 82 nextAddress :: Line -> Natural
- 83 nextAddress line = currentAddress line + 1
- 84
- 85 -- | Constructors
- 86
- 87 lineFromTuple2 :: (Natural, [TokenList]) -> Line
- 88 lineFromTuple2 (a, []) = Line
- 89 { currentAddress = a
- 90 , currentTL = []
- 91 , nextTLL = []
- 92 , numberFlag = True
- 93 }
- 94 lineFromTuple2 (a, l : ls) = Line
- 95 { currentAddress = a
- 96 , currentTL = l
- 97 , nextTLL = ls
- 98 , numberFlag = True
- 99 }
- 100
- 101 data Line = Line
- 102 { currentTL :: TokenList
- 103 , currentAddress :: Natural
- 104 , numberFlag :: Bool
- 105 , nextTLL :: [TokenList]
- 106 }
- 107
- 108 --consM :: Functor f => a -> f [a] -> f [a]
- 109 --consM a l = (a : ) <$> l
- 110
- 111 filterNull :: [[a]] -> [[a]]
- 112 filterNull = filter notNull
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
deleted file mode 100644
index 8f090c328..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
+++ /dev/null
@@ -1,134 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.FALSE.Parser (
- 2 parseSafe,
- 3 parse,
- 4 charToSimpleInstruction,
- 5 ) where
- 6
- 7 import HelVM.HelMA.Automata.FALSE.Expression
- 8
- 9 import HelVM.HelMA.Automaton.API.IOTypes
- 10 import HelVM.HelMA.Automaton.Instruction
- 11 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 12 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 13 import HelVM.HelMA.Automaton.ReadPExtra
- 14
- 15 import HelVM.HelIO.Control.Safe
- 16 import HelVM.HelIO.Extra hiding (runParser)
- 17 import HelVM.HelIO.ReadText
- 18
- 19 import Data.Char
- 20
- 21 import Text.ParserCombinators.ReadP hiding (many)
- 22
- 23 parseSafe :: Source -> Safe ExpressionList
- 24 parseSafe = parse
- 25
- 26 parse :: MonadSafe m => Source -> m ExpressionList
- 27 parse = runParser vlParser
- 28
- 29 vlParser :: ReadP ExpressionList
- 30 vlParser = many (skipSpaces *> valueParser) <* skipSpaces
- 31
- 32 valueParser :: ReadP Expression
- 33 valueParser = lambdaParser <|> commentParser <|> writeStringParser <|> constParser <|> refParser <|> simpleParser
- 34
- 35 lambdaParser :: ReadP Expression
- 36 lambdaParser = Lambda <$> (char '[' *> vlParser <* char ']')
- 37
- 38 commentParser :: ReadP Expression
- 39 commentParser = Comment <$> (char '{' *> many (notChar '}') <* char '}')
- 40
- 41 writeStringParser :: ReadP Expression
- 42 writeStringParser = Str <$> stringParser
- 43
- 44 constParser :: ReadP Expression
- 45 constParser = Inst . consI . fromIntegral <$> naturalParser
- 46
- 47 refParser :: ReadP Expression
- 48 refParser = refFromChar <$> letterAscii
- 49
- 50 simpleParser :: ReadP Expression
- 51 simpleParser = fromJustWithText "imposible" . charToSimpleInstruction <$> oneOf simpleInstructionChars
- 52
- 53 simpleInstructionChars :: String
- 54 simpleInstructionChars = "$%\\@`+-*/_&|~<=!?#:;^,.ß"
- 55
- 56 charToSimpleInstruction :: Char -> Maybe Expression
- 57 charToSimpleInstruction '$' = inst dupI
- 58 charToSimpleInstruction '%' = inst discardI
- 59 charToSimpleInstruction '\\' = inst swapI
- 60 charToSimpleInstruction '@' = inst rotI
- 61 charToSimpleInstruction '`' = inst dCopy
- 62
- 63 charToSimpleInstruction '+' = inst addI
- 64 charToSimpleInstruction '-' = inst subI
- 65 charToSimpleInstruction '*' = inst mulI
- 66 charToSimpleInstruction '/' = inst divI
- 67 charToSimpleInstruction '_' = inst negI
- 68
- 69 charToSimpleInstruction '&' = inst $ binary BAnd
- 70 charToSimpleInstruction '|' = inst $ binary BOr
- 71 charToSimpleInstruction '~' = inst $ unary BNot
- 72
- 73 charToSimpleInstruction '<' = inst $ binary LGT
- 74 charToSimpleInstruction '=' = inst $ binary LEQ
- 75
- 76 charToSimpleInstruction '!' = pure Exec
- 77 charToSimpleInstruction '?' = pure Cond
- 78 charToSimpleInstruction '#' = pure While
- 79
- 80 charToSimpleInstruction ':' = pure Store
- 81 charToSimpleInstruction ';' = pure Fetch
- 82
- 83 charToSimpleInstruction '^' = inst $ sio InputChar
- 84 charToSimpleInstruction ',' = inst $ sio OutputChar
- 85 charToSimpleInstruction '.' = inst $ sio OutputDec
- 86 charToSimpleInstruction 'ß' = pure Flush
- 87
- 88 charToSimpleInstruction _ = Nothing
- 89
- 90 inst :: Instruction -> Maybe Expression
- 91 inst = pure . Inst
- 92
- 93 -- | Extra
- 94
- 95 refFromChar :: Char -> Expression
- 96 refFromChar c = Ref $ fromIntegral $ ord (toLower c) - ord 'a'
- 97
- 98 naturalParser :: ReadP Natural
- 99 naturalParser = naturalLiteralParser <|> ordCharLiteralParser
- 100
- 101 naturalLiteralParser :: ReadP Natural
- 102 naturalLiteralParser = readUnsafe <$> many1 digit
- 103
- 104 ordCharLiteralParser :: Integral a => ReadP a
- 105 ordCharLiteralParser = fromIntegral . ord <$> (skipSpacesAndChar '\'' *> anyChar)
- 106
- 107 stringParser :: ReadP String
- 108 stringParser = skipSpacesAndChar '"' *> many (notChar '"') <* char '"'
- 109
- 110 skipSpacesAndChar :: Char -> ReadP Char
- 111 skipSpacesAndChar c = skipSpaces *> char c
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
deleted file mode 100644
index 4d5a52672..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
+++ /dev/null
@@ -1,116 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.Parser (
- 2 flipParseVisible,
- 3 flipParseWhite,
- 4 parseVisible,
- 5 parseWhite,
- 6 parse,
- 7 parseFromTL
- 8 ) where
- 9
- 10 import HelVM.HelMA.Automata.WhiteSpace.Lexer
- 11 import HelVM.HelMA.Automata.WhiteSpace.OperandParsers
- 12 import HelVM.HelMA.Automata.WhiteSpace.Token
- 13
- 14 import HelVM.HelMA.Automaton.API.IOTypes
- 15
- 16 import HelVM.HelMA.Automaton.Instruction
- 17
- 18 import HelVM.HelMA.Automaton.Types.FormatType
- 19 import HelVM.HelMA.Automaton.Types.TokenType
- 20
- 21 import HelVM.HelIO.Control.Safe
- 22 import HelVM.HelIO.Extra
- 23
- 24 -- FIXME
- 25 flipParseVisible :: FormatType -> Source -> Safe InstructionList
- 26 flipParseVisible = flip parseVisible
- 27
- 28 flipParseWhite :: FormatType -> Source -> Safe InstructionList
- 29 flipParseWhite = flip parseWhite
- 30
- 31 parseVisible :: Source -> FormatType -> Safe InstructionList
- 32 parseVisible = parse VisibleTokenType
- 33
- 34 parseWhite :: Source -> FormatType -> Safe InstructionList
- 35 parseWhite = parse WhiteTokenType
- 36
- 37 parse :: MonadSafe m => TokenType -> Source -> FormatType -> m InstructionList
- 38 parse tokenType = flip parseFromTL . tokenize tokenType
- 39
- 40 parseFromTL :: MonadSafe m => FormatType -> TokenList -> m InstructionList
- 41 parseFromTL ascii = repeatedlyM (parseInstruction ascii)
- 42
- 43 parseInstruction :: MonadSafe m => FormatType -> InstructionParser m
- 44 parseInstruction _ (S : tl) = parseInstructionStackManipulation tl
- 45 parseInstruction _ (T : S : tl) = parseInstructionArithmetic tl
- 46 parseInstruction _ (T : T : tl) = parseInstructionHeadAccess tl
- 47 parseInstruction ascii (N : tl) = parseInstructionFlowControl ascii tl
- 48 parseInstruction _ (T : N : tl) = parseInstructionIO tl
- 49 parseInstruction _ tl = unrecognisedTokensIn "parseInstruction" tl
- 50
- 51 parseInstructionStackManipulation :: MonadSafe m => InstructionParser m
- 52 parseInstructionStackManipulation (S : tl) = build <$> parseSymbol tl where build (symbol , tl') = (consI symbol , tl')
- 53 parseInstructionStackManipulation (T : S : tl) = build <$> parseIndex tl where build (index , tl') = (sCopyI index , tl')
- 54 parseInstructionStackManipulation (T : N : tl) = build <$> parseIndex tl where build (index , tl') = (sSlideI index , tl')
- 55 parseInstructionStackManipulation (N : S : tl) = pure (dupI , tl)
- 56 parseInstructionStackManipulation (N : T : tl) = pure (swapI , tl)
- 57 parseInstructionStackManipulation (N : N : tl) = pure (discardI , tl)
- 58 parseInstructionStackManipulation tl = unrecognisedTokensIn "parseInstructionStackManipulation" tl
- 59
- 60 parseInstructionArithmetic :: MonadSafe m => InstructionParser m
- 61 parseInstructionArithmetic (S : S : tl) = pure (addI , tl)
- 62 parseInstructionArithmetic (S : T : tl) = pure (subI , tl)
- 63 parseInstructionArithmetic (S : N : tl) = pure (mulI , tl)
- 64 parseInstructionArithmetic (T : S : tl) = pure (divI , tl)
- 65 parseInstructionArithmetic (T : T : tl) = pure (modI , tl)
- 66 parseInstructionArithmetic tl = unrecognisedTokensIn "parseInstructionArithmetic" tl
- 67
- 68 parseInstructionHeadAccess :: MonadSafe m => InstructionParser m
- 69 parseInstructionHeadAccess (S : tl) = pure (storeI , tl)
- 70 parseInstructionHeadAccess (T : tl) = pure (loadI , tl)
- 71 parseInstructionHeadAccess tl = unrecognisedTokensIn "parseInstructionHeadAccess" tl
- 72
- 73 parseInstructionFlowControl :: MonadSafe m => FormatType -> InstructionParser m
- 74 parseInstructionFlowControl ascii (S : S : tl) = build <$> parseLabel ascii tl where build (label , tl') = (sMarkI label , tl')
- 75 parseInstructionFlowControl ascii (S : T : tl) = build <$> parseLabel ascii tl where build (label , tl') = (sCallI label , tl')
- 76 parseInstructionFlowControl ascii (S : N : tl) = build <$> parseLabel ascii tl where build (label , tl') = (sJumpI label , tl')
- 77 parseInstructionFlowControl ascii (T : S : tl) = build <$> parseLabel ascii tl where build (label , tl') = (sEZI label , tl')
- 78 parseInstructionFlowControl ascii (T : T : tl) = build <$> parseLabel ascii tl where build (label , tl') = (sLTZI label , tl')
- 79 parseInstructionFlowControl _ (T : N : tl) = pure (returnI , tl)
- 80 parseInstructionFlowControl _ (N : N : tl) = pure (End , tl)
- 81 parseInstructionFlowControl _ tl = unrecognisedTokensIn "parseInstructionFlowControl" tl
- 82
- 83 parseInstructionIO :: MonadSafe m => InstructionParser m
- 84 parseInstructionIO (S : S : tl) = pure (sOutputI , tl)
- 85 parseInstructionIO (S : T : tl) = pure (sOutputDecI , tl)
- 86 parseInstructionIO (T : S : tl) = pure (mInputI , tl)
- 87 parseInstructionIO (T : T : tl) = pure (mInputDecI , tl)
- 88 parseInstructionIO tl = unrecognisedTokensIn "parseInstructionIO" tl
- 89
- 90 unrecognisedTokensIn :: MonadSafe m => Text -> TokenList -> m a
- 91 unrecognisedTokensIn name tl = liftErrorTupleList [("Unrecognised tokens in" , name) , ("Rest tokens" , show tl)]
- 92
- 93 type InstructionParser m = ParserFromTokenList m Instruction
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
deleted file mode 100644
index f8257845d..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
+++ /dev/null
@@ -1,73 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.SimpleParams where
- 2
- 3 import HelVM.HelMA.Automaton.API.AutoOptions
- 4 import qualified HelVM.HelMA.Automaton.API.AutomatonOptions as Automaton
- 5 import HelVM.HelMA.Automaton.API.IOTypes
- 6
- 7 import HelVM.HelMA.Automaton.Types.FormatType
- 8 import HelVM.HelMA.Automaton.Types.RAMType
- 9 import HelVM.HelMA.Automaton.Types.StackType
- 10 import HelVM.HelMA.Automaton.Types.TokenType
- 11
- 12 -- | Construction for tests
- 13 simpleParamsWithDefaultsAndWhiteTokenType :: FormatType -> Source -> SimpleParams
- 14 simpleParamsWithDefaultsAndWhiteTokenType = simpleParamsWithDefaults WhiteTokenType
- 15
- 16 simpleParamsWithDefaultsAndVisibleTokenType :: FormatType -> Source -> SimpleParams
- 17 simpleParamsWithDefaultsAndVisibleTokenType = simpleParamsWithDefaults VisibleTokenType
- 18
- 19 simpleParamsWithDefaults :: TokenType -> FormatType -> Source -> SimpleParams
- 20 simpleParamsWithDefaults tt = simpleParams tt (defaultStackType , defaultRAMType)
- 21
- 22 -- | Construction for benchmark
- 23 simpleParamsWithWhiteTokenType :: (StackType, RAMType) -> FormatType -> Source -> SimpleParams
- 24 simpleParamsWithWhiteTokenType = simpleParams WhiteTokenType
- 25
- 26 simpleParamsWithVisibleTokenType :: (StackType, RAMType) -> FormatType -> Source -> SimpleParams
- 27 simpleParamsWithVisibleTokenType = simpleParams VisibleTokenType
- 28
- 29 automatonOptions :: SimpleParams -> Automaton.AutomatonOptions
- 30 automatonOptions p = Automaton.AutomatonOptions (stackType p) (ramType p) (autoOptions p)
- 31
- 32 simpleParams :: TokenType -> (StackType, RAMType) -> FormatType -> Source -> SimpleParams
- 33 simpleParams tt (st , rt) al s = SimpleParams
- 34 { tokenType = tt
- 35 , source = s
- 36 , formatType = al
- 37 , stackType = st
- 38 , ramType = rt
- 39 , autoOptions = simpleAutoParams False
- 40 }
- 41
- 42 -- | Type
- 43 data SimpleParams = SimpleParams
- 44 { tokenType :: !TokenType
- 45 , source :: !Source
- 46 , formatType :: !FormatType
- 47 , stackType :: !StackType
- 48 , ramType :: !RAMType
- 49 , autoOptions :: !AutoOptions
- 50 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
deleted file mode 100644
index c0d699cb3..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
+++ /dev/null
@@ -1,46 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.AutoOptions where
- 2
- 3 import HelVM.HelMA.Automaton.API.OptimizationLevel
- 4 import HelVM.HelMA.Automaton.Loop
- 5 import HelVM.HelMA.Automaton.Types.DumpType
- 6
- 7 verySimpleAutoParams :: AutoOptions
- 8 verySimpleAutoParams = simpleAutoParams False
- 9
- 10 simpleAutoParams :: Bool -> AutoOptions
- 11 simpleAutoParams c = AutoOptions
- 12 { optLevel = BasicOptimizations
- 13 , compileFlag = c
- 14 , limit = testMaybeLimit
- 15 , dumpType = Pretty
- 16 }
- 17
- 18 data AutoOptions = AutoOptions
- 19 { optLevel :: OptimizationLevel
- 20 , compileFlag :: Bool
- 21 , limit :: LimitMaybe
- 22 , dumpType :: DumpType
- 23 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoParams.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoParams.hs.html
deleted file mode 100644
index 0e9ffd20c..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutoParams.hs.html
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.AutoOptions where
- 2
- 3 import HelVM.HelMA.Automaton.Loop
- 4 import HelVM.HelMA.Automaton.Types.DumpType
- 5
- 6 verySimpleAutoParams :: AutoOptions
- 7 verySimpleAutoParams = simpleAutoParams False
- 8
- 9 simpleAutoParams :: Bool -> AutoOptions
- 10 simpleAutoParams c = AutoOptions
- 11 { optimizeFlag = False
- 12 , compileFlag = c
- 13 , limit = testMaybeLimit
- 14 , dumpType = Pretty
- 15 }
- 16
- 17 data AutoOptions = AutoOptions
- 18 { optimizeFlag :: Bool
- 19 , compileFlag :: Bool
- 20 , limit :: LimitMaybe
- 21 , dumpType :: DumpType
- 22 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
deleted file mode 100644
index 57ef404a8..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
+++ /dev/null
@@ -1,209 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.ALU (
- 2 runALI,
- 3 runSAL,
- 4
- 5 doOutputChar2,
- 6 doInputChar2,
- 7 doInputDec2,
- 8 divMod,
- 9 sub,
- 10 binaryInstruction,
- 11 binaryInstructions,
- 12 halibut,
- 13 move,
- 14 discard,
- 15 slide,
- 16 copy,
- 17 flipPush1,
- 18 charPush1,
- 19 genericPush1,
- 20 pop1,
- 21 pop2,
- 22 push1,
- 23 push2,
- 24 splitAt,
- 25 drop,
- 26 ALU,
- 27 SafeStack,
- 28 Stack,
- 29 ) where
- 30
- 31 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 32 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 33
- 34 import HelVM.HelMA.Automaton.IO.BusinessIO
- 35
- 36 import HelVM.HelIO.Control.Safe
- 37
- 38 import HelVM.HelIO.Containers.LLIndexSafe
- 39
- 40 import HelVM.HelIO.ListLikeExtra
- 41
- 42 import Control.Applicative.Tools
- 43 import Data.ListLike hiding (show)
- 44 import Prelude hiding (divMod, drop, fromList, length, splitAt, swap)
- 45
- 46
- 47 runALI :: ALU m ll element => SInstruction -> ll -> m ll
- 48 runALI (SAL ali) = runSAL ali
- 49 runALI (SIO ioi) = runSIO ioi
- 50
- 51 runSIO :: ALU m ll element => IOInstruction -> ll -> m ll
- 52 runSIO OutputChar = doOutputChar2
- 53 runSIO OutputDec = doOutputDec2
- 54 runSIO InputChar = doInputChar2
- 55 runSIO InputDec = doInputDec2
- 56
- 57 --runSALSafe :: IntegralStack ll element => ALInstruction -> ll -> Stack ll
- 58 --runSALSafe = runSAL
- 59
- 60 runSAL :: SafeStack m ll element => ALInstruction -> ll -> m ll
- 61 runSAL (Cons i ) = push i
- 62 runSAL (Unary op ) = error $ show op
- 63 runSAL (Binary op ) = binaryInstruction op
- 64 runSAL (Binaries ops) = binaryInstructions ops
- 65 runSAL (SDynamic op ) = dynamicManipulation op
- 66 runSAL (SStatic i op ) = staticManipulation op i
- 67 runSAL Halibut = halibut
- 68 runSAL Pick = pick
- 69 runSAL Discard = discard
- 70
- 71 -- | Arithmetic instructions
- 72 divMod :: SafeStack m ll element => ll -> m ll
- 73 divMod = binaryInstructions [Mod , Div]
- 74
- 75 sub :: SafeStack m ll element => ll -> m ll
- 76 sub = binaryInstruction Sub
- 77
- 78 binaryInstruction :: SafeStack m ll element => BinaryInstruction -> ll -> m ll
- 79 binaryInstruction i = binaryInstructions [i]
- 80
- 81 binaryInstructions :: SafeStack m ll element => [BinaryInstruction] -> ll -> m ll
- 82 binaryInstructions il = build <.> pop2 where
- 83 build (e , e', l) = pushList (calculateOps e e' il) l
- 84
- 85 -- | IO instructions
- 86 doOutputChar2 :: ALU m ll element => ll -> m ll
- 87 doOutputChar2 = appendError "ALU.doOutputChar2" . build <=< pop1 where
- 88 build (e , l) = wPutAsChar e $> l
- 89
- 90 doOutputDec2 :: ALU m ll element => ll -> m ll
- 91 doOutputDec2 = appendError "ALU.doOutputDec2" . build <=< pop1 where
- 92 build (e , l) = wPutAsDec e $> l
- 93
- 94 doInputChar2 :: ALU m ll element => ll -> m ll
- 95 doInputChar2 l = appendError "ALU.doOutputDec2" $ build <$> wGetCharAs where
- 96 build e = push1 e l
- 97
- 98 doInputDec2 :: ALU m ll element => ll -> m ll
- 99 doInputDec2 l = build <$> wGetCharAs where
- 100 build e = push1 e l
- 101
- 102 -- | Manipulation instructions
- 103 dynamicManipulation :: SafeStack m ll element => ManipulationInstruction -> ll -> m ll
- 104 dynamicManipulation op = appendError "ALU.dynamicManipulation" . build <=< unconsSafe where
- 105 build (e , l) = staticManipulation op (fromIntegral e) l
- 106
- 107 staticManipulation :: SafeStack m ll element => ManipulationInstruction -> Index -> ll -> m ll
- 108 staticManipulation Copy = copy
- 109 staticManipulation Move = move
- 110 staticManipulation Slide = slide
- 111
- 112 -- | Halibut and Pick instructions
- 113 halibut :: SafeStack m ll element => ll -> m ll
- 114 halibut = appendError "ALU.halibut" . build <=< pop1 where
- 115 build (e , l)
- 116 | 0 < i = move i l
- 117 | otherwise = copy (negate i) l
- 118 where i = fromIntegral e
- 119
- 120 pick :: SafeStack m ll element => ll -> m ll
- 121 pick = appendError "ALU.pick" . build <=< pop1 where
- 122 build (e , l)
- 123 | 0 <= i = copy i l
- 124 | otherwise = move (negate i) l
- 125 where i = fromIntegral e
- 126
- 127 -- | Slide instructions
- 128 slide :: SafeStack m ll element => Index -> ll -> m ll
- 129 slide i = appendError "ALU.pop2" . build <.> pop1 where
- 130 build (e , l) = push1 e $ drop i l
- 131
- 132 -- | Move instructions
- 133 move :: SafeStack m ll element => Index -> ll -> m ll
- 134 move i l = build $ length l where
- 135 build ll
- 136 | ll <= i = liftErrorWithTupleList "ALU.move index must be less then lenght" [("i" , show i) , ("ll" , show ll)]
- 137 | otherwise = pure $ l1 <> l2 <> l3 where
- 138 (l1 , l3) = splitAt 1 l'
- 139 (l2 , l') = splitAt i l
- 140
- 141 -- | Copy instructions
- 142 copy :: SafeStack m ll element => Index -> ll -> m ll
- 143 copy i = teeMap flipPush1 (findSafe i)
- 144
- 145 -- | Pop instructions
- 146 pop1 :: SafeStack m ll element => ll -> m (element , ll)
- 147 pop1 = appendError "ALU.pop1" . unconsSafe
- 148
- 149 pop2 :: SafeStack m ll element => ll -> m (element , element , ll)
- 150 pop2 = appendError "ALU.pop2" . uncons2Safe
- 151
- 152 -- | Push instructions
- 153 push :: SafeStack m ll element => Integer -> ll -> m ll
- 154 push i = pure . genericPush1 i
- 155
- 156 flipPush1 :: Stack ll element => ll -> element -> ll
- 157 flipPush1 = flip push1
- 158
- 159 charPush1 :: (Num element , Stack ll element) => Char -> ll -> ll
- 160 charPush1 = genericPush1 . ord
- 161
- 162 genericPush1 :: (Integral v , Num element , Stack ll element) => v -> ll -> ll
- 163 genericPush1 = push1 . fromIntegral
- 164
- 165 push1 :: Stack ll element => element -> ll -> ll
- 166 push1 e = pushList [e]
- 167
- 168 push2 :: Stack ll element => element -> element -> ll -> ll
- 169 push2 e e' = pushList [e , e']
- 170
- 171 pushList :: Stack ll element => [element] -> ll -> ll
- 172 pushList es l = fromList es <> l
- 173
- 174 teeMap :: Functor f => (t -> a -> b) -> (t -> f a) -> t -> f b
- 175 teeMap f2 f1 x = f2 x <$> f1 x
- 176
- 177 -- | Types
- 178 type ALU m ll element = (BIO m , SafeStack m ll element)
- 179
- 180 type SafeStack m ll element = (MonadSafe m , IntegralStack ll element)
- 181
- 182 type IntegralStack ll element = (Stack ll element , Integral element)
- 183
- 184 type Stack ll element = (Show ll , ListLike ll element , IndexSafe ll element)
- 185
- 186 type Index = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
deleted file mode 100644
index 5b5907981..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
+++ /dev/null
@@ -1,126 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.CPU where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction
- 4 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 5
- 6 import HelVM.HelMA.Automaton.Combiner.ALU
- 7
- 8 import HelVM.HelIO.Containers.LLIndexSafe
- 9 import HelVM.HelIO.Control.Safe
- 10
- 11 import Control.Type.Operator
- 12
- 13 import Data.ListLike hiding (show)
- 14 import qualified Data.Vector as Vector
- 15
- 16 runCFI :: (ALU m ll element , Show element) => CFInstruction -> CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 17 runCFI (DMark _ ) = pure
- 18 runCFI (SMark _ ) = pure
- 19 runCFI Return = popAddress
- 20 runCFI (CDynamic Call ) = dynamicCall
- 21 runCFI (CDynamic Jump ) = dynamicJump
- 22 runCFI (CDynamic (Branch t)) = dynamicBranch t
- 23 runCFI (CStatic l Call ) = staticCall l
- 24 runCFI (CStatic l Jump ) = staticJump l
- 25 runCFI (CStatic l (Branch t)) = staticBranch l t
- 26
- 27 popAddress :: ALU m ll element => CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 28 popAddress (CPM (CM il _ (IS (a : is))) s) = pure $ CPM (CM il a $ IS is) s
- 29 popAddress (CPM (CM il _ (IS [] )) _) = liftErrorWithTupleList "Empty Return Stack" [("il" , show il)]
- 30
- 31 dynamicCall :: (ALU m ll element , Show element) => CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 32 dynamicCall (CPM (CM il ic (IS is)) s) = appendError "CPM.dynamicCall" $ call1 =<< pop1 s where
- 33 call1 (n , s') = call2 <$> findAddressForDynamicLabel n il where
- 34 call2 a = CPM (CM il a (IS (ic : is))) s'
- 35
- 36 dynamicJump :: (ALU m ll element , Show element) => CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 37 dynamicJump (CPM (CM il _ is) s) = appendError "CPM.dynamicJump" $ jump1 =<< pop1 s where
- 38 jump1 (n, s') = jump2 <$> findAddressForDynamicLabel n il where
- 39 jump2 a = CPM (CM il a is) s'
- 40
- 41 dynamicBranch :: (ALU m ll element , Show element) => BranchTest -> CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 42 dynamicBranch t (CPM (CM il ic is) s) = appendError "CPM.dynamicBranch" $ branch =<< pop2 s where
- 43 branch (n , e , s')
- 44 | isNotJump t e = pure $ CPM (CM il ic is) s'
- 45 | otherwise = jump <$> findAddressForDynamicLabel n il where
- 46 jump ic' = CPM (CM il ic' is) s'
- 47
- 48 findAddressForDynamicLabel :: (MonadSafe m , Integral n , Show n) => n -> InstructionVector -> m InstructionAddress
- 49 findAddressForDynamicLabel n il
- 50 | n < 0 = liftError $ show n
- 51 | otherwise = liftMaybeOrErrorTuple ("Undefined label", show n) $ findIndex (isDMark $ fromIntegral n) il
- 52
- 53 --
- 54
- 55 staticCall :: ALU m ll element => Label -> CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 56 staticCall l (CPM (CM il ic (IS is)) s) = appendError "CPM.staticCall" $ call <$> findAddressForStaticLabel l il where
- 57 call a = CPM (CM il a (IS (ic : is))) s
- 58
- 59 staticJump :: ALU m ll element => Label -> CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 60 staticJump l (CPM (CM il _ is) s) = appendError "CPM.staticJump" $ jump <$> findAddressForStaticLabel l il where
- 61 jump a = CPM (CM il a is) s
- 62
- 63 staticBranch :: ALU m ll element => Label -> BranchTest -> CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 64 staticBranch l t (CPM (CM il ic is) s) = appendError "CPM.staticBranch" $ branch =<< pop1 s where
- 65 branch (e , s')
- 66 | isNotJump t e = pure $ CPM (CM il ic is) s'
- 67 | otherwise = jump <$> findAddressForStaticLabel l il where
- 68 jump ic' = CPM (CM il ic' is) s'
- 69
- 70 findAddressForStaticLabel :: MonadSafe m => Label -> InstructionVector -> m InstructionAddress
- 71 findAddressForStaticLabel l = liftMaybeOrErrorTuple ("Undefined label", show l) . findIndex (isSMark l)
- 72
- 73 -- | ControlMemory methods
- 74
- 75 newCM :: InstructionList -> ControlMemory
- 76 newCM il = CM (Vector.fromList il) 0 (IS [])
- 77
- 78 currentInstruction :: MonadSafe m => ControlMemory -> m Instruction
- 79 currentInstruction (CM il ic _) = indexSafe il ic
- 80
- 81 incrementPC :: ControlMemory -> ControlMemory
- 82 incrementPC cu = cu { programCounter = 1 + programCounter cu }
- 83
- 84 -- | Types
- 85 data CentralProcessingMemory al = CPM
- 86 { controlMemory :: ControlMemory
- 87 , alm :: al
- 88 }
- 89 deriving stock (Show)
- 90
- 91 data ControlMemory = CM
- 92 { program :: InstructionVector
- 93 , programCounter :: InstructionCounter
- 94 , returnStack :: InstructionStack
- 95 }
- 96 deriving stock (Show)
- 97
- 98 newtype InstructionStack = IS [InstructionAddress]
- 99 deriving stock (Show)
- 100
- 101 type InstructionCounter = InstructionAddress
- 102
- 103 type InstructionAddress = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
deleted file mode 100644
index bbd8cbcfb..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
+++ /dev/null
@@ -1,121 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner where
- 2
- 3 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 4
- 5 import HelVM.HelMA.Automaton.Instruction
- 6 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 7
- 8 import HelVM.HelMA.Automaton.Loop as Loop
- 9
- 10 import HelVM.HelMA.Automaton.Symbol
- 11
- 12 import HelVM.HelMA.Automaton.Combiner.ALU as ALU
- 13 import HelVM.HelMA.Automaton.Combiner.CPU as CPU
- 14 import HelVM.HelMA.Automaton.Combiner.LSU as LSU
- 15
- 16 import Control.Monad.Extra
- 17 import Control.Type.Operator
- 18
- 19 import Prelude hiding (swap)
- 20
- 21 -- | Core of Combiner
- 22
- 23 runInstruction :: (SRAutomatonIO Symbol s r m) => Instruction -> SF s r m
- 24 runInstruction (IAL i) a = Loop.continue . updateStack a <$> runALI i (memoryStack a)
- 25 runInstruction (ILS i) a = Loop.continue . updateFromLSM a <$> runSLI i (toLSM a)
- 26 runInstruction (ICF i) a = Loop.continue . updateFromCPM a <$> runCFI i (toCPM a)
- 27 runInstruction Transfer a = transfer a
- 28 runInstruction End a = end a
- 29
- 30 transfer :: (SRAutomatonIO Symbol s r m) => SF s r m
- 31 transfer = transferBranch <=< pop2ForStack
- 32
- 33 transferBranch :: (SRAutomatonIO Symbol s r m) => (Symbol, Symbol, Memory s r) -> m $ MemorySame s r
- 34 transferBranch (_ , 0 , u) = pure $ Loop.continue u
- 35 transferBranch (0 , _ , u) = end u
- 36 transferBranch (a , _ , u) = Loop.continue . updateFromCPM u <$> runCFI dJumpI (toCPM $ push1ForStack a u)
- 37
- 38 pop2ForStack :: (SRAutomatonIO Symbol s r m) => Memory s r -> m (Symbol , Symbol , Memory s r)
- 39 pop2ForStack a = build <$> pop2 (memoryStack a) where
- 40 build (s1 , s2 , s') = (s1 , s2 , updateStack a s')
- 41
- 42 push1ForStack :: Stack s Symbol => Symbol -> Memory s r -> Memory s r
- 43 push1ForStack e a = a { memoryStack = push1 e (memoryStack a) }
- 44
- 45 end :: (SRAutomatonIO Symbol s r m) => SF s r m
- 46 end = pure . Loop.break
- 47
- 48 -- | Constructors
- 49
- 50 flippedNewMemory :: (s , r) -> InstructionList -> Memory s r
- 51 flippedNewMemory = flip (uncurry . newMemory)
- 52
- 53 newMemory :: InstructionList -> s -> r -> Memory s r
- 54 newMemory il = Memory (newCM il)
- 55
- 56 -- | Updaters
- 57
- 58 incrementIC :: Memory s r -> Memory s r
- 59 incrementIC m = m { memoryCM = incrementPC $ memoryCM m}
- 60
- 61 updateStack :: Memory s r -> s -> Memory s r
- 62 updateStack m s = m {memoryStack = s}
- 63
- 64 updateFromCPM :: Memory s r -> CentralProcessingMemory s -> Memory s r
- 65 updateFromCPM m cpm = m { memoryCM = controlMemory cpm, memoryStack = alm cpm}
- 66
- 67 updateFromLSM :: Memory s r -> LoadStoreMemory s r -> Memory s r
- 68 updateFromLSM m lsu = m {memoryStack = stack lsu , memoryRAM = ram lsu}
- 69
- 70 -- | Accessors
- 71
- 72 memoryProgram :: Memory s r -> InstructionVector
- 73 memoryProgram = program . memoryCM
- 74
- 75 memoryProgramCounter :: Memory s r -> InstructionCounter
- 76 memoryProgramCounter = programCounter . memoryCM
- 77
- 78 toCPM :: Memory s r -> CentralProcessingMemory s
- 79 toCPM a = CPM { controlMemory = memoryCM a , alm = memoryStack a }
- 80
- 81 toLSM :: Memory s r -> LoadStoreMemory s r
- 82 toLSM a = LSM { stack = memoryStack a, ram = memoryRAM a }
- 83
- 84 -- | Types
- 85
- 86 type SF s r m = Memory s r -> m $ MemorySame s r
- 87
- 88 type F s r m = Memory s r -> m $ Memory s r
- 89
- 90 type MemorySame s r = Same (Memory s r)
- 91
- 92 -- | Data types
- 93 data Memory s r = Memory
- 94 { memoryCM :: ControlMemory
- 95 , memoryStack :: s
- 96 , memoryRAM :: r
- 97 }
- 98 deriving stock (Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.ALInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.ALInstruction.hs.html
deleted file mode 100644
index b1ffd519d..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.ALInstruction.hs.html
+++ /dev/null
@@ -1,98 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction.ALInstruction where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 4
- 5 -- | Constructors
- 6
- 7 blAnd :: OperatorType -> BinaryInstruction
- 8 blAnd Bitwise = BAnd
- 9 blAnd Logical = LAnd
- 10
- 11 blOr :: OperatorType -> BinaryInstruction
- 12 blOr Bitwise = BOr
- 13 blOr Logical = LOr
- 14
- 15 blXor :: OperatorType -> BinaryInstruction
- 16 blXor Bitwise = BXor
- 17 blXor Logical = LXor
- 18
- 19 blEQ :: OperatorType -> BinaryInstruction
- 20 blEQ Bitwise = BEQ
- 21 blEQ Logical = LEQ
- 22
- 23 blGT :: OperatorType -> BinaryInstruction
- 24 blGT Bitwise = BGT
- 25 blGT Logical = LGT
- 26
- 27 -- | Other functions
- 28
- 29 calculateOps :: Integral a => a -> a -> [BinaryInstruction] -> [a]
- 30 calculateOps operand operand' = map (calculateOp operand operand')
- 31
- 32 calculateOp :: Integral a => a -> a -> BinaryInstruction -> a
- 33 calculateOp operand operand' operation = doBinary operation operand' operand
- 34
- 35 doBinary :: Integral a => BinaryInstruction -> a -> a -> a
- 36 doBinary Add = (+)
- 37 doBinary Sub = (-)
- 38 doBinary Mul = (*)
- 39 doBinary Div = div
- 40 doBinary Mod = mod
- 41 doBinary o = error $ show o
- 42
- 43 -- | Types
- 44 data ALInstruction =
- 45 SAL !ALInstruction2
- 46 | SIO !IOInstruction
- 47 deriving stock (Eq , Read , Show)
- 48
- 49 data ALInstruction2 =
- 50 Cons Integer
- 51 | Unary !UnaryInstruction
- 52 | Binary !BinaryInstruction
- 53 | Binaries [BinaryInstruction]
- 54 | SStatic !StackIndex !ManipulationInstruction
- 55 | SDynamic !ManipulationInstruction
- 56 | Halibut
- 57 | Pick
- 58 | Discard
- 59 deriving stock (Eq , Read , Show)
- 60
- 61 data UnaryInstruction = Neg | BNot | LNot
- 62 deriving stock (Eq , Read , Show)
- 63
- 64 data BinaryInstruction =
- 65 Add | Sub | Mul | Div | Mod
- 66 | BAnd | BOr | BXor | BEQ | BGT
- 67 | LAnd | LOr | LXor | LEQ | LGT
- 68 deriving stock (Eq , Read , Show)
- 69
- 70 data ManipulationInstruction = Copy | Move | Slide
- 71 deriving stock (Eq , Read , Show)
- 72
- 73 type StackIndex = Int
- 74
- 75 data OperatorType = Bitwise | Logical
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
deleted file mode 100644
index 7d758d281..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
+++ /dev/null
@@ -1,58 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction.CFInstruction where
- 2
- 3 import HelVM.HelIO.Collections.SList
- 4
- 5 -- | Constructors
- 6
- 7 dJumpI :: CFInstruction
- 8 dJumpI = CDynamic Jump
- 9
- 10 -- | Others
- 11
- 12 isNotJump :: Integral e => BranchTest -> e -> Bool
- 13 isNotJump t = not . isJump t
- 14
- 15 isJump :: Integral e => BranchTest -> e -> Bool
- 16 isJump EZ e = e == 0
- 17 isJump LTZ e = e < 0
- 18 isJump GTZ e = e > 0
- 19
- 20 -- | Types
- 21 data CFInstruction =
- 22 SMark !Label
- 23 | DMark !Natural
- 24 | CStatic !Label !LabelInstruction
- 25 | CDynamic !LabelInstruction
- 26 | Return
- 27 deriving stock (Eq , Read , Show)
- 28
- 29 type Label = SString
- 30
- 31 data LabelInstruction = Call | Jump | Branch !BranchTest
- 32 deriving stock (Eq , Read , Show)
- 33
- 34 data BranchTest = EZ | LTZ | GTZ
- 35 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
deleted file mode 100644
index ad31bd428..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
+++ /dev/null
@@ -1,31 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction.IOInstruction where
- 2
- 3 data IOInstruction =
- 4 OutputChar
- 5 | OutputDec
- 6 | InputChar
- 7 | InputDec
- 8 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
deleted file mode 100644
index 845e60086..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
+++ /dev/null
@@ -1,98 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction.SInstruction where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 4
- 5 -- | Constructors
- 6
- 7 blAnd :: OperatorType -> BinaryInstruction
- 8 blAnd Bitwise = BAnd
- 9 blAnd Logical = LAnd
- 10
- 11 blOr :: OperatorType -> BinaryInstruction
- 12 blOr Bitwise = BOr
- 13 blOr Logical = LOr
- 14
- 15 blXor :: OperatorType -> BinaryInstruction
- 16 blXor Bitwise = BXor
- 17 blXor Logical = LXor
- 18
- 19 blEQ :: OperatorType -> BinaryInstruction
- 20 blEQ Bitwise = BEQ
- 21 blEQ Logical = LEQ
- 22
- 23 blGT :: OperatorType -> BinaryInstruction
- 24 blGT Bitwise = BGT
- 25 blGT Logical = LGT
- 26
- 27 -- | Other functions
- 28
- 29 calculateOps :: Integral a => a -> a -> [BinaryInstruction] -> [a]
- 30 calculateOps operand operand' = map (calculateOp operand operand')
- 31
- 32 calculateOp :: Integral a => a -> a -> BinaryInstruction -> a
- 33 calculateOp operand operand' operation = doBinary operation operand' operand
- 34
- 35 doBinary :: Integral a => BinaryInstruction -> a -> a -> a
- 36 doBinary Add = (+)
- 37 doBinary Sub = (-)
- 38 doBinary Mul = (*)
- 39 doBinary Div = div
- 40 doBinary Mod = mod
- 41 doBinary o = error $ show o
- 42
- 43 -- | Types
- 44 data SInstruction =
- 45 SAL !ALInstruction
- 46 | SIO !IOInstruction
- 47 deriving stock (Eq , Read , Show)
- 48
- 49 data ALInstruction =
- 50 Cons Integer
- 51 | Unary !UnaryInstruction
- 52 | Binary !BinaryInstruction
- 53 | Binaries [BinaryInstruction]
- 54 | SStatic !StackIndex !ManipulationInstruction
- 55 | SDynamic !ManipulationInstruction
- 56 | Halibut
- 57 | Pick
- 58 | Discard
- 59 deriving stock (Eq , Read , Show)
- 60
- 61 data UnaryInstruction = Neg | BNot | LNot
- 62 deriving stock (Eq , Read , Show)
- 63
- 64 data BinaryInstruction =
- 65 Add | Sub | Mul | Div | Mod
- 66 | BAnd | BOr | BXor | BEQ | BGT
- 67 | LAnd | LOr | LXor | LEQ | LGT
- 68 deriving stock (Eq , Read , Show)
- 69
- 70 data ManipulationInstruction = Copy | Move | Slide
- 71 deriving stock (Eq , Read , Show)
- 72
- 73 type StackIndex = Int
- 74
- 75 data OperatorType = Bitwise | Logical
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
deleted file mode 100644
index 55ec34ae8..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
+++ /dev/null
@@ -1,281 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 4 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 5 import HelVM.HelMA.Automaton.Instruction.LSInstruction
- 6 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 7
- 8 import Data.Vector as Vector
- 9
- 10 -- | Constructors
- 11
- 12 consI :: Integer -> Instruction
- 13 consI = sal . Cons
- 14
- 15 addI , subI , mulI , divI , modI :: Instruction
-<<<<<<< HEAD
- 16 addI = binary Add
- 17 subI = binary Sub
- 18 mulI = binary Mul
- 19 divI = binary Div
- 20 modI = binary Mod
-=======
- 16 addI = binary Add
- 17 subI = binary Sub
- 18 mulI = binary Mul
- 19 divI = binary Div
- 20 modI = binary Mod
->>>>>>> edc36565 (Compile Common Stack Automaton to lambdas)
- 21
- 22 divModI , negI , halibutI :: Instruction
- 23 divModI = binaries [Mod, Div]
- 24 negI = unary Neg
- 25 halibutI = sal Halibut
- 26
- 27 dupI , swapI , rotI , dCopy , discardI :: Instruction
-<<<<<<< HEAD
- 28 dupI = sCopyI 0
- 29 swapI = sMoveI 1
- 30 rotI = sMoveI 2
- 31 dCopy = sal $ SDynamic Copy
- 32 discardI = sal Discard
- 33
- 34 sCopyI :: StackIndex -> Instruction
- 35 sCopyI = sStatic Copy
- 36
- 37 sMoveI :: StackIndex -> Instruction
- 38 sMoveI = sStatic Move
- 39
- 40 sSlideI :: StackIndex -> Instruction
- 41 sSlideI = sStatic Slide
- 42
- 43 sStatic :: ManipulationInstruction -> StackIndex -> Instruction
- 44 sStatic i = sal . flip SStatic i
- 45
- 46 sInputI , sOutputI , sOutputDecI :: Instruction
- 47 sInputI = sio InputChar
- 48 sOutputI = sio OutputChar
- 49 sOutputDecI = sio OutputDec
- 50
- 51 binaries :: [BinaryInstruction] -> Instruction
- 52 binaries = sal . Binaries
- 53
- 54 binary :: BinaryInstruction -> Instruction
- 55 binary = sal . Binary
- 56
- 57 unary :: UnaryInstruction -> Instruction
- 58 unary = sal . Unary
- 59
- 60 sal :: ALInstruction -> Instruction
- 61 sal = IAL . SAL
- 62
- 63 sio :: IOInstruction -> Instruction
- 64 sio = IAL . SIO
- 65
- 66 dMarkI :: Natural -> Instruction
- 67 dMarkI = ICF . DMark
- 68
- 69 sMarkIN :: Natural -> Instruction
- 70 sMarkIN = sMarkI . show
- 71
- 72 sMarkI :: Label -> Instruction
- 73 sMarkI = ICF . SMark
- 74
- 75 sJumpIN :: Natural -> Instruction
- 76 sJumpIN = cStaticI Jump . show
- 77
- 78 sCallI , sJumpI :: Label -> Instruction
- 79 sCallI = cStaticI Call
- 80 sJumpI = cStaticI Jump
- 81
- 82 sEZI , sLTZI :: Label -> Instruction
- 83 sEZI = cStaticI (Branch EZ )
- 84 sLTZI = cStaticI (Branch LTZ)
- 85
- 86 cStaticI :: LabelInstruction -> Label -> Instruction
- 87 cStaticI i label = ICF $ CStatic label i
- 88
- 89 returnI :: Instruction
- 90 returnI = ICF Return
- 91
- 92 storeI , loadI :: Instruction
- 93 storeI = ILS Store
- 94 loadI = ILS Load
- 95
- 96 mInputI , mInputDecI :: Instruction
- 97 mInputI = ILS (MIO InputChar)
- 98 mInputDecI = ILS (MIO InputDec )
- 99
- 100 -- | Others
- 101
- 102 extractPureIAL :: Instruction -> Maybe ALInstruction
- 103 extractPureIAL (IAL (SAL i)) = Just i
- 104 extractPureIAL _ = Nothing
- 105
- 106 isPureIAL :: Instruction -> Bool
- 107 isPureIAL (IAL (SIO _)) = False
- 108 isPureIAL (IAL _ ) = True
- 109 isPureIAL _ = False
- 110
- 111 isICF :: Instruction -> Bool
- 112 isICF (ICF _) = True
- 113 isICF _ = False
- 114
- 115 isMark :: Instruction -> Bool
- 116 isMark (ICF (DMark _)) = True
- 117 isMark (ICF (SMark _)) = True
- 118 isMark _ = False
- 119
- 120 isDMark :: Natural -> Instruction -> Bool
- 121 isDMark n (ICF (DMark n')) = n == n'
- 122 isDMark _ _ = False
- 123
- 124 isSMark :: Label -> Instruction -> Bool
- 125 isSMark l (ICF (SMark l')) = l == l'
- 126 isSMark _ _ = False
- 127
- 128 -- | Types
- 129
- 130 data Instruction =
- 131 IAL !SInstruction
- 132 | ILS !LSInstruction
- 133 | ICF !CFInstruction
- 134 | End
- 135 | Transfer
- 136 deriving stock (Eq , Read , Show)
- 137
- 138 type InstructionList = [Instruction]
- 139 type InstructionVector = Vector Instruction
-=======
- 28 dupI = sal $ SStatic 0 Copy
- 29 swapI = sal $ SStatic 1 Move
- 30 rotI = sal $ SStatic 2 Move
- 31 dCopy = sal $ SDynamic Copy
- 32 discardI = sal Discard
- 33
- 34 sCopyI :: StackIndex -> Instruction
- 35 sCopyI index = sal $ SStatic index Copy --FIXME
- 36
- 37 sSlideI :: StackIndex -> Instruction
- 38 sSlideI index = sal $ SStatic index Slide --FIXME
- 39
- 40 sInputI , sOutputI , sOutputDecI :: Instruction
- 41 sInputI = sio InputChar
- 42 sOutputI = sio OutputChar
- 43 sOutputDecI = sio OutputDec
- 44
- 45 binaries :: [BinaryInstruction] -> Instruction
- 46 binaries = sal . Binaries
- 47
- 48 binary :: BinaryInstruction -> Instruction
- 49 binary = sal . Binary
- 50
- 51 unary :: UnaryInstruction -> Instruction
- 52 unary = sal . Unary
- 53
- 54 sal :: ALInstruction -> Instruction
- 55 sal = IAL . SAL
- 56
- 57 sio :: IOInstruction -> Instruction
- 58 sio = IAL . SIO
- 59
- 60 dMarkI :: Natural -> Instruction
- 61 dMarkI = ICF . DMark
- 62
- 63 sMarkIN :: Natural -> Instruction
- 64 sMarkIN = sMarkI . show
- 65
- 66 sMarkI :: Label -> Instruction
- 67 sMarkI = ICF . SMark
- 68
- 69 sJumpIN :: Natural -> Instruction
- 70 sJumpIN = cStaticI Jump . show
- 71
- 72 sCallI , sJumpI :: Label -> Instruction
- 73 sCallI = cStaticI Call
- 74 sJumpI = cStaticI Jump
- 75
- 76 sEZI , sLTZI :: Label -> Instruction
- 77 sEZI = cStaticI (Branch EZ )
- 78 sLTZI = cStaticI (Branch LTZ )
- 79
- 80 cStaticI :: LabelInstruction -> Label -> Instruction
- 81 cStaticI i label = ICF $ CStatic label i
- 82
- 83 returnI :: Instruction
- 84 returnI = ICF Return
- 85
- 86 -- ILS
- 87
- 88 storeI , loadI :: Instruction
- 89 storeI = ILS Store
- 90 loadI = ILS Load
- 91
- 92 mInputI , mInputDecI :: Instruction
- 93 mInputI = ILS (MIO InputChar )
- 94 mInputDecI = ILS (MIO InputDec )
- 95
- 96 -- | Others
- 97
- 98 extractPureIAL :: Instruction -> Maybe ALInstruction
- 99 extractPureIAL (IAL (SAL i)) = Just i
- 100 extractPureIAL _ = Nothing
- 101
- 102 isPureIAL :: Instruction -> Bool
- 103 isPureIAL (IAL (SIO _)) = False
- 104 isPureIAL (IAL _ ) = True
- 105 isPureIAL _ = False
- 106
- 107 isICF :: Instruction -> Bool
- 108 isICF (ICF _) = True
- 109 isICF _ = False
- 110
- 111 isMark :: Instruction -> Bool
- 112 isMark (ICF (DMark _)) = True
- 113 isMark (ICF (SMark _)) = True
- 114 isMark _ = False
- 115
- 116 isDMark :: Natural -> Instruction -> Bool
- 117 isDMark n (ICF (DMark n')) = n == n'
- 118 isDMark _ _ = False
- 119
- 120 isSMark :: Label -> Instruction -> Bool
- 121 isSMark l (ICF (SMark l')) = l == l'
- 122 isSMark _ _ = False
- 123
- 124 -- | Types
- 125
- 126 data Instruction =
- 127 IAL !SInstruction
- 128 | ILS !LSInstruction
- 129 | ICF !CFInstruction
- 130 | End
- 131 | Transfer
- 132 deriving stock (Eq , Read , Show)
- 133
- 134 type InstructionList = [Instruction]
- 135 type InstructionVector = Vector Instruction
->>>>>>> edc36565 (Compile Common Stack Automaton to lambdas)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Loop.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Loop.hs.html
deleted file mode 100644
index 9e063f66d..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Loop.hs.html
+++ /dev/null
@@ -1,55 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Loop where
- 2
- 3 import Control.Monad.Extra
- 4 import Control.Type.Operator
- 5
- 6 import Data.Either.Extra
- 7
- 8 import Prelude hiding (break)
- 9
- 10 testMaybeLimit :: LimitMaybe
- 11 testMaybeLimit = Just $ fromIntegral (maxBound :: Int)
- 12
- 13 loopMWithLimit :: Monad m => (a -> m $ Same a) -> LimitMaybe -> a -> m a
- 14 loopMWithLimit f Nothing x = loopM f x
- 15 loopMWithLimit f (Just n) x = loopM (actMWithLimit f) (n , x)
- 16
- 17 actMWithLimit :: Monad m => (a -> m $ Same a) -> WithLimit a -> m (Either (WithLimit a) a)
- 18 actMWithLimit f (n , x) = checkN n where
- 19 checkN 0 = pure $ break x
- 20 checkN _ = mapLeft (n - 1 , ) <$> f x
- 21
- 22 break :: b -> Either a b
- 23 break = Right
- 24
- 25 continue :: a -> Either a b
- 26 continue = Left
- 27
- 28 type LimitMaybe = Maybe Natural
- 29
- 30 type WithLimit a = (Natural , a)
- 31
- 32 type Same a = Either a a
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Optimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Optimizer.hs.html
deleted file mode 100644
index 9ac3b59e6..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Optimizer.hs.html
+++ /dev/null
@@ -1,115 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Optimizer (
- 2 optimize,
-<<<<<<< HEAD
- 3 constantFolding,
-=======
- 3 constantFoldingWithAcc,
->>>>>>> edc36565 (Compile Common Stack Automaton to lambdas)
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automaton.API.OptimizationLevel
- 7
- 8 import HelVM.HelMA.Automaton.Combiner.ALU
- 9
- 10 import HelVM.HelMA.Automaton.Instruction
- 11
-<<<<<<< HEAD
- 12 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 13
- 14 import qualified Data.ListLike as LL
- 15
- 16 optimize :: OptimizationLevel -> InstructionList -> InstructionList
- 17 optimize NoOptimizations = id
- 18 optimize BasicOptimizations = constantFolding
- 19 optimize SomeOptimizations = peepholeOptimize . constantFolding
- 20 optimize AllOptimizations = peepholeOptimize . constantFolding
- 21
- 22 constantFolding :: InstructionList -> InstructionList
- 23 constantFolding = constantFoldingWithAcc []
- 24
- 25 constantFoldingWithAcc :: [Integer] -> InstructionList -> InstructionList
- 26 constantFoldingWithAcc acc (i : il) = constantFoldingForI acc il i
- 27 constantFoldingWithAcc acc [] = generateIL acc
- 28
- 29 constantFoldingForI :: [Integer] -> InstructionList -> Instruction -> InstructionList
- 30 constantFoldingForI acc il i@(IAL (SAL i')) = constantFoldingForResult il i acc $ runSAL i' acc
- 31 constantFoldingForI acc il i = generateIL acc <> (i : constantFolding il)
- 32
- 33 constantFoldingForResult :: InstructionList -> Instruction -> [Integer] -> Either a [Integer] -> InstructionList
- 34 constantFoldingForResult il _ _ (Right acc) = constantFoldingWithAcc acc il
- 35 constantFoldingForResult il i acc (Left _ ) = generateIL acc <> (i : constantFolding il)
- 36
- 37 generateIL :: [Integer] -> InstructionList
- 38 generateIL acc = consI <$> LL.reverse acc
- 39
- 40 peepholeOptimize :: InstructionList -> InstructionList
- 41 peepholeOptimize = id
-=======
- 12 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 13 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 14
- 15 import qualified Data.ListLike as LL
- 16
- 17 optimize :: OptimizationLevel -> InstructionList -> InstructionList
- 18 optimize NoOptimizations = id
- 19 optimize BasicOptimizations = constantFolding
- 20 optimize SomeOptimizations = peepholeOptimize . constantFolding
- 21 optimize AllOptimizations = peepholeOptimize . constantFolding
- 22
- 23 constantFolding :: InstructionList -> InstructionList
- 24 constantFolding = constantFoldingWithAcc []
- 25
- 26 constantFoldingWithAcc :: [Integer] -> InstructionList -> InstructionList
- 27 constantFoldingWithAcc acc (i : il) = constantFoldingForI acc il i
- 28 constantFoldingWithAcc acc [] = generateIL acc
- 29
- 30 constantFoldingForI :: [Integer] -> InstructionList -> Instruction -> InstructionList
- 31 constantFoldingForI acc il i@(IAL (SAL i')) = constantFoldingForResult il i acc $ runSAL i' acc
- 32 constantFoldingForI acc il i = generateIL acc <> (i : constantFolding il)
- 33
- 34 constantFoldingForResult :: InstructionList -> Instruction -> [Integer] -> Either a [Integer] -> InstructionList
- 35 constantFoldingForResult il _ _ (Right acc) = constantFoldingWithAcc acc il
- 36 constantFoldingForResult il i acc (Left _ ) = generateIL acc <> (i : constantFolding il)
- 37
- 38 generateIL :: [Integer] -> InstructionList
- 39 generateIL acc = consI <$> LL.reverse acc
- 40
- 41 peepholeOptimize :: InstructionList -> InstructionList
- 42 peepholeOptimize (IAL (SAL (Cons c)) : IAL (SAL (Cons a)) : Transfer : il) = peepholeOptimize (optimizeTransfer c a <> il)
- 43 --peepholeOptimize (IAL (Cons a) : Transfer : il) = optimize (optimizeTransfer2 a <> il)
- 44 peepholeOptimize (i : il) = i : peepholeOptimize il
- 45 peepholeOptimize [] = []
- 46
- 47 optimizeTransfer :: Integer -> Integer -> InstructionList
- 48 optimizeTransfer 0 _ = []
- 49 optimizeTransfer _ 0 = [End]
- 50 optimizeTransfer _ a = [consI a , ICF dJumpI]
- 51
- 52 --optimizeHalibut i
- 53 -- | i < 0
- 54
- 55 -- https://helvm.org/eta/manual.html#4
->>>>>>> edc36565 (Compile Common Stack Automaton to lambdas)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Unit.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Unit.hs.html
deleted file mode 100644
index 284303210..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Unit.hs.html
+++ /dev/null
@@ -1,121 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner where
- 2
- 3 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 4
- 5 import HelVM.HelMA.Automaton.Instruction
- 6 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 7
- 8 import HelVM.HelMA.Automaton.Loop as Loop
- 9
- 10 import HelVM.HelMA.Automaton.Symbol
- 11
- 12 import HelVM.HelMA.Automaton.Combiner.ALU as Stack
- 13 import HelVM.HelMA.Automaton.Combiner.CPU as CPU
- 14 import HelVM.HelMA.Automaton.Combiner.LSU as LSU
- 15
- 16 import Control.Monad.Extra
- 17 import Control.Type.Operator
- 18
- 19 import Prelude hiding (swap)
- 20
- 21 -- | Core of Automaton
- 22
- 23 runInstruction :: (SRAutomatonIO Symbol s r m) => Instruction -> SF s r m
- 24 runInstruction (IAL i) a = Loop.continue . updateStack a <$> runALI i (unitStack a)
- 25 runInstruction (ILS i) a = Loop.continue . updateFromLSU a <$> runSLI i (toLSU a)
- 26 runInstruction (ICF i) a = Loop.continue . updateFromCPU a <$> runCFI i (toCPU a)
- 27 runInstruction Transfer a = transfer a
- 28 runInstruction End a = end a
- 29
- 30 transfer :: (SRAutomatonIO Symbol s r m) => SF s r m
- 31 transfer = transferBranch <=< pop2ForStack
- 32
- 33 transferBranch :: (SRAutomatonIO Symbol s r m) => (Symbol, Symbol, Unit s r) -> m $ UnitSame s r
- 34 transferBranch (_ , 0 , u) = pure $ Loop.continue u
- 35 transferBranch (0 , _ , u) = end u
- 36 transferBranch (a , _ , u) = Loop.continue . updateFromCPU u <$> runCFI dJumpI (toCPU $ push1ForStack a u)
- 37
- 38 pop2ForStack :: (SRAutomatonIO Symbol s r m) => Unit s r -> m (Symbol , Symbol , Unit s r)
- 39 pop2ForStack a = build <$> pop2 (unitStack a) where
- 40 build (s1 , s2 , s') = (s1 , s2 , updateStack a s')
- 41
- 42 push1ForStack :: Stack s Symbol => Symbol -> Unit s r -> Unit s r
- 43 push1ForStack e a = a { unitStack = push1 e (unitStack a) }
- 44
- 45 end :: (SRAutomatonIO Symbol s r m) => SF s r m
- 46 end = pure . Loop.break
- 47
- 48 -- | Constructors
- 49
- 50 flippedNewAutomaton :: (s , r) -> InstructionList -> Unit s r
- 51 flippedNewAutomaton = flip (uncurry . newAutomaton)
- 52
- 53 newAutomaton :: InstructionList -> s -> r -> Unit s r
- 54 newAutomaton il = Unit (newCU il)
- 55
- 56 -- | Updaters
- 57
- 58 incrementIC :: Unit s r -> Unit s r
- 59 incrementIC a = a { unitCU = incrementPC $ unitCU a}
- 60
- 61 updateStack :: Unit s r -> s -> Unit s r
- 62 updateStack a s = a {unitStack = s}
- 63
- 64 updateFromCPU :: Unit s r -> CentralProcessingUnit s -> Unit s r
- 65 updateFromCPU a cpu = a { unitCU = controlUnit cpu, unitStack = alu cpu}
- 66
- 67 updateFromLSU :: Unit s r -> LoadStoreUnit s r -> Unit s r
- 68 updateFromLSU a lsu = a {unitStack = stack lsu , unitRAM = ram lsu}
- 69
- 70 -- | Accessors
- 71
- 72 unitProgram :: Unit s r -> InstructionVector
- 73 unitProgram = program . unitCU
- 74
- 75 unitProgramCounter :: Unit s r -> InstructionCounter
- 76 unitProgramCounter = programCounter . unitCU
- 77
- 78 toCPU :: Unit s r -> CentralProcessingUnit s
- 79 toCPU a = CPU { controlUnit = unitCU a , alu = unitStack a }
- 80
- 81 toLSU :: Unit s r -> LoadStoreUnit s r
- 82 toLSU a = LSU { stack = unitStack a, ram = unitRAM a }
- 83
- 84 -- | Types
- 85
- 86 type SF s r m = Unit s r -> m $ UnitSame s r
- 87
- 88 type F s r m = Unit s r -> m $ Unit s r
- 89
- 90 type UnitSame s r = Same (Unit s r)
- 91
- 92 -- | Data types
- 93 data Unit s r = Unit
- 94 { unitCU :: ControlUnit
- 95 , unitStack :: s
- 96 , unitRAM :: r
- 97 }
- 98 deriving stock (Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.ALU.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.ALU.hs.html
deleted file mode 100644
index 2c24b3da2..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.ALU.hs.html
+++ /dev/null
@@ -1,191 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.ALU (
- 2 doOutputChar2,
- 3 doInputChar2,
- 4 doInputDec2,
- 5 divMod,
- 6 sub,
- 7 binaryInstruction,
- 8 binaryInstructions,
- 9 halibut,
- 10 runALI,
- 11 move,
- 12 discard,
- 13 slide,
- 14 copy,
- 15 flipPush1,
- 16 charPush1,
- 17 genericPush1,
- 18 pop1,
- 19 pop2,
- 20 push1,
- 21 push2,
- 22 splitAt,
- 23 drop,
- 24 ALU,
- 25 Stack,
- 26 ) where
- 27
- 28 import HelVM.HelMA.Automaton.Instruction.ALInstruction
- 29 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 30
- 31 import HelVM.HelMA.Automaton.IO.BusinessIO
- 32
- 33 import HelVM.HelIO.Control.Safe
- 34
- 35 import HelVM.HelIO.Containers.LLIndexSafe
- 36
- 37 import HelVM.HelIO.ListLikeExtra
- 38
- 39 import Control.Applicative.Tools
- 40 import Data.ListLike hiding (show)
- 41 import Prelude hiding (divMod, drop, fromList, splitAt, swap)
- 42
- 43 --aotALI ::
- 44
- 45 runALI :: ALU m ll element => ALInstruction -> ll -> m ll
- 46 runALI (Cons i ) = push i
- 47 runALI (Unary op) = error $ show op
- 48 runALI (Binary op) = binaryInstruction op
- 49 runALI (Binaries ops) = binaryInstructions ops
- 50 runALI (SDynamic op) = dynamicManipulation op
- 51 runALI (SStatic i op) = staticManipulation op i
- 52 runALI (SIO OutputChar) = doOutputChar2
- 53 runALI (SIO OutputDec) = doOutputDec2
- 54 runALI (SIO InputChar) = doInputChar2
- 55 runALI (SIO InputDec) = doInputDec2
- 56 runALI Halibut = halibut
- 57 runALI Pick = pick
- 58 runALI Discard = discard
- 59
- 60 -- | Arithmetic instructions
- 61 divMod :: ALU m ll element => ll -> m ll
- 62 divMod = binaryInstructions [Mod , Div]
- 63
- 64 sub :: ALU m ll element => ll -> m ll
- 65 sub = binaryInstruction Sub
- 66
- 67 binaryInstruction :: ALU m ll element => BinaryInstruction -> ll -> m ll
- 68 binaryInstruction i = binaryInstructions [i]
- 69
- 70 binaryInstructions :: ALU m ll element => [BinaryInstruction] -> ll -> m ll
- 71 binaryInstructions il = build <.> pop2 where
- 72 build (e , e', l) = pushList (calculateOps e e' il) l
- 73
- 74 -- | IO instructions
- 75 doOutputChar2 :: ALU m ll element => ll -> m ll
- 76 doOutputChar2 = appendError "ALU.doOutputChar2" . build <=< pop1 where
- 77 build (e , l) = wPutAsChar e $> l
- 78
- 79 doOutputDec2 :: ALU m ll element => ll -> m ll
- 80 doOutputDec2 = appendError "ALU.doOutputDec2" . build <=< pop1 where
- 81 build (e , l) = wPutAsDec e $> l
- 82
- 83 doInputChar2 :: ALU m ll element => ll -> m ll
- 84 doInputChar2 l = appendError "ALU.doOutputDec2" $ build <$> wGetCharAs where
- 85 build e = push1 e l
- 86
- 87 doInputDec2 :: ALU m ll element => ll -> m ll
- 88 doInputDec2 l = build <$> wGetCharAs where
- 89 build e = push1 e l
- 90
- 91 -- | Manipulation instructions
- 92 dynamicManipulation :: ALU m ll element => ManipulationInstruction -> ll -> m ll
- 93 dynamicManipulation op = appendError "ALU.dynamicManipulation" . build <=< unconsSafe where
- 94 build (e , l) = staticManipulation op (fromIntegral e) l
- 95
- 96 staticManipulation :: ALU m ll element => ManipulationInstruction -> Index -> ll -> m ll
- 97 staticManipulation Copy = copy
- 98 staticManipulation Move = move
- 99 staticManipulation Slide = slide
- 100
- 101 -- | Halibut and Pick instructions
- 102 halibut :: ALU m ll element => ll -> m ll
- 103 halibut = appendError "ALU.halibut" . build <=< pop1 where
- 104 build (e , l)
- 105 | 0 < i = move i l
- 106 | otherwise = copy (negate i) l
- 107 where i = fromIntegral e
- 108
- 109 pick :: ALU m ll element => ll -> m ll
- 110 pick = appendError "ALU.pick" . build <=< pop1 where
- 111 build (e , l)
- 112 | 0 <= i = copy i l
- 113 | otherwise = move (negate i) l
- 114 where i = fromIntegral e
- 115
- 116 -- | Slide instructions
- 117 slide :: ALU m ll element => Index -> ll -> m ll
- 118 slide i = appendError "ALU.pop2" . build <.> pop1 where
- 119 build (e , l) = push1 e $ drop i l
- 120
- 121 -- | Move instructions
- 122 move :: ALU m ll element => Index -> ll -> m ll
- 123 move i l = pure $ l1 <> l2 <> l3 where
- 124 (l1 , l3) = splitAt 1 l'
- 125 (l2 , l') = splitAt i l
- 126
- 127 -- | Copy instructions
- 128 copy :: ALU m ll element => Index -> ll -> m ll
- 129 copy i = teeMap flipPush1 (findSafe i)
- 130
- 131 -- | Pop instructions
- 132 pop1 :: ALU m ll element => ll -> m (element , ll)
- 133 pop1 = appendError "ALU.pop1" . unconsSafe
- 134
- 135 pop2 :: ALU m ll element => ll -> m (element , element , ll)
- 136 pop2 = appendError "ALU.pop2" . uncons2Safe
- 137
- 138 -- | Push instructions
- 139 push :: ALU m ll element => Integer -> ll -> m ll
- 140 push i = pure . genericPush1 i
- 141
- 142 flipPush1 :: Stack ll element => ll -> element -> ll
- 143 flipPush1 = flip push1
- 144
- 145 charPush1 :: (Num element , Stack ll element) => Char -> ll -> ll
- 146 charPush1 = genericPush1 . ord
- 147
- 148 genericPush1 :: (Integral v , Num element , Stack ll element) => v -> ll -> ll
- 149 genericPush1 = push1 . fromIntegral
- 150
- 151 push1 :: Stack ll element => element -> ll -> ll
- 152 push1 e = pushList [e]
- 153
- 154 push2 :: Stack ll element => element -> element -> ll -> ll
- 155 push2 e e' = pushList [e , e']
- 156
- 157 pushList :: Stack ll element => [element] -> ll -> ll
- 158 pushList es l = fromList es <> l
- 159
- 160 teeMap :: Functor f => (t -> a -> b) -> (t -> f a) -> t -> f b
- 161 teeMap f2 f1 x = f2 x <$> f1 x
- 162
- 163 -- | Types
- 164 type ALU m ll element = (BIO m , Stack ll element , Integral element)
- 165
- 166 type Stack ll element = (Show ll , ListLike ll element , IndexSafe ll element)
- 167
- 168 type Index = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.CPU.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.CPU.hs.html
deleted file mode 100644
index 981d821e4..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.CPU.hs.html
+++ /dev/null
@@ -1,126 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.CPU where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction
- 4 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 5
- 6 import HelVM.HelMA.Automaton.Combiner.ALU
- 7
- 8 import HelVM.HelIO.Containers.LLIndexSafe
- 9 import HelVM.HelIO.Control.Safe
- 10
- 11 import Control.Type.Operator
- 12
- 13 import Data.ListLike hiding (show)
- 14 import qualified Data.Vector as Vector
- 15
- 16 runCFI :: (ALU m ll element , Show element) => CFInstruction -> CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 17 runCFI (DMark _ ) = pure
- 18 runCFI (SMark _ ) = pure
- 19 runCFI Return = popAddress
- 20 runCFI (CDynamic Call ) = dynamicCall
- 21 runCFI (CDynamic Jump ) = dynamicJump
- 22 runCFI (CDynamic (Branch t)) = dynamicBranch t
- 23 runCFI (CStatic l Call ) = staticCall l
- 24 runCFI (CStatic l Jump ) = staticJump l
- 25 runCFI (CStatic l (Branch t)) = staticBranch l t
- 26
- 27 popAddress :: ALU m ll element => CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 28 popAddress (CPU (CU il _ (IS (a : is))) s) = pure $ CPU (CU il a $ IS is) s
- 29 popAddress (CPU (CU il _ (IS [] )) _) = liftErrorWithTupleList "Empty Return Stack" [("il" , show il)]
- 30
- 31 dynamicCall :: (ALU m ll element , Show element) => CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 32 dynamicCall (CPU (CU il ic (IS is)) s) = appendError "CPU.dynamicCall" $ call1 =<< pop1 s where
- 33 call1 (n , s') = call2 <$> findAddressForDynamicLabel n il where
- 34 call2 a = CPU (CU il a (IS (ic : is))) s'
- 35
- 36 dynamicJump :: (ALU m ll element , Show element) => CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 37 dynamicJump (CPU (CU il _ is) s) = appendError "CPU.dynamicJump" $ jump1 =<< pop1 s where
- 38 jump1 (n, s') = jump2 <$> findAddressForDynamicLabel n il where
- 39 jump2 a = CPU (CU il a is) s'
- 40
- 41 dynamicBranch :: (ALU m ll element , Show element) => BranchTest -> CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 42 dynamicBranch t (CPU (CU il ic is) s) = appendError "CPU.dynamicBranch" $ branch =<< pop2 s where
- 43 branch (n , e , s')
- 44 | isNotJump t e = pure $ CPU (CU il ic is) s'
- 45 | otherwise = jump <$> findAddressForDynamicLabel n il where
- 46 jump ic' = CPU (CU il ic' is) s'
- 47
- 48 findAddressForDynamicLabel :: (MonadSafe m , Integral n , Show n) => n -> InstructionVector -> m InstructionAddress
- 49 findAddressForDynamicLabel n il
- 50 | n < 0 = liftError $ show n
- 51 | otherwise = liftMaybeOrErrorTuple ("Undefined label", show n) $ findIndex (isDMark $ fromIntegral n) il
- 52
- 53 --
- 54
- 55 staticCall :: ALU m ll element => Label -> CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 56 staticCall l (CPU (CU il ic (IS is)) s) = appendError "CPU.staticCall" $ call <$> findAddressForStaticLabel l il where
- 57 call a = CPU (CU il a (IS (ic : is))) s
- 58
- 59 staticJump :: ALU m ll element => Label -> CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 60 staticJump l (CPU (CU il _ is) s) = appendError "CPU.staticJump" $ jump <$> findAddressForStaticLabel l il where
- 61 jump a = CPU (CU il a is) s
- 62
- 63 staticBranch :: ALU m ll element => Label -> BranchTest -> CentralProcessingUnit ll -> m $ CentralProcessingUnit ll
- 64 staticBranch l t (CPU (CU il ic is) s) = appendError "CPU.staticBranch" $ branch =<< pop1 s where
- 65 branch (e , s')
- 66 | isNotJump t e = pure $ CPU (CU il ic is) s'
- 67 | otherwise = jump <$> findAddressForStaticLabel l il where
- 68 jump ic' = CPU (CU il ic' is) s'
- 69
- 70 findAddressForStaticLabel :: MonadSafe m => Label -> InstructionVector -> m InstructionAddress
- 71 findAddressForStaticLabel l = liftMaybeOrErrorTuple ("Undefined label", show l) . findIndex (isSMark l)
- 72
- 73 -- | ControlUnit methods
- 74
- 75 newCU :: InstructionList -> ControlUnit
- 76 newCU il = CU (Vector.fromList il) 0 (IS [])
- 77
- 78 currentInstruction :: MonadSafe m => ControlUnit -> m Instruction
- 79 currentInstruction (CU il ic _) = indexSafe il ic
- 80
- 81 incrementPC :: ControlUnit -> ControlUnit
- 82 incrementPC cu = cu { programCounter = 1 + programCounter cu }
- 83
- 84 -- | Types
- 85 data CentralProcessingUnit al = CPU
- 86 { controlUnit :: ControlUnit
- 87 , alu :: al
- 88 }
- 89 deriving stock (Show)
- 90
- 91 data ControlUnit = CU
- 92 { program :: InstructionVector
- 93 , programCounter :: InstructionCounter
- 94 , returnStack :: InstructionStack
- 95 }
- 96 deriving stock (Show)
- 97
- 98 newtype InstructionStack = IS [InstructionAddress]
- 99 deriving stock (Show)
- 100
- 101 type InstructionCounter = InstructionAddress
- 102
- 103 type InstructionAddress = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.LSU.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.LSU.hs.html
deleted file mode 100644
index ed2ef2b90..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.LSU.hs.html
+++ /dev/null
@@ -1,76 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.LSU where
- 2
- 3 import HelVM.HelMA.Automaton.Combiner.ALU
- 4 import qualified HelVM.HelMA.Automaton.Combiner.RAM as RAM
- 5
- 6 import HelVM.HelMA.Automaton.IO.BusinessIO
- 7
- 8 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 9 import HelVM.HelMA.Automaton.Instruction.LSInstruction
- 10
- 11 import HelVM.HelIO.Control.Safe
- 12
- 13 import Control.Type.Operator
- 14
- 15 runSLI :: (LSU m s r element) => LSInstruction -> LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 16 runSLI Load = load
- 17 runSLI Store = store
- 18 runSLI (MIO OutputChar) = loadOutputChar
- 19 runSLI (MIO OutputDec) = loadOutputDec
- 20 runSLI (MIO InputChar) = storeInputChar
- 21 runSLI (MIO InputDec) = storeInputDec
- 22
- 23 load :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 24 load (LSU s r) = appendError "LSU.load" $ build <$> pop1 s where
- 25 build (address , s') = LSU (push1 (RAM.genericLoad r address) s') r
- 26
- 27 store :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 28 store (LSU s r) = appendError "LSU.store" $ build <$> pop2 s where
- 29 build (value , address , s') = LSU s' $ RAM.store address value r
- 30
- 31 loadOutputChar :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 32 loadOutputChar (LSU s r) = appendError "LSU.loadOutputChar" $ build =<< pop1 s where
- 33 build (address , s') = LSU s' r <$ wPutAsChar (RAM.genericLoad r address)
- 34
- 35 loadOutputDec :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 36 loadOutputDec (LSU s r) = appendError "LSU.loadOutputDec" $ build =<< pop1 s where
- 37 build (address , s') = LSU s' r <$ wPutAsDec (RAM.genericLoad r address)
- 38
- 39 storeInputChar :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 40 storeInputChar (LSU s r) = appendError "LSU.storeInputChar" $ build =<< pop1 s where
- 41 build (address , s') = LSU s' . flip (RAM.store address) r <$> wGetCharAs
- 42
- 43 storeInputDec :: LSU m s r element => LoadStoreUnit s r -> m $ LoadStoreUnit s r
- 44 storeInputDec (LSU s r) = appendError "LSU.storeInputDec" $ build =<< pop1 s where
- 45 build (address , s') = LSU s' . flip (RAM.store address) r <$> wGetDecAs
- 46
- 47 -- | Types
- 48 type LSU m s r element = (ALU m s element , RAM.RAM r element)
- 49
- 50 data LoadStoreUnit s r = LSU
- 51 { stack :: s
- 52 , ram :: r
- 53 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.RAM.hs.html b/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.RAM.hs.html
deleted file mode 100644
index 428fcd692..000000000
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Units.RAM.hs.html
+++ /dev/null
@@ -1,64 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.RAM (
- 2 genericLoad,
- 3 load,
- 4 flippedStoreChar,
- 5 storeChar,
- 6 genericStore,
- 7 store,
- 8 fromList,
- 9 RAM,
- 10 ) where
- 11
- 12 import HelVM.HelIO.Containers.LLIndexSafe
- 13 import HelVM.HelIO.Containers.LLInsertDef
- 14
- 15 import Data.Default
- 16 import Prelude hiding (divMod, drop, splitAt, swap)
- 17
- 18 genericLoad :: (Integral i , RAM ll element) => ll -> i -> element
- 19 genericLoad l = load l . fromIntegral
- 20
- 21 load :: (RAM ll element) => ll -> Address -> element
- 22 load l i = indexMaybe l i ?: def
- 23
- 24 flippedStoreChar :: (Num element , Integral address , RAM ll element) => address -> ll -> Char -> ll
- 25 flippedStoreChar a = flip (storeChar a)
- 26
- 27 storeChar :: (Num element , Integral address , RAM ll element) => address -> Char -> ll -> ll
- 28 storeChar a char = genericStore a $ ord char
- 29
- 30 genericStore :: (Integral value , Num element , Integral address , RAM ll element) => address -> value -> ll -> ll
- 31 genericStore a v = store a $ fromIntegral v
- 32
- 33 store :: (Integral a , RAM ll element) => a -> element -> ll -> ll
- 34 store = insertDef . fromIntegral
- 35
- 36 -- | Types
- 37 type RAM ll element = (Show ll , Default element , II ll element)
- 38
- 39 type II ll element = (InsertDef ll element , IndexSafe ll element)
- 40
- 41 type Address = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
deleted file mode 100644
index c5c5fe35e..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.API.BFType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultBFType :: BFType
- 7 defaultBFType = defaultEnum
- 8
- 9 bfTypes :: [BFType]
- 10 bfTypes = generateEnums 3
- 11
- 12 -- | Type
- 13 data BFType = FastType | TreeType | FlatType
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
deleted file mode 100644
index 5e949c6e8..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
+++ /dev/null
@@ -1,59 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction where
- 2
- 3 import qualified Text.Read
- 4 import qualified Text.Show
- 5
- 6 charToSimpleInstruction :: Char -> Maybe SimpleInstruction
- 7 charToSimpleInstruction = readMaybe . one
- 8
- 9 simpleInstructions :: [SimpleInstruction]
- 10 simpleInstructions = [MoveR , MoveL , Inc , Dec , Output , Input]
- 11
- 12 data SimpleInstruction =
- 13 MoveR
- 14 | MoveL
- 15 | Inc
- 16 | Dec
- 17 | Output
- 18 | Input
- 19 deriving stock (Bounded , Enum , Eq)
- 20
- 21 instance Show SimpleInstruction where
- 22 show MoveR = ">"
- 23 show MoveL = "<"
- 24 show Inc = "+"
- 25 show Dec = "-"
- 26 show Output = "."
- 27 show Input = ","
- 28
- 29 instance Read SimpleInstruction where
- 30 readsPrec _ ">" = [( MoveR , "")]
- 31 readsPrec _ "<" = [( MoveL , "")]
- 32 readsPrec _ "+" = [( Inc , "")]
- 33 readsPrec _ "-" = [( Dec , "")]
- 34 readsPrec _ "." = [( Output , "")]
- 35 readsPrec _ "," = [( Input , "")]
- 36 readsPrec _ _ = []
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
deleted file mode 100644
index 4b3e01063..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
+++ /dev/null
@@ -1,123 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Common.Symbol (
- 2 inc,
- 3 compare0,
- 4 def,
- 5 next,
- 6 prev,
- 7 toInteger,
- 8 fromChar,
- 9 toChar,
- 10 Symbol,
- 11 ) where
- 12
- 13 import Data.Default (Default)
- 14
- 15 import qualified Data.Default as Default
- 16 import qualified Relude.Extra as Extra
- 17
- 18 inc :: Symbol e => e -> e -> e
- 19 inc = flip (+)
- 20
- 21 compare0 :: Integer -> Ordering
- 22 compare0 = compare 0
- 23
- 24 --
- 25
- 26 def :: Symbol e => e
- 27 def = Default.def
- 28
- 29 next :: Symbol e => e -> e
- 30 next = Extra.next
- 31
- 32 prev :: Symbol e => e -> e
- 33 prev = Extra.prev
- 34
- 35 class (Bounded e , Default e , Enum e , Eq e , Integral e , Show e) => Symbol e where
- 36 -- toInteger :: e -> Integer
- 37 fromChar :: Char -> e
- 38 toChar :: e -> Char
- 39
- 40 --
- 41
- 42 instance Symbol Int where
- 43 -- toInteger = fromIntegral
- 44 fromChar = ord
- 45 toChar = chr
- 46
- 47 instance Symbol Word where
- 48 -- toInteger = fromIntegral
- 49 fromChar = fromIntegral . ord
- 50 toChar = chr . fromIntegral
- 51
- 52 instance Symbol Int8 where
- 53 -- toInteger = fromIntegral
- 54 fromChar = fromIntegral . ord
- 55 toChar = chr . normalizeMod . fromIntegral
- 56
- 57 instance Symbol Word8 where
- 58 -- toInteger = fromIntegral
- 59 fromChar = fromIntegral . ord
- 60 toChar = chr . fromIntegral
- 61
- 62 instance Symbol Int16 where
- 63 -- toInteger = fromIntegral
- 64 fromChar = fromIntegral . ord
- 65 toChar = chr . normalizeMod . fromIntegral
- 66
- 67 instance Symbol Word16 where
- 68 -- toInteger = fromIntegral
- 69 fromChar = fromIntegral . ord
- 70 toChar = chr . fromIntegral
- 71
- 72 instance Symbol Int32 where
- 73 -- toInteger = fromIntegral
- 74 fromChar = fromIntegral . ord
- 75 toChar = chr . normalizeMod . fromIntegral
- 76
- 77 instance Symbol Word32 where
- 78 -- toInteger = fromIntegral
- 79 fromChar = fromIntegral . ord
- 80 toChar = chr . fromIntegral
- 81
- 82 instance Symbol Int64 where
- 83 -- toInteger = fromIntegral
- 84 fromChar = fromIntegral . ord
- 85 toChar = chr . normalizeMod . fromIntegral
- 86
- 87 instance Symbol Word64 where
- 88 -- toInteger = fromIntegral
- 89 fromChar = fromIntegral . ord
- 90 toChar = chr . fromIntegral
- 91 --
- 92
- 93 countSymbols :: (Integral e) => e
- 94 countSymbols = 256
- 95
- 96 modifyMod :: (Integral e) => (e -> e) -> e -> e
- 97 modifyMod f i = f (i + countSymbols) `mod` countSymbols
- 98
- 99 normalizeMod :: (Integral e) => e -> e
- 100 normalizeMod = modifyMod id
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
deleted file mode 100644
index 40258d987..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
+++ /dev/null
@@ -1,165 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols (
- 2 triAndClearSymbol,
- 3
- 4 mulDupAndClearSymbol,
- 5 dupAndClearSymbol,
- 6
- 7 mulAddAndClearSymbol,
- 8 addAndClearSymbol,
- 9 subAndClearSymbol,
- 10
- 11 setSymbol,
- 12 incSymbol,
- 13 nextSymbol,
- 14 prevSymbol,
- 15 clearSymbol,
- 16 writeSymbol,
- 17
- 18 moveHead,
- 19 moveHeadRight,
- 20 moveHeadLeft,
- 21
- 22 newTape,
- 23 FullTape,
- 24 ) where
- 25
- 26 import HelVM.HelMA.Automata.BrainFuck.Common.Symbol
- 27
- 28 import Control.Monad.Extra
- 29
- 30 -- | Complex instructions
- 31
- 32 triAndClearSymbol :: (Symbol e) => Integer -> Integer -> Integer -> FullTapeD e
- 33 triAndClearSymbol f1 f2 f3 tape = tape & stepSymbol f1 & stepSymbol f2 & stepSymbol f3 & backAndClear back where
- 34 back = negate (f1 + f2 + f3)
- 35 stepSymbol = step symbol
- 36 symbol = readSymbol tape
- 37
- 38 mulDupAndClearSymbol :: (Symbol e) => Integer -> Integer -> Integer -> Integer -> FullTapeD e
- 39 mulDupAndClearSymbol m1 m2 f1 f2 tape = tape & step ms1 f1 & step ms2 f2 & backAndClear back where
- 40 back = negate (f1 + f2)
- 41 ms1 = symbol * fromIntegral m1
- 42 ms2 = symbol * fromIntegral m2
- 43 symbol = readSymbol tape
- 44
- 45 dupAndClearSymbol :: (Symbol e) => Integer -> Integer -> FullTapeD e
- 46 dupAndClearSymbol f1 f2 tape = tape & stepSymbol f1 & stepSymbol f2 & backAndClear back where
- 47 back = negate (f1 + f2)
- 48 stepSymbol = step symbol
- 49 symbol = readSymbol tape
- 50
- 51 mulAddAndClearSymbol :: (Symbol e) => Integer -> Integer -> FullTapeD e
- 52 mulAddAndClearSymbol mul forward tape = tape & step mulSymbol forward & backAndClear back where
- 53 back = negate forward
- 54 mulSymbol = symbol * fromIntegral mul
- 55 symbol = readSymbol tape
- 56
- 57 addAndClearSymbol :: (Symbol e) => Integer -> FullTapeD e
- 58 addAndClearSymbol = changeAndClearSymbol id
- 59
- 60 subAndClearSymbol :: (Symbol e) => Integer -> FullTapeD e
- 61 subAndClearSymbol = changeAndClearSymbol negate
- 62
- 63 changeAndClearSymbol :: (Symbol e) => (e -> e) -> Integer -> FullTapeD e
- 64 changeAndClearSymbol f forward tape = tape & step symbol forward & backAndClear back where
- 65 back = negate forward
- 66 symbol = f $ readSymbol tape
- 67
- 68 step :: (Symbol e) => e -> Integer -> FullTapeD e
- 69 step symbol forward = addSymbol symbol . moveHead forward
- 70
- 71 backAndClear :: (Symbol e) => Integer -> FullTapeD e
- 72 backAndClear back = clearSymbol . moveHead back
- 73
- 74 -- | Change symbols
- 75
- 76 setSymbol :: (Symbol e) => Integer -> FullTapeD e
- 77 setSymbol i = modifyCell $ const $ fromIntegral i
- 78
- 79 incSymbol :: (Symbol e) => Integer -> FullTapeD e
- 80 incSymbol i = addSymbol $ fromIntegral i
- 81
- 82 addSymbol :: (Symbol e) => e -> FullTapeD e
- 83 addSymbol e = modifyCell $ inc e
- 84
- 85 clearSymbol :: (Symbol e) => FullTapeD e
- 86 clearSymbol = modifyCell $ const def
- 87
- 88 nextSymbol :: (Symbol e) => FullTapeD e
- 89 nextSymbol = modifyCell next
- 90
- 91 prevSymbol :: (Symbol e) => FullTapeD e
- 92 prevSymbol = modifyCell prev
- 93
- 94 writeSymbol :: (Symbol e) => Char -> FullTapeD e
- 95 writeSymbol symbol = modifyCell (const $ fromChar symbol)
- 96
- 97 modifyCell :: D e -> FullTapeD e
- 98 modifyCell f (left , cell : right) = (left , f cell : right)
- 99 modifyCell _ (_ , []) = error "End of the Tape"
- 100
- 101 readSymbol :: FullTape e -> e
- 102 readSymbol (_ , cell : _) = cell
- 103 readSymbol (_ , []) = error "End of the Tape"
- 104
- 105 -- | Moves
- 106
- 107 moveHead :: (Symbol e) => Integer -> FullTapeD e
- 108 moveHead = changeTape moveHeadRight moveHeadLeft
- 109
- 110 changeTape :: FullTapeD e -> FullTapeD e -> Integer -> FullTapeD e
- 111 changeTape lf gf i t = loop atc (i , t) where
- 112 atc (i' , t') = (check . compare0) i' where
- 113 check LT = Left (i' - 1 , lf t')
- 114 check GT = Left (i' + 1 , gf t')
- 115 check EQ = Right t'
- 116
- 117 moveHeadRight :: (Symbol e) => FullTapeD e
- 118 moveHeadRight (cell : left , right) = pad (left , cell : right)
- 119 moveHeadRight ([] , _) = error "End of the Tape"
- 120
- 121 moveHeadLeft :: (Symbol e) => FullTapeD e
- 122 moveHeadLeft (left , cell : right) = pad (cell : left , right)
- 123 moveHeadLeft (_ , []) = error "End of the Tape"
- 124
- 125 pad :: (Symbol e) => FullTapeD e
- 126 pad ([] , []) = newTape
- 127 pad ([] , right) = ([def] , right)
- 128 pad (left , []) = (left , [def])
- 129 pad tape = tape
- 130
- 131 -- | Constructors
- 132
- 133 newTape :: (Symbol e) => FullTape e
- 134 newTape = ([def] , [def])
- 135
- 136 -- | Types
- 137
- 138 type D a = a -> a
- 139 type FullTape e = (HalfTape e , HalfTape e)
- 140 type FullTapeD e = D (FullTape e)
- 141
- 142 type HalfTape e = [e]
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
deleted file mode 100644
index 50e369f91..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
+++ /dev/null
@@ -1,64 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Evaluator where
- 2
- 3 import qualified HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator as Fast
- 4 import qualified HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator as Flat
- 5 import qualified HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator as Tree
- 6
- 7 import HelVM.HelMA.Automata.BrainFuck.API.BFType
- 8
- 9 import HelVM.HelMA.Automata.BrainFuck.Common.Symbol
- 10 import HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols
- 11
- 12 import HelVM.HelMA.Automaton.API.EvalParams
- 13 import HelVM.HelMA.Automaton.API.IOTypes
- 14
- 15 import HelVM.HelMA.Automaton.IO.BusinessIO
- 16
- 17 import HelVM.HelMA.Automaton.Types.CellType
- 18 import HelVM.HelMA.Automaton.Types.DumpType
- 19
- 20 simpleEval :: BIO m => (BFType , Source , CellType) -> m ()
- 21 simpleEval (c , s , t) = eval c s t Pretty --TODO Add MaybeLimit and use Loop
- 22
- 23 ----
- 24
- 25 evalParams :: BIO m => BFType -> EvalParams -> m ()
- 26 evalParams b p = eval b (source p) (cellAutoOptions p) (dumpAutoOptions p)
- 27
- 28 eval :: BIO m => BFType -> Source -> CellType -> DumpType -> m ()
- 29 eval c s Int8Type = evalSource c s (newTape :: FullTape Int8)
- 30 eval c s Word8Type = evalSource c s (newTape :: FullTape Word8)
- 31 eval c s Int16Type = evalSource c s (newTape :: FullTape Int16)
- 32 eval c s Word16Type = evalSource c s (newTape :: FullTape Word16)
- 33 eval c s Int32Type = evalSource c s (newTape :: FullTape Int32)
- 34 eval c s Word32Type = evalSource c s (newTape :: FullTape Word32)
- 35 eval c s Int64Type = evalSource c s (newTape :: FullTape Int64)
- 36 eval c s Word64Type = evalSource c s (newTape :: FullTape Word64)
- 37
- 38 evalSource :: (BIO m , Symbol e) => BFType -> Source -> FullTape e -> DumpType -> m ()
- 39 evalSource FastType = Fast.evalSource
- 40 evalSource TreeType = Tree.evalSource
- 41 evalSource FlatType = Flat.evalSource
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
deleted file mode 100644
index 6426f60db..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
+++ /dev/null
@@ -1,98 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator (
- 2 evalSource,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction
- 6
- 7 import HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser
- 8
- 9 import HelVM.HelMA.Automata.BrainFuck.Common.Symbol
- 10 import HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols
- 11
- 12 import HelVM.HelMA.Automaton.API.IOTypes
- 13 import HelVM.HelMA.Automaton.IO.BusinessIO
- 14 import HelVM.HelMA.Automaton.Types.DumpType
- 15
- 16 import HelVM.HelIO.Containers.LLIndexSafe
- 17
- 18 import Control.Type.Operator
- 19
- 20 evalSource :: (BIO m , Symbol e) => Source -> FullTape e -> DumpType -> m ()
- 21 evalSource source tape dt = logDump dt =<< flip runList tape =<< parseWithOptimize source
- 22
- 23 runList :: (BIO m , Symbol e) => FastInstructionList -> FullTape e -> m $ Memory e
- 24 runList il = nextStep (IM il 0)
- 25
- 26 nextStep :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 27 nextStep (IM iv ic) = doInstruction (iv `indexMaybe` ic) (IM iv $ ic + 1)
- 28
- 29 doInstruction :: (BIO m , Symbol e) => Maybe FastInstruction -> InstructionMemory -> FullTape e -> m $ Memory e
- 30 doInstruction (Just (Move i )) table tape = nextStep table (moveHead i tape)
- 31 doInstruction (Just (Inc i )) table tape = nextStep table (incSymbol i tape)
- 32 doInstruction (Just Output ) table tape = doOutputChar table tape
- 33 doInstruction (Just Input ) table tape = doInputChar table tape
- 34 doInstruction (Just (While iv )) table tape = doWhile iv table tape
- 35 doInstruction (Just (Set i )) table tape = nextStep table (setSymbol i tape)
- 36
- 37 doInstruction (Just (SubClr f )) table tape = nextStep table (subAndClearSymbol f tape)
- 38 doInstruction (Just (AddClr f )) table tape = nextStep table (addAndClearSymbol f tape)
- 39 doInstruction (Just (MulAddClr m f )) table tape = nextStep table (mulAddAndClearSymbol m f tape)
- 40
- 41 doInstruction (Just (DupClr f1 f2)) table tape = nextStep table (dupAndClearSymbol f1 f2 tape)
- 42 doInstruction (Just (MulDupClr m1 m2 f1 f2)) table tape = nextStep table (mulDupAndClearSymbol m1 m2 f1 f2 tape)
- 43
- 44 doInstruction (Just (TriClr i1 i2 i3)) table tape = nextStep table (triAndClearSymbol i1 i2 i3 tape)
- 45 doInstruction Nothing table tape = doEnd table tape
- 46
- 47 doWhile :: (BIO m , Symbol e) => FastInstructionList -> InstructionMemory -> FullTape e -> m $ Memory e
- 48 doWhile _ table tape@(_ , 0:_) = nextStep table tape
- 49 doWhile iv table tape = doWhileWithTape =<< runList iv tape where
- 50 doWhileWithTape :: (BIO m , Symbol e) => Memory e -> m $ Memory e
- 51 doWhileWithTape = doWhile iv table . memoryTape
- 52
- 53 -- | IO instructions
- 54 doOutputChar :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 55 doOutputChar _ (_ , []) = error "Illegal State"
- 56 doOutputChar table tape@(_ , e:_) = wPutChar (toChar e) *> nextStep table tape
- 57
- 58 doInputChar :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 59 doInputChar table tape = (nextStep table . flip writeSymbol tape) =<< wGetChar
- 60
- 61 -- | Terminate instruction
- 62 doEnd :: BIO m => InstructionMemory -> FullTape e -> m $ Memory e
- 63 doEnd iu tape = pure $ Memory iu tape
- 64
- 65 -- | Types
- 66 data Memory e = Memory
- 67 { memoryIM :: InstructionMemory
- 68 , memoryTape :: FullTape e
- 69 }
- 70 deriving stock (Eq , Show)
- 71
- 72 data InstructionMemory = IM !FastInstructionList !InstructionCounter
- 73 deriving stock (Eq , Show)
- 74
- 75 type InstructionCounter = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
deleted file mode 100644
index b73adc623..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
+++ /dev/null
@@ -1,41 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction where
- 2
- 3 data FastInstruction =
- 4 Move Integer
- 5 | Inc Integer
- 6 | Output
- 7 | Input
- 8 | While FastInstructionList
- 9 | Set Integer
- 10 | SubClr Integer
- 11 | AddClr Integer
- 12 | MulAddClr Integer Integer
- 13 | DupClr Integer Integer
- 14 | MulDupClr Integer Integer Integer Integer
- 15 | TriClr Integer Integer Integer
- 16 deriving stock (Eq , Read , Show)
- 17
- 18 type FastInstructionList = [FastInstruction]
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
deleted file mode 100644
index 90d386727..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
+++ /dev/null
@@ -1,71 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer (
- 2 optimize,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction
- 6
- 7 optimize :: FastInstructionList -> FastInstructionList
- 8 optimize (Move s1 : Move s2 : il) = optimize (Move (s1 + s2) : il)
- 9 optimize (Inc s1 : Inc s2 : il) = optimize (Inc (s1 + s2) : il)
- 10 optimize ((While [Inc (-1)]) : il) = buildClear il
- 11 optimize ((While [Inc 1 ]) : il) = buildClear il
- 12 optimize ((While il') : il) = buildWhile (optimize il') : optimize il
- 13 optimize (i : il) = i : optimize il
- 14 optimize [] = []
- 15
- 16 buildClear :: FastInstructionList -> FastInstructionList
- 17 buildClear = optimizeSet . optimize
- 18
- 19 optimizeSet :: FastInstructionList -> FastInstructionList
- 20 optimizeSet (Inc s : il) = Set s : il
- 21 optimizeSet il = Set 0 : il
- 22
- 23 buildWhile :: FastInstructionList -> FastInstruction
- 24 buildWhile [Move forward , Inc mul , Move back , Inc (-1)] = buildAdd back forward mul
- 25 buildWhile [Inc (-1) , Move forward , Inc mul , Move back] = buildAdd back forward mul
- 26 buildWhile [Move f1 , Inc m1 , Move f2 , Inc m2 , Move back , Inc (-1)] = buildDup back f1 f2 m1 m2
- 27 buildWhile [Inc (-1) , Move f1 , Inc m1 , Move f2 , Inc m2 , Move back] = buildDup back f1 f2 m1 m2
- 28 buildWhile [Move f1 , Inc 1 , Move f2 , Inc 1 , Move f3 , Inc 1 , Move back , Inc (-1)] = buildTri back f1 f2 f3
- 29 buildWhile [Inc (-1) , Move f1 , Inc 1 , Move f2 , Inc 1 , Move f3 , Inc 1 , Move back] = buildTri back f1 f2 f3
- 30 buildWhile il = While il
- 31
- 32 buildAdd :: Integer -> Integer -> Integer -> FastInstruction
- 33 buildAdd back forward = build (negate back == forward) where
- 34 build True (-1) = SubClr forward
- 35 build True 1 = AddClr forward
- 36 build True mul = MulAddClr mul forward
- 37 build False mul = While [Move forward , Inc mul , Move back , Inc (-1)]
- 38
- 39 buildDup :: Integer -> Integer -> Integer -> Integer -> Integer -> FastInstruction
- 40 buildDup back f1 f2 = build (negate back == f1 + f2) where
- 41 build True 1 1 = DupClr f1 f2
- 42 build True m1 m2 = MulDupClr m1 m2 f1 f2
- 43 build False m1 m2 = While [Move f1 , Inc m1 , Move f2 , Inc m2 , Move back , Inc (-1)]
- 44
- 45 buildTri :: Integer -> Integer -> Integer -> Integer -> FastInstruction
- 46 buildTri back f1 f2 f3
- 47 | f1 + f2 + f3 == negate back = TriClr f1 f2 f3
- 48 | otherwise = While [Move f1 , Inc 1 , Move f2 , Inc 1 , Move f3 , Inc 1 , Move back , Inc (-1)]
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
deleted file mode 100644
index c5a9e4017..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
+++ /dev/null
@@ -1,105 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser (
- 2 parseWithOptimizeSafe,
- 3 parseAsListSafe,
- 4 parseWithOptimize,
- 5 parseAsList,
- 6 ) where
- 7
- 8 import HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction
- 9 import HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer
- 10
- 11 import qualified HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction as Simple
- 12
- 13 import HelVM.HelMA.Automaton.API.IOTypes
- 14 import HelVM.HelMA.Automaton.ReadPExtra
- 15
- 16 import HelVM.HelIO.Control.Safe
- 17
- 18 import Control.Applicative.Tools
- 19
- 20 import qualified Data.Text as Text
- 21
- 22 import Text.ParserCombinators.ReadP hiding (many)
- 23
- 24 parseWithOptimizeSafe :: Source -> Safe FastInstructionList
- 25 parseWithOptimizeSafe = parseWithOptimize
- 26
- 27 parseAsListSafe :: Source -> Safe FastInstructionList
- 28 parseAsListSafe = parseAsList
- 29
- 30 parseWithOptimize :: MonadSafe m => Source -> m FastInstructionList
- 31 parseWithOptimize = optimize <.> parseAsList
- 32
- 33 parseAsList :: MonadSafe m => Source -> m FastInstructionList
- 34 parseAsList = runParser parameterizedInstructionsParser . filterComments
- 35
- 36 parameterizedInstructionsParser :: ReadP FastInstructionList
- 37 parameterizedInstructionsParser = many1 parameterizedInstructionParser
- 38
- 39 parameterizedInstructionParser :: ReadP FastInstruction
- 40 parameterizedInstructionParser =
- 41 moveRParser <|> moveLParser
- 42 <|> incParser <|> decParser
- 43 <|> outParser <|> inParser
- 44 <|> whileParser
- 45
- 46 moveRParser :: ReadP FastInstruction
- 47 moveRParser = Move 1 <$ char '>'
- 48
- 49 moveLParser :: ReadP FastInstruction
- 50 moveLParser = Move negate1 <$ char '<'
- 51
- 52 incParser :: ReadP FastInstruction
- 53 incParser = Inc 1 <$ char '+'
- 54
- 55 decParser :: ReadP FastInstruction
- 56 decParser = Inc negate1 <$ char '-'
- 57
- 58 outParser :: ReadP FastInstruction
- 59 outParser = Output <$ char '.'
- 60
- 61 inParser :: ReadP FastInstruction
- 62 inParser = Input <$ char ','
- 63
- 64 whileParser :: ReadP FastInstruction
- 65 whileParser = While <$> (char '[' *> parameterizedInstructionsParser <* char ']')
- 66
- 67 filterComments :: Source -> Source
- 68 filterComments = Text.filter isNotComment
- 69
- 70 isNotComment :: Char -> Bool
- 71 isNotComment c = c `elem` allInstructionChars
- 72
- 73 allInstructionChars :: String
- 74 allInstructionChars = "[]" <> simpleInstructionChars
- 75
- 76 simpleInstructionChars :: String
- 77 simpleInstructionChars = show =<< Simple.simpleInstructions
- 78
- 79 --
- 80
- 81 negate1 :: Integer
- 82 negate1 = negate 1
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
deleted file mode 100644
index 9da8b9429..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
+++ /dev/null
@@ -1,81 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator(
- 2 evalSource,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction
- 6 import HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser
- 7 import HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions
- 8
- 9 import HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction
- 10 import HelVM.HelMA.Automata.BrainFuck.Common.Symbol
- 11 import HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols
- 12
- 13 import HelVM.HelMA.Automaton.API.IOTypes
- 14 import HelVM.HelMA.Automaton.IO.BusinessIO
- 15 import HelVM.HelMA.Automaton.Types.DumpType
- 16
- 17 import Control.Type.Operator
- 18
- 19 evalSource :: (BIO m , Symbol e) => Source -> FullTape e -> DumpType -> m ()
- 20 evalSource source tape dt = logDump dt =<< doInstruction ([] , tokenize source) tape
- 21
- 22 doInstruction :: (BIO m , Symbol e) => Table -> FullTape e -> m $ Memory e
- 23 doInstruction table@(_ , Simple MoveR : _) tape = doInstruction (nextInst table) (moveHeadRight tape)
- 24 doInstruction table@(_ , Simple MoveL : _) tape = doInstruction (nextInst table) (moveHeadLeft tape)
- 25 doInstruction table@(_ , Simple Inc : _) tape = doInstruction (nextInst table) (nextSymbol tape)
- 26 doInstruction table@(_ , Simple Dec : _) tape = doInstruction (nextInst table) (prevSymbol tape)
- 27 doInstruction table@(_ , Simple Output : _) tape = doOutputChar table tape
- 28 doInstruction table@(_ , Simple Input : _) tape = doInputChar table tape
- 29 doInstruction table@(_ , JmpPast : _) tape = doJmpPast table tape
- 30 doInstruction table@(_ , JmpBack : _) tape = doJmpBack table tape
- 31 doInstruction table@(_ , [] ) tape = doEnd table tape
- 32
- 33 doJmpPast :: (BIO m , Symbol e) => Table -> FullTape e -> m $ Memory e
- 34 doJmpPast table tape@(_ , 0 : _) = doInstruction (jumpPast table) tape
- 35 doJmpPast table tape = doInstruction (nextInst table) tape
- 36
- 37 doJmpBack :: (BIO m , Symbol e) => Table -> FullTape e -> m $ Memory e
- 38 doJmpBack table tape@(_ , 0 : _) = doInstruction (nextInst table) tape
- 39 doJmpBack table tape = doInstruction (jumpBack table) tape
- 40
- 41 -- | IO instructions
- 42 doOutputChar :: (BIO m , Symbol e) => Table -> FullTape e -> m $ Memory e
- 43 doOutputChar _ (_ , []) = error "Illegal State"
- 44 doOutputChar table tape@(_ , e : _) = wPutChar (toChar e) *> doInstruction (nextInst table) tape
- 45
- 46 doInputChar :: (BIO m , Symbol e) => Table -> FullTape e -> m $ Memory e
- 47 doInputChar table tape = (doInstruction (nextInst table) . flip writeSymbol tape) =<< wGetChar
- 48
- 49 -- | Terminate instruction
- 50 doEnd :: BIO m => Table -> FullTape e -> m $ Memory e
- 51 doEnd table tape = pure $ Memory table tape
- 52
- 53 -- | Types
- 54 data Memory e = Memory
- 55 { memoryTable :: Table
- 56 , memoryTape :: FullTape e
- 57 }
- 58 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
deleted file mode 100644
index 5f38cc523..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
+++ /dev/null
@@ -1,54 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction where
- 2
- 3 import HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction
- 4
- 5 import Text.Read
- 6
- 7 import qualified Text.Show
- 8
- 9 data FlatInstruction =
- 10 Simple SimpleInstruction
- 11 | JmpPast
- 12 | JmpBack
- 13 deriving stock (Eq)
- 14
- 15 type FlatTreeInstructionList = [FlatInstruction]
- 16
- 17 instance Show FlatInstruction where
- 18 show (Simple i) = show i
- 19 show JmpPast = "["
- 20 show JmpBack = "]"
- 21
- 22 instance Read FlatInstruction where
- 23 readsPrec _ ">" = [( Simple MoveR , "")]
- 24 readsPrec _ "<" = [( Simple MoveL , "")]
- 25 readsPrec _ "+" = [( Simple Inc , "")]
- 26 readsPrec _ "-" = [( Simple Dec , "")]
- 27 readsPrec _ "." = [( Simple Output , "")]
- 28 readsPrec _ "," = [( Simple Input , "")]
- 29 readsPrec _ "[" = [( JmpPast , "")]
- 30 readsPrec _ "]" = [( JmpBack , "")]
- 31 readsPrec _ _ = []
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
deleted file mode 100644
index 9d9760fb2..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
+++ /dev/null
@@ -1,40 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser where
- 2
- 3 import HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction
- 4
- 5 import HelVM.HelMA.Automaton.API.IOTypes
- 6 import HelVM.HelMA.Automaton.WrapTokenList
- 7
- 8 import HelVM.HelIO.ReadText
- 9
- 10 -- | Parser
- 11 tokenize :: Source -> FlatTreeInstructionList
- 12 tokenize = unWrapTokenList . readTokens
- 13
- 14 readTokens :: Source -> Tokens
- 15 readTokens source = readTextUnsafe source :: Tokens
- 16
- 17 type Tokens = WrapTokenList FlatTreeInstructionList
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
deleted file mode 100644
index 51d637bfe..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
+++ /dev/null
@@ -1,58 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions where
- 2
- 3 import HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction
- 4
- 5 type HalfTable = FlatTreeInstructionList
- 6 type Table = (HalfTable , HalfTable)
- 7 type TableD = Table -> Table
- 8
- 9 currentInstruction :: ([a], [a]) -> Maybe a
- 10 currentInstruction (_ , i : _) = Just i
- 11 currentInstruction (_ , []) = Nothing
- 12
- 13 prevInst :: TableD
- 14 prevInst (inst : prev , next) = (prev , inst : next)
- 15 prevInst ([] , _) = error "End of the table"
- 16
- 17 nextInst :: TableD
- 18 nextInst (prev , inst : next) = (inst : prev , next)
- 19 nextInst (_ , []) = error "End of the table"
- 20
- 21 matchPrevJmp :: TableD
- 22 matchPrevJmp table@(JmpPast : _ , _) = table
- 23 matchPrevJmp table@(JmpBack : _ , _) = (matchPrevJmp . prevInst . jumpBack) table
- 24 matchPrevJmp table = jumpBack table
- 25
- 26 matchNextJmp :: TableD
- 27 matchNextJmp table@(_ , JmpBack : _) = nextInst table
- 28 matchNextJmp table@(_ , JmpPast : _) = (matchNextJmp . jumpPast) table
- 29 matchNextJmp table = jumpPast table
- 30
- 31 jumpPast :: TableD
- 32 jumpPast = matchNextJmp . nextInst
- 33
- 34 jumpBack :: TableD
- 35 jumpBack = matchPrevJmp . prevInst
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
deleted file mode 100644
index 13fbbae98..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
+++ /dev/null
@@ -1,90 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator (
- 2 evalSource,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction
- 6 import HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser
- 7
- 8 import HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction
- 9 import HelVM.HelMA.Automata.BrainFuck.Common.Symbol
- 10 import HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols
- 11
- 12 import HelVM.HelMA.Automaton.API.IOTypes
- 13 import HelVM.HelMA.Automaton.IO.BusinessIO
- 14 import HelVM.HelMA.Automaton.Types.DumpType
- 15
- 16 import HelVM.HelIO.Containers.LLIndexSafe
- 17
- 18 import Control.Type.Operator
- 19
- 20 evalSource :: (BIO m , Symbol e) => Source -> FullTape e -> DumpType -> m ()
- 21 evalSource source tape dt = logDump dt =<< flip runVector tape =<< parseAsVector source
- 22
- 23 runVector :: (BIO m , Symbol e) => TreeInstructionVector -> FullTape e -> m $ Memory e
- 24 runVector iv = nextStep (IM iv 0)
- 25
- 26 nextStep :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 27 nextStep (IM iv ic) = doInstruction (iv `indexMaybe` ic) (IM iv $ ic + 1)
- 28
- 29 doInstruction :: (BIO m , Symbol e) => Maybe TreeInstruction -> InstructionMemory -> FullTape e -> m $ Memory e
- 30 doInstruction (Just (Simple MoveR )) table tape = nextStep table (moveHeadRight tape)
- 31 doInstruction (Just (Simple MoveL )) table tape = nextStep table (moveHeadLeft tape)
- 32 doInstruction (Just (Simple Inc )) table tape = nextStep table (nextSymbol tape)
- 33 doInstruction (Just (Simple Dec )) table tape = nextStep table (prevSymbol tape)
- 34 doInstruction (Just (Simple Output )) table tape = doOutputChar table tape
- 35 doInstruction (Just (Simple Input )) table tape = doInputChar table tape
- 36 doInstruction (Just (While iv )) table tape = doWhile iv table tape
- 37 doInstruction Nothing table tape = doEnd table tape
- 38
- 39 doWhile :: (BIO m , Symbol e) => TreeInstructionVector -> InstructionMemory -> FullTape e -> m $ Memory e
- 40 doWhile _ table tape@(_ , 0:_) = nextStep table tape
- 41 doWhile iv table tape = doWhileWithTape =<< runVector iv tape where
- 42 doWhileWithTape :: (BIO m , Symbol e) => Memory e -> m $ Memory e
- 43 doWhileWithTape = doWhile iv table . memoryTape
- 44
- 45 -- | IO instructions
- 46 doOutputChar :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 47 doOutputChar _ (_ , []) = error "Illegal State"
- 48 doOutputChar table tape@(_ , e:_) = wPutChar (toChar e) *> nextStep table tape
- 49
- 50 doInputChar :: (BIO m , Symbol e) => InstructionMemory -> FullTape e -> m $ Memory e
- 51 doInputChar table tape = (nextStep table . flip writeSymbol tape) =<< wGetChar
- 52
- 53 -- | Terminate instruction
- 54 doEnd :: BIO m => InstructionMemory -> FullTape e -> m $ Memory e
- 55 doEnd im tape = pure $ Memory im tape
- 56
- 57 -- | Types
- 58 data Memory e = Memory
- 59 { memoryIM :: InstructionMemory
- 60 , memoryTape :: FullTape e
- 61 }
- 62 deriving stock (Eq , Show)
- 63
- 64 data InstructionMemory = IM !TreeInstructionVector !InstructionCounter
- 65 deriving stock (Eq , Show)
- 66
- 67 type InstructionCounter = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
deleted file mode 100644
index f1c147c8e..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
+++ /dev/null
@@ -1,38 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction where
- 2
- 3 import HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction
- 4
- 5 import Data.DList
- 6 import Data.Vector
- 7
- 8 data TreeInstruction =
- 9 Simple SimpleInstruction
- 10 | While !TreeInstructionVector
- 11 deriving stock (Eq , Read , Show)
- 12
- 13 type TreeInstructionList = [TreeInstruction]
- 14 type TreeInstructionDList = DList TreeInstruction
- 15 type TreeInstructionVector = Vector TreeInstruction
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
deleted file mode 100644
index cbff8d65a..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
+++ /dev/null
@@ -1,72 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser (
- 2 parseAsVectorSafe,
- 3 parseAsVector,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction as Tree
- 7
- 8 import HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction
- 9
- 10 import HelVM.HelMA.Automaton.API.IOTypes
- 11 import HelVM.HelMA.Automaton.ReadPExtra
- 12
- 13 import HelVM.HelIO.Control.Safe
- 14 import HelVM.HelIO.Extra hiding (runParser)
- 15
- 16 import qualified Data.Text as Text
- 17 import qualified Data.Vector as Vector
- 18
- 19 import Text.ParserCombinators.ReadP hiding (many)
- 20
- 21 parseAsVectorSafe :: Source -> Safe TreeInstructionVector
- 22 parseAsVectorSafe = parseAsVector
- 23
- 24 parseAsVector :: MonadSafe m => Source -> m TreeInstructionVector
- 25 parseAsVector = runParser treeInstructionsParser . filterComments
- 26
- 27 treeInstructionsParser :: ReadP TreeInstructionVector
- 28 treeInstructionsParser = Vector.fromList <$> many treeInstructionParser
- 29
- 30 treeInstructionParser :: ReadP TreeInstruction
- 31 treeInstructionParser = simpleParser <|> whileParser
- 32
- 33 whileParser :: ReadP TreeInstruction
- 34 whileParser = Tree.While <$> (char '[' *> treeInstructionsParser <* char ']')
- 35
- 36 simpleParser :: ReadP TreeInstruction
- 37 simpleParser = Simple . fromJustWithText "imposible" . charToSimpleInstruction <$> oneOf simpleInstructionChars
- 38
- 39 filterComments :: Source -> Source
- 40 filterComments = Text.filter isNotComment
- 41
- 42 isNotComment :: Char -> Bool
- 43 isNotComment c = c `elem` allInstructionChars
- 44
- 45 allInstructionChars :: String
- 46 allInstructionChars = "[]" <> simpleInstructionChars
- 47
- 48 simpleInstructionChars :: String
- 49 simpleInstructionChars = show =<< simpleInstructions
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
deleted file mode 100644
index 3bb70e191..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Cat.Evaluator (
- 2 evalParams,
- 3 eval
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automaton.API.EvalParams
- 7 import HelVM.HelMA.Automaton.API.IOTypes
- 8 import HelVM.HelMA.Automaton.IO.BusinessIO
- 9
- 10 evalParams :: BIO m => EvalParams -> m ()
- 11 evalParams = eval . source
- 12
- 13 eval :: BusinessIO m => Source -> m ()
- 14 eval = wPutStr
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
deleted file mode 100644
index 3bebcfe93..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.API.ETAImplType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultETAImplType :: ETAImplType
- 7 defaultETAImplType = defaultEnum
- 8
- 9 etaImplTypes:: [ETAImplType]
- 10 etaImplTypes = generateEnums 2
- 11
- 12 -- | Type
- 13 data ETAImplType = Fast | Original
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
deleted file mode 100644
index 17e805bdf..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
+++ /dev/null
@@ -1,59 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Addressing (
- 2 genericFindAddress,
- 3 findAddress,
- 4 genericNextLabel,
- 5 nextLabel
- 6 ) where
- 7
- 8 import HelVM.HelMA.Automata.ETA.Symbol
- 9 import HelVM.HelMA.Automata.ETA.Token
- 10
- 11 import HelVM.HelIO.Containers.LLIndexSafe
- 12
- 13 import HelVM.HelIO.Control.Safe
- 14
- 15 import Data.ListLike hiding (show)
- 16
- 17 import Prelude hiding (length, splitAt)
- 18
- 19 import qualified Data.Vector as Vector
- 20
- 21 ----
- 22
- 23 genericFindAddress :: (MonadSafe m , Integral cell) => Vector.Vector Token -> cell -> m InstructionAddress
- 24 genericFindAddress il = findAddress il . fromIntegral
- 25
- 26 findAddress :: MonadSafe m => Vector.Vector Token -> Int -> m InstructionAddress
- 27 findAddress _ 1 = pure 0
- 28 findAddress il address = appendErrorTupleList [("il" , show il) , ("address" , show address)] ((+1) <$> indexSafe (Vector.elemIndices R il) (address-2))
- 29
- 30 ----
- 31
- 32 genericNextLabel :: Integral cell => Vector.Vector Token -> InstructionAddress -> cell
- 33 genericNextLabel il = fromIntegral . nextLabel il
- 34
- 35 nextLabel :: Vector.Vector Token -> InstructionAddress -> Int
- 36 nextLabel il ic = length (Vector.elemIndices R il') + 2 where (il' , _) = splitAt ic il
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
deleted file mode 100644
index db051c6fc..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
+++ /dev/null
@@ -1,41 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Lexer where
- 2
- 3 import HelVM.HelMA.Automata.ETA.Token
- 4
- 5 import HelVM.HelIO.Extra
- 6 import HelVM.HelIO.ReadText
- 7 import HelVM.HelMA.Automaton.API.IOTypes
- 8 import HelVM.HelMA.Automaton.WrapTokenList
- 9
- 10 -- | Lexer
- 11 tokenize :: Source -> TokenList
- 12 tokenize = whiteTokenListToTokenList . unWrapTokenList . readTokens
- 13
- 14 readTokens :: Source -> WhiteTokens
- 15 readTokens source = (readTextUnsafe . toUppers) source :: WhiteTokens
- 16
- 17 -- | Types
- 18 type WhiteTokens = WrapTokenList WhiteTokenList
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
deleted file mode 100644
index 9181df955..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
+++ /dev/null
@@ -1,76 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.OperandParsers where
- 2
- 3 import HelVM.HelMA.Automata.ETA.Symbol
- 4 import HelVM.HelMA.Automata.ETA.Token
- 5
- 6 import HelVM.HelIO.Containers.LLIndexSafe
- 7 import HelVM.HelIO.Control.Safe
- 8 import HelVM.HelIO.Digit.ToDigit
- 9
- 10 import Control.Monad.Extra
- 11
- 12 import qualified Data.Vector as Vector
- 13
- 14 parseNumberFromTLL :: (MonadSafe m , Integral a) => (TokenList, [TokenList]) -> m (a , (TokenList, [TokenList]))
- 15 parseNumberFromTLL a = loop act ([] , a) where
- 16 act (acc , (E : tl , tll)) = Right $ ( , (tl , tll)) <$> makeIntegral7FromList acc
- 17 act (acc , (R : tl , tll)) = Left ( acc , (tl , tll))
- 18 act (acc , (t : tl , tll)) = Left (t : acc , (tl , tll))
- 19 act (acc , ([] , tl : tll)) = Left ( acc , (tl , tll))
- 20 act (acc , ([] , [])) = Right $ ( , ([] , [])) <$> makeIntegral7FromList acc
- 21
- 22 parseNumberFromTL :: (MonadSafe m , Integral a) => OperandParser m a
- 23 parseNumberFromTL a = loop act ([] , a) where
- 24 act (acc , E : tl) = Right $ ( , tl) <$> makeIntegral7FromList acc
- 25 act (acc , R : tl) = Left ( acc , tl)
- 26 act (acc , t : tl) = Left (t : acc , tl)
- 27 act (acc , []) = Right (liftError $ show acc)
- 28
- 29 parseNumber :: (MonadSafe m , Integral a) => OperandIMParser m a
- 30 parseNumber iu = loopM act =<< (([] , ) <$> nextIM iu) where
- 31 act (acc , (Nothing , iu')) = Right . ( , iu') <$> makeIntegral7FromList acc
- 32 act (acc , (Just E , iu')) = Right . ( , iu') <$> makeIntegral7FromList acc
- 33 act (acc , (Just R , iu')) = Left . ( acc , ) <$> nextIM iu'
- 34 act (acc , (Just t , iu')) = Left . (t : acc , ) <$> nextIM iu'
- 35
- 36 nextIM :: MonadSafe m => OperandIMParser m (Maybe Token)
- 37 nextIM iu@(IM il ic)
- 38 | ic < Vector.length il = wrap <$> indexSafe il ic
- 39 | otherwise = pure (Nothing , iu)
- 40 where wrap i = (Just i, IM il (ic+1))
- 41
- 42 updatePC :: InstructionMemory -> InstructionCounter -> InstructionMemory
- 43 updatePC iu a = iu { programCounter = a }
- 44
- 45 -- | Types
- 46 type OperandParser m a = TokenList -> m (a , TokenList)
- 47
- 48 data InstructionMemory = IM
- 49 { program :: !TokenVector
- 50 , programCounter :: !InstructionCounter
- 51 } deriving stock (Eq , Read , Show)
- 52
- 53 type OperandIMParser m a = InstructionMemory -> m (a , InstructionMemory)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
deleted file mode 100644
index 1c766fb19..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
+++ /dev/null
@@ -1,41 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Parser (
- 2 parseSafe,
- 3 parse,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.ETA.Lexer
- 7 import HelVM.HelMA.Automata.ETA.Optimizer
- 8
- 9 import HelVM.HelMA.Automaton.API.IOTypes
- 10 import HelVM.HelMA.Automaton.Instruction
- 11
- 12 import HelVM.HelIO.Control.Safe
- 13
- 14 parseSafe :: Source -> Safe InstructionList
- 15 parseSafe = parse
- 16
- 17 parse :: MonadSafe m => Source -> m InstructionList
- 18 parse = optimize . tokenize
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
deleted file mode 100644
index 868f93a49..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
+++ /dev/null
@@ -1,47 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.SimpleParams where
- 2
- 3 import HelVM.HelMA.Automata.ETA.API.ETAImplType
- 4
- 5 import HelVM.HelMA.Automaton.API.AutoOptions
- 6 import HelVM.HelMA.Automaton.API.IOTypes
- 7
- 8 import HelVM.HelMA.Automaton.Types.StackType
- 9
- 10 simpleParams :: ETAImplType -> StackType -> Bool -> Source -> SimpleParams
- 11 simpleParams it st c s = SimpleParams
- 12 { implType = it
- 13 , source = s
- 14 , stackType = st
- 15 , autoOptions = simpleAutoParams c
- 16 }
- 17
- 18 -- | Type
- 19 data SimpleParams = SimpleParams
- 20 { implType :: !ETAImplType
- 21 , source :: !Source
- 22 , stackType :: !StackType
- 23 , autoOptions :: !AutoOptions
- 24 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
deleted file mode 100644
index b73b3b4c0..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
+++ /dev/null
@@ -1,78 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.ETA.Token where
- 2
- 3 import HelVM.HelIO.Control.Safe
- 4 import HelVM.HelIO.Digit.ToDigit
- 5
- 6 import Data.Vector as Vector
- 7
- 8 import qualified Text.Read
- 9 import qualified Text.Show
- 10
- 11 data Token = E | T | A | O | I | N | S | H | R
- 12 deriving stock (Bounded , Enum , Eq , Read , Show)
- 13
- 14 type TokenList = [Token]
- 15 type TokenVector = Vector Token
- 16
- 17 instance ToDigit Token where
- 18 toDigit H = pure 0
- 19 toDigit T = pure 1
- 20 toDigit A = pure 2
- 21 toDigit O = pure 3
- 22 toDigit I = pure 4
- 23 toDigit N = pure 5
- 24 toDigit S = pure 6
- 25 toDigit t = liftErrorWithPrefix "Wrong token" $ show t
- 26
- 27 ----
- 28
- 29 newtype WhiteToken = WhiteToken { unWhiteToken :: Token}
- 30 deriving stock (Eq)
- 31
- 32 type WhiteTokenList = [WhiteToken]
- 33
- 34 instance Show WhiteToken where
- 35 show (WhiteToken R) = "\n"
- 36 show (WhiteToken t) = show t
- 37
- 38 -- | Scanner
- 39 instance Read WhiteToken where
- 40 readsPrec _ "\n" = [( WhiteToken R , "")]
- 41 readsPrec _ "E" = [( WhiteToken E , "")]
- 42 readsPrec _ "T" = [( WhiteToken T , "")]
- 43 readsPrec _ "A" = [( WhiteToken A , "")]
- 44 readsPrec _ "O" = [( WhiteToken O , "")]
- 45 readsPrec _ "I" = [( WhiteToken I , "")]
- 46 readsPrec _ "N" = [( WhiteToken N , "")]
- 47 readsPrec _ "S" = [( WhiteToken S , "")]
- 48 readsPrec _ "H" = [( WhiteToken H , "")]
- 49 readsPrec _ _ = []
- 50
- 51 tokenToWhiteTokenPair :: Token -> (WhiteToken , String)
- 52 tokenToWhiteTokenPair t = (WhiteToken t , "")
- 53
- 54 whiteTokenListToTokenList :: WhiteTokenList -> TokenList
- 55 whiteTokenListToTokenList = fmap unWhiteToken
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
deleted file mode 100644
index ec5ab4012..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
+++ /dev/null
@@ -1,41 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.FALSE.Expression where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction
- 4
- 5 type ExpressionList = [Expression]
- 6 data Expression =
- 7 Inst Instruction
- 8 | Lambda ExpressionList
- 9 | Exec
- 10 | Cond
- 11 | While
- 12 | Ref Natural
- 13 | Store
- 14 | Fetch
- 15 | Str String
- 16 | Comment String
- 17 | Flush
- 18 deriving stock (Eq , Show , Read)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
deleted file mode 100644
index aab062ba0..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
+++ /dev/null
@@ -1,62 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Automaton (
- 2 run,
- 3 runWithTerminator,
- 4 realize,
- 5 realizeWithTrue,
- 6 ) where
- 7
- 8 import HelVM.HelMA.Automata.LazyK.Constants
- 9 import HelVM.HelMA.Automata.LazyK.Lambda
- 10 import HelVM.HelMA.Automata.LazyK.Reducer
- 11
- 12 import HelVM.HelMA.Automaton.IO.BusinessIO
- 13
- 14 import HelVM.HelIO.Control.Safe
- 15
- 16 run :: BIO m => Lambda -> m ()
- 17 run = runWithTerminator false
- 18
- 19 runWithTerminator :: BIO m => Lambda -> Lambda -> m ()
- 20 runWithTerminator terminator lambda = output terminator lambda =<< realizeWithTrue lambda
- 21
- 22 realizeWithTrue :: MonadSafe m => Lambda -> m Natural
- 23 realizeWithTrue = realize . flippedApply true
- 24
- 25 realize :: MonadSafe m => Lambda -> m Natural
- 26 realize = naturalSafe . flippedApply number0 . flippedApply Succ
- 27
- 28 number0 :: Lambda
- 29 number0 = Number 0
- 30
- 31 naturalSafe :: MonadSafe m => Lambda -> m Natural
- 32 naturalSafe (Number x) = pure x
- 33 naturalSafe x = liftErrorWithPrefix "Invalid output format. Output should be the list of Church numerals. " $ show x
- 34
- 35 output :: BIO m => Lambda -> Lambda -> Natural -> m ()
- 36 output terminator lambda number = check $ compare 256 number where
- 37 check GT = wPutAsChar number *> runWithTerminator terminator (apply lambda terminator)
- 38 check EQ = pass
- 39 check LT = wLogStr (show number) *> wLogStr (show lambda)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
deleted file mode 100644
index f50d577ca..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
+++ /dev/null
@@ -1,50 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Constants where
- 2
- 3 import HelVM.HelMA.Automata.LazyK.Lambda
- 4
- 5 bCombinator :: Lambda
- 6 bCombinator = app3 S appKS K
- 7
- 8 appSelfApp :: Lambda -> Lambda
- 9 appSelfApp = app4 S I I
- 10
- 11 selfApp :: Lambda
- 12 selfApp = app3 S I I
- 13
- 14 app3SI :: Lambda -> Lambda
- 15 app3SI = app3 S I
- 16
- 17 appKS :: Lambda
- 18 appKS = App K S
- 19
- 20 appK :: Lambda -> Lambda
- 21 appK = App K
- 22
- 23 false :: Lambda
- 24 false = App K I
- 25
- 26 true :: Lambda
- 27 true = K
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
deleted file mode 100644
index 09b52e1e0..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
+++ /dev/null
@@ -1,52 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Evaluator (
- 2 evalParams,
- 3 evalSource,
- 4 reduceSource,
- 5 ) where
- 6
- 7 import HelVM.HelMA.Automata.LazyK.Automaton
- 8 import HelVM.HelMA.Automata.LazyK.InputEncoder
- 9 import HelVM.HelMA.Automata.LazyK.Lambda
- 10 import HelVM.HelMA.Automata.LazyK.Parser
- 11
- 12 import HelVM.HelMA.Automata.LazyK.Reducer
- 13
- 14 import HelVM.HelMA.Automaton.API.EvalParams
- 15 import HelVM.HelMA.Automaton.API.IOTypes
- 16
- 17 import HelVM.HelMA.Automaton.IO.BusinessIO
- 18
- 19 evalParams :: BIO m => EvalParams -> m ()
- 20 evalParams = evalSource . source
- 21
- 22 evalSource :: BIO m => Source -> m ()
- 23 evalSource = evalLambda <=< parse
- 24
- 25 evalLambda :: BIO m => Lambda -> m ()
- 26 evalLambda lambda = (run . reduce . App lambda . readInput) =<< wGetContentsBS
- 27
- 28 reduceSource :: BIO m => Source -> m Source
- 29 reduceSource s = show . reduce <$> parse s
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
deleted file mode 100644
index 70cf3f904..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
+++ /dev/null
@@ -1,67 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.InputEncoder where
- 2
- 3 import HelVM.HelMA.Automata.LazyK.Constants
- 4 import HelVM.HelMA.Automata.LazyK.Lambda
- 5
- 6 import qualified Data.ByteString.Lazy as LBS
- 7
- 8 -- | Constructors
- 9 readInput :: LBS.ByteString -> Lambda
- 10 readInput = encodeInput . fmap fromIntegral . LBS.unpack
- 11
- 12 encodeInput :: [Natural] -> Lambda
- 13 encodeInput = foldr (cons . church) end
- 14
- 15 -- | Other
- 16 end :: Lambda
- 17 end = cons (church 256) false
- 18
- 19 cons :: Lambda -> Lambda -> Lambda
- 20 cons a b = app3 S (app3SI (appK a)) (appK b)
- 21
- 22 church :: Natural -> Lambda
- 23 church 0 = false
- 24 church 1 = I
- 25 church 4 = appSelfApp $ church 2
- 26 church 8 = church 3 `App` church 2
- 27 church 9 = church 2 `App` church 3
- 28 church 16 = church 2 `App` church 4
- 29 church 25 = church 2 `App` church 5
- 30 church 27 = appSelfApp $ church 3
- 31 church 36 = church 2 `App` church 6
- 32 church 64 = church 3 `App` church 4
- 33 church 81 = church 4 `App` church 3
- 34 church 100 = church 2 `App` church 10
- 35 church 121 = church 2 `App` church 11
- 36 church 125 = church 3 `App` church 5
- 37 church 256 = appSelfApp $ church 4
- 38 church n = succChurch $ n - 1
- 39
- 40 succChurch :: Natural -> Lambda
- 41 succChurch = successor . church
- 42
- 43 successor :: Lambda -> Lambda
- 44 successor = app3 S bCombinator
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
deleted file mode 100644
index d1b79f18f..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Lambda where
- 2
- 3 import Relude.Extra
- 4
- 5 app4 :: Lambda -> Lambda -> Lambda -> Lambda -> Lambda
- 6 app4 l1 l2 l3 l4 = l1 `App` l2 `App` l3 `App` l4
- 7
- 8 app3 :: Lambda -> Lambda -> Lambda -> Lambda
- 9 app3 l1 l2 l3 = l1 `App` l2 `App` l3
- 10
- 11 foldlLambda :: NonEmpty Lambda -> Lambda
- 12 foldlLambda = foldl1' App
- 13
- 14 data Lambda =
- 15 S
- 16 | K
- 17 | I
- 18 | App Lambda Lambda
- 19 | Succ
- 20 | Number !Natural
- 21 | Var Text
- 22 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
deleted file mode 100644
index 60322b677..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Lexer where
- 2
- 3 import HelVM.HelMA.Automaton.API.IOTypes
- 4
- 5 import qualified Data.Text as Text
- 6
- 7 filterComments :: Source -> Source
- 8 filterComments source = mconcat $ removeComment <$> lines source
- 9
- 10 removeComment :: Source -> Source
- 11 removeComment = fst . Text.break isHash
- 12
- 13 isHash :: Char -> Bool
- 14 isHash c = '#' == c
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
deleted file mode 100644
index e21ed74b4..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
+++ /dev/null
@@ -1,53 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Parser (
- 2 parse,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.LazyK.Lambda
- 6 import HelVM.HelMA.Automata.LazyK.Lexer
- 7
- 8 import HelVM.HelMA.Automaton.API.IOTypes
- 9 import HelVM.HelMA.Automaton.ReadPExtra
- 10
- 11 import HelVM.HelIO.Control.Safe
- 12
- 13 import Text.ParserCombinators.ReadP hiding (many)
- 14
- 15 parse :: MonadSafe m => Source -> m Lambda
- 16 parse = parseCode . filterComments
- 17
- 18 parseCode :: MonadSafe m => Source -> m Lambda
- 19 parseCode = runParser appParser
- 20
- 21 appParser :: ReadP Lambda
- 22 appParser = foldlLambda <$> manyNonEmpty lambdaParser
- 23
- 24 lambdaParser :: ReadP Lambda
- 25 lambdaParser =
- 26 S <$ oneOf "sS"
- 27 <|> K <$ oneOf "kK"
- 28 <|> I <$ oneOf "iI"
- 29 <|> App <$ char '`' <*> lambdaParser <*> lambdaParser
- 30 <|> char '(' *> appParser <* char ')'
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
deleted file mode 100644
index b39a65dc8..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.LazyK.Reducer (
- 2 reduce,
- 3 flippedApply,
- 4 apply,
- 5 ) where
- 6
- 7 import HelVM.HelMA.Automata.LazyK.Lambda
- 8
- 9 reduce :: Lambda -> Lambda
- 10 reduce (App x y) = reduce x `apply` reduce y
- 11 reduce x = x
- 12
- 13 flippedApply :: Lambda -> Lambda -> Lambda
- 14 flippedApply = flip apply
- 15
- 16 apply :: Lambda -> Lambda -> Lambda
- 17 apply (S `App` x `App` y) z = apply x z `apply` apply y z
- 18 apply (App K x) _ = x
- 19 apply I x = x
- 20 apply Succ (Number x) = Number $! x + 1
- 21 apply Succ x = error $ "attempted to apply inc to a non-number " <> show x
- 22 apply f x = App f x
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
deleted file mode 100644
index 43ff16dd5..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Rev.Evaluator (
- 2 evalParams,
- 3 eval,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automaton.API.EvalParams
- 7 import HelVM.HelMA.Automaton.API.IOTypes
- 8 import HelVM.HelMA.Automaton.IO.BusinessIO
- 9
- 10 import qualified Data.Text as Text
- 11
- 12 evalParams :: BIO m => EvalParams -> m ()
- 13 evalParams = eval . source
- 14
- 15 eval :: BusinessIO m => Source -> m ()
- 16 eval = evalLines . lines
- 17
- 18 evalLines :: BusinessIO m => [Source] -> m ()
- 19 evalLines ll = doOutput $ unlines $ Text.reverse <$> ll
- 20
- 21 doOutput :: BusinessIO m => Source -> m ()
- 22 doOutput = wPutStr
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
deleted file mode 100644
index 6981d5220..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
+++ /dev/null
@@ -1,83 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.SubLeq.Automaton (
- 2 newMemory,
- 3 run,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 7 import HelVM.HelMA.Automaton.IO.BusinessIO
- 8
- 9 import HelVM.HelMA.Automaton.Loop as Loop
- 10
- 11 import HelVM.HelMA.Automaton.Combiner.RAM as RAM
- 12
- 13 import Control.Type.Operator
- 14
- 15 run :: (RAutomatonIO e r m) => Maybe Natural -> Automaton e r -> m $ Automaton e r
- 16 run = loopMWithLimit nextState
- 17
- 18 nextState :: RAutomatonIO e r m => Automaton e r -> m $ AutomatonSame e r
- 19 nextState a@(Automaton ic ram)
- 20 | ic < 0 = doEnd a
- 21 | src < 0 = doInputChar dst a
- 22 | dst < 0 = doOutputChar src a
- 23 | otherwise = doInstruction src dst a
- 24 where
- 25 src = genericLoad ram ic
- 26 dst = genericLoad ram $ ic + 1
- 27
- 28 -- | IO instructions
- 29 doOutputChar :: RAutomatonIO e r m => e -> Automaton e r -> m $ AutomatonSame e r
- 30 doOutputChar address (Automaton ic ram) = wPutAsChar (genericLoad ram address) $> Loop.continue (next3Automaton ic ram)
- 31
- 32 doInputChar :: RAutomatonIO e r m => e -> Automaton e r -> m $ AutomatonSame e r
- 33 doInputChar address (Automaton ic ram) = Loop.continue . next3Automaton ic . flippedStoreChar address ram <$> wGetChar
- 34
- 35 -- | Terminate instruction
- 36 doEnd :: RAutomatonIO e r m => Automaton e r -> m $ AutomatonSame e r
- 37 doEnd = pure . Loop.break
- 38
- 39 doInstruction :: RAutomatonIO e r m => e -> e -> Automaton e r -> m $ AutomatonSame e r
- 40 doInstruction src dst (Automaton ic ram) = pure $ Loop.continue $ Automaton ic' $ store dst diff ram where
- 41 diff = genericLoad ram dst - genericLoad ram src
- 42 ic'
- 43 | diff <= 0 = genericLoad ram $ ic + 2
- 44 | otherwise = ic + 3
- 45
- 46 next3Automaton :: Num e => e -> ram -> Automaton e ram
- 47 next3Automaton ic = Automaton (ic + 3)
- 48
- 49 newMemory :: Num e => ram -> Automaton e ram
- 50 newMemory = Automaton 0
- 51
- 52 -- | Types
- 53
- 54 type AutomatonSame ic ram = Same (Automaton ic ram)
- 55
- 56 data Automaton ic ram = Automaton
- 57 { memoryIC :: ic
- 58 , memoryRAM :: ram
- 59 }
- 60 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
deleted file mode 100644
index 64bac6e26..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
+++ /dev/null
@@ -1,69 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.SubLeq.Evaluator (
- 2 simpleEval,
- 3 evalParams,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.SubLeq.Automaton
- 7 import HelVM.HelMA.Automata.SubLeq.Lexer
- 8
- 9 import HelVM.HelMA.Automaton.API.EvalParams
- 10 import HelVM.HelMA.Automaton.API.IOTypes
- 11
- 12 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 13 import HelVM.HelMA.Automaton.IO.BusinessIO
- 14
- 15 import HelVM.HelMA.Automaton.Loop
- 16
- 17 import HelVM.HelMA.Automaton.Types.DumpType
- 18 import HelVM.HelMA.Automaton.Types.RAMType
- 19
- 20 import qualified HelVM.HelIO.Collections.MapList as MapList
- 21 import qualified HelVM.HelIO.Collections.SList as SList
- 22
- 23 import qualified Data.Sequence as Seq
- 24
- 25 simpleEval :: BIO m => RAMType -> Source -> m ()
- 26 simpleEval rt s = evalSource s rt testMaybeLimit Pretty
- 27
- 28 ----
- 29
- 30 evalParams :: BIO m => EvalParams -> m ()
- 31 evalParams p = evalSource (source p) (ramAutoOptions p) Nothing (dumpAutoOptions p)
- 32
- 33 evalSource :: BIO m => Source -> RAMType -> LimitMaybe -> DumpType -> m ()
- 34 evalSource source = evalIL $ tokenize source
- 35
- 36 evalIL :: AutomatonIO e m => [e] -> RAMType -> LimitMaybe -> DumpType -> m ()
- 37 evalIL = flip evalIL'
- 38
- 39 evalIL' :: AutomatonIO e m => RAMType -> [e] -> LimitMaybe -> DumpType -> m ()
- 40 evalIL' ListRAMType = start
- 41 evalIL' SeqRAMType = start . Seq.fromList
- 42 evalIL' SListRAMType = start . SList.sListFromList
- 43 evalIL' MapListRAMType = start . MapList.mapListFromList
- 44
- 45 start :: RAutomatonIO e r m => r -> LimitMaybe -> DumpType -> m ()
- 46 start r limit dt = logDump dt =<< run limit (newMemory r)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
deleted file mode 100644
index f8c24b181..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
+++ /dev/null
@@ -1,54 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.SubLeq.Lexer where
- 2
- 3 import HelVM.HelMA.Automata.SubLeq.Symbol
- 4
- 5 import HelVM.HelIO.Extra
- 6 import HelVM.HelIO.ReadText
- 7 import HelVM.HelMA.Automaton.API.IOTypes
- 8
- 9 import qualified Text.Read as Read
- 10 import qualified Text.Show as Show
- 11
- 12 tokenize :: Source -> SymbolList
- 13 tokenize source = (maybeToList . readTextMaybe) =<< splitOneOf " \t\n" source
- 14
- 15 readSymbols :: Source -> Symbols
- 16 readSymbols source = readTextUnsafe source :: Symbols
- 17
- 18 ----
- 19
- 20 newtype Symbols = Symbols SymbolList
- 21
- 22 instance Show Symbols where
- 23 show (Symbols symbols) = toString $ unwords $ shows symbols
- 24
- 25 instance Read Symbols where
- 26 readsPrec _ source = [( Symbols $ tokenize $ toText source , "")]
- 27
- 28 ----
- 29
- 30 shows :: SymbolList -> [Text]
- 31 shows symbols = show <$> symbols
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
deleted file mode 100644
index 62f072364..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
+++ /dev/null
@@ -1,62 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.Evaluator (
- 2 simpleEval,
- 3 evalParams,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.WhiteSpace.Lexer
- 7 import HelVM.HelMA.Automata.WhiteSpace.Parser
- 8 import qualified HelVM.HelMA.Automata.WhiteSpace.SimpleParams as S
- 9 import HelVM.HelMA.Automata.WhiteSpace.Token
- 10
- 11 import qualified HelVM.HelMA.Automaton.API.AutomatonOptions as Automaton
- 12 import HelVM.HelMA.Automaton.API.EvalParams
- 13 import HelVM.HelMA.Automaton.API.IOTypes
- 14
- 15 import HelVM.HelMA.Automaton.Automaton
- 16
- 17 import HelVM.HelMA.Automaton.IO.BusinessIO
- 18
- 19 import HelVM.HelMA.Automaton.Types.FormatType
- 20 import HelVM.HelMA.Automaton.Types.TokenType
- 21
- 22 import HelVM.HelIO.Control.Safe
- 23
- 24 import Prelude hiding (swap)
- 25
- 26
- 27 simpleEval :: BIO m => S.SimpleParams -> m ()
- 28 simpleEval p = eval (S.tokenType p) (S.source p) (S.formatType p) $ S.automatonOptions p
- 29
- 30 ----
- 31
- 32 evalParams :: BIO m => TokenType -> EvalParams -> m ()
- 33 evalParams tokenType p = eval tokenType (source p) (formatType p) $ automatonOptions p
- 34
- 35 eval :: BIO m => TokenType -> Source -> FormatType -> Automaton.AutomatonOptions -> m ()
- 36 eval tokenType source = evalTL $ tokenize tokenType source
- 37
- 38 evalTL :: BIO m => TokenList -> FormatType -> Automaton.AutomatonOptions -> m ()
- 39 evalTL tl ascii ao = flip start ao =<< liftSafe (parseFromTL ascii tl)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
deleted file mode 100644
index ac7fd28f0..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
+++ /dev/null
@@ -1,53 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.Lexer where
- 2
- 3 import HelVM.HelMA.Automata.WhiteSpace.Token
- 4
- 5 import HelVM.HelIO.ReadText
- 6 import HelVM.HelMA.Automaton.API.IOTypes
- 7 import HelVM.HelMA.Automaton.Types.TokenType
- 8 import HelVM.HelMA.Automaton.WrapTokenList
- 9
- 10 -- | Lexer
- 11
- 12 tokenize :: TokenType -> Source -> TokenList
- 13 tokenize VisibleTokenType = tokenizeVisible
- 14 tokenize _ = tokenizeWhite
- 15
- 16 tokenizeVisible :: Source -> TokenList
- 17 tokenizeVisible = unWrapTokenList . readVisibleTokens
- 18
- 19 tokenizeWhite :: Source -> TokenList
- 20 tokenizeWhite = whiteTokenListToTokenList . unWrapTokenList . readWhiteTokens
- 21
- 22 readVisibleTokens :: Source -> VisibleTokens
- 23 readVisibleTokens source = readTextUnsafe source :: VisibleTokens
- 24
- 25 readWhiteTokens :: Source -> WhiteTokens
- 26 readWhiteTokens source = readTextUnsafe source :: WhiteTokens
- 27
- 28 type VisibleTokens = WrapTokenList TokenList
- 29
- 30 type WhiteTokens = WrapTokenList WhiteTokenList
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
deleted file mode 100644
index 29d8c1c81..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
+++ /dev/null
@@ -1,95 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.OperandParsers where
- 2
- 3 import HelVM.HelMA.Automata.WhiteSpace.Token
- 4 import HelVM.HelMA.Automaton.Symbol
- 5
- 6 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 7
- 8 import HelVM.HelMA.Automaton.Types.FormatType
- 9
- 10 import HelVM.HelIO.Collections.SList
- 11 import HelVM.HelIO.Control.Safe
- 12 import HelVM.HelIO.Digit.ToDigit
- 13
- 14 import Control.Monad.Extra
- 15
- 16 parseIndex :: MonadSafe m => ParserFromTokenList m Index
- 17 parseIndex = parseInt
- 18
- 19 parseSymbol :: MonadSafe m => ParserFromTokenList m Symbol
- 20 parseSymbol = parseInteger
- 21
- 22 parseLabel :: MonadSafe m => FormatType -> ParserFromTokenList m Label
- 23 parseLabel BinaryLabel = parseDigitString
- 24 parseLabel TextLabel = parseAsciiString
- 25
- 26 ----
- 27
- 28 parseInt :: MonadSafe m => ParserFromTokenList m Int
- 29 parseInt tl = parseInt' <$> parseInteger tl where
- 30 parseInt' (integer , tl') = (fromIntegral integer , tl')
- 31
- 32 parseInteger :: MonadSafe m => ParserFromTokenList m Integer
- 33 parseInteger [] = liftError "EOL"
- 34 parseInteger (S : tl) = parseExtra makeIntegral2FromList tl
- 35 parseInteger (T : tl) = negationIntegral <$> parseExtra makeIntegral2FromList tl
- 36 parseInteger (N : tl) = pure (0 , tl)
- 37
- 38 negationIntegral :: (Integer , TokenList) -> (Integer , TokenList)
- 39 negationIntegral (i , l) = (-i , l)
- 40
- 41 parseNatural :: MonadSafe m => ParserFromTokenList m Natural
- 42 parseNatural = parseExtra makeIntegral2FromList
- 43
- 44 parseExtra :: MonadSafe m => (TokenList -> m a) -> ParserFromTokenList m a
- 45 parseExtra maker = loop act . ([] , ) where
- 46 act (acc , []) = Right $ liftError $ show acc
- 47 act (acc , N : tl) = Right $ moveSafe (maker acc , tl)
- 48 act (acc , t : tl) = Left (t : acc , tl)
- 49
- 50 parseDigitString :: MonadSafe m => ParserFromTokenList m SString
- 51 parseDigitString tl = moveSafe =<< parseString' makeDigitStringFromList tl
- 52
- 53 parseAsciiString :: MonadSafe m => ParserFromTokenList m SString
- 54 parseAsciiString tl = moveSafe =<< parseString' makeAsciiString28FromList tl
- 55
- 56 moveSafe :: MonadSafe m => (m a , TokenList) -> m (a , TokenList)
- 57 moveSafe (a , tl) = appendErrorTuple ("TokenList" , show tl) $ ( , tl) <$> a
- 58
- 59 parseString' :: MonadSafe m => (TokenList -> a) -> ParserFromTokenList m a
- 60 parseString' maker tl = parseString'' <$> splitByN tl where
- 61 parseString'' (acc , tl') = (maker acc , tl')
- 62
- 63 splitByN :: MonadSafe m => ParserFromTokenList m TokenList
- 64 splitByN [] = liftError "Empty list"
- 65 splitByN (N : tl) = pure ([] , tl)
- 66 splitByN (t : tl) = splitByN' <$> splitByN tl where
- 67 splitByN' (acc , tl') = (t:acc , tl')
- 68
- 69 -- | Types
- 70 type ParserFromTokenList m a = Parser TokenList m a
- 71
- 72 type Parser b m a = b -> m (a , b)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
deleted file mode 100644
index 6cb7c3008..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
+++ /dev/null
@@ -1,66 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.WhiteSpace.Token where
- 2
- 3 import HelVM.HelIO.Collections.SList
- 4 import HelVM.HelIO.Control.Safe
- 5 import HelVM.HelIO.Digit.ToDigit
- 6
- 7 import Text.Read
- 8
- 9 import qualified Text.Show
- 10
- 11 data Token = S | T | N
- 12 deriving stock (Bounded , Enum , Eq , Read , Show)
- 13
- 14 type TokenList = [Token]
- 15 type TokenSList = SList Token
- 16
- 17 instance ToDigit Token where
- 18 toDigit S = pure 0
- 19 toDigit T = pure 1
- 20 toDigit t = liftErrorWithPrefix "Wrong token" $ show t
- 21
- 22 ----
- 23
- 24 newtype WhiteToken = WhiteToken { unWhiteToken :: Token}
- 25 deriving stock (Eq)
- 26
- 27 instance Show WhiteToken where
- 28 show (WhiteToken S) = " "
- 29 show (WhiteToken T) = "\t"
- 30 show (WhiteToken N) = "\n"
- 31
- 32 -- | Scanner
- 33 instance Read WhiteToken where
- 34 readsPrec _ " " = [( WhiteToken S , "")]
- 35 readsPrec _ "\t" = [( WhiteToken T , "")]
- 36 readsPrec _ "\n" = [( WhiteToken N , "")]
- 37 readsPrec _ _ = []
- 38
- 39 type WhiteTokenList = [WhiteToken]
- 40
- 41 whiteTokenListToTokenList :: WhiteTokenList -> TokenList
- 42 whiteTokenListToTokenList = fmap unWhiteToken
- 43
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
deleted file mode 100644
index cb2d7bf2d..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
+++ /dev/null
@@ -1,63 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Zot.Automaton (
- 2 evalParams,
- 3 evalWithFormat,
- 4 ) where
- 5
- 6 import HelVM.HelMA.Automata.Zot.Evaluator
- 7 import HelVM.HelMA.Automata.Zot.Expression
- 8 import HelVM.HelMA.Automata.Zot.Parser
- 9
- 10 import HelVM.HelMA.Automaton.API.EvalParams
- 11 import HelVM.HelMA.Automaton.API.IOTypes
- 12
- 13 import HelVM.HelMA.Automaton.IO.BusinessIO
- 14
- 15 import HelVM.HelMA.Automaton.Types.FormatType
- 16
- 17 import HelVM.HelIO.Containers.Extra
- 18 import HelVM.HelIO.Control.Safe
- 19
- 20 import HelVM.HelIO.Digit.Digitable
- 21 import HelVM.HelIO.Digit.ToDigit
- 22
- 23 import HelVM.HelIO.ListLikeExtra
- 24
- 25 import Control.Monad.Writer.Lazy
- 26
- 27 import qualified Data.Text.Lazy as LT
- 28
- 29 evalParams :: BIO m => EvalParams -> m ()
- 30 evalParams p = wPutStr =<< evalWithFormat (formatType p) (source p) =<< wGetContentsText
- 31
- 32 evalWithFormat :: MonadSafe m => FormatType -> Source -> LT.Text -> m Output
- 33 evalWithFormat BinaryLabel source input = pure $ showFoldable $ evalInternal source input
- 34 evalWithFormat TextLabel source input = (makeAsciiText28 . convert . evalInternal source) . showExpressionList =<< stringToDL (toString input)
- 35
- 36 evalInternal :: Source -> LT.Text -> ExpressionDList
- 37 evalInternal source input = eval $ fromStrict source <> input
- 38
- 39 eval :: LT.Text -> ExpressionDList
- 40 eval = execWriter . runExpressionList . parse
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
deleted file mode 100644
index 7fbaabb92..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
+++ /dev/null
@@ -1,96 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Zot.Evaluator (
- 2 runExpressionList,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.Zot.Expression
- 6
- 7 import Control.Monad.Writer.Lazy
- 8
- 9 import qualified Data.ListLike as LL
- 10
- 11 -- | High-level Expressions
- 12 runExpressionList :: ExpressionList -> Out Expression
- 13 runExpressionList el = foldExpression el >><< outputExpression >>< printExpression
- 14
- 15 foldExpression :: ExpressionList -> Out Expression
- 16 foldExpression = foldM (><) emptyExpression
- 17
- 18 emptyExpression :: Expression
- 19 emptyExpression = contExpression iExpression
- 20
- 21 outputExpression :: Out Expression
- 22 outputExpression = kExpression ><< kExpression ><< kExpression ><< kExpression ><< kExpression ><< kExpression >< iExpression
- 23
- 24 printExpression :: Expression
- 25 printExpression = Expression innerPrintExpression
- 26
- 27 innerPrintExpression :: Expression -> Out Expression
- 28 innerPrintExpression f = interrogateExpression f >>< Zero >>< One >>= tell . LL.singleton >> pure printExpression
- 29
- 30 interrogateExpression :: Expression -> Out Expression
- 31 interrogateExpression f = f >< iExpression >>< iExpression >>< iExpression >>< kExpression
- 32
- 33 -- | Operators
- 34 infixl 9 ><
- 35 (><) :: Expression -> Expression -> Out Expression
- 36 (><) Zero = (zeroExpression ><)
- 37 (><) One = (oneExpression ><)
- 38 (><) (Expression f) = f
- 39
- 40 infixl 6 >><
- 41 (>><) :: Out Expression -> Expression -> Out Expression
- 42 f >>< a = f >>= (>< a)
- 43
- 44 infixr 8 ><<
- 45 (><<) :: Expression -> Out Expression -> Out Expression
- 46 f ><< a = (f ><) =<< a
- 47
- 48 infixl 7 >><<
- 49 (>><<) :: Out Expression -> Out Expression -> Out Expression
- 50 f >><< a = f >>= (><< a)
- 51
- 52
- 53 -- | Low-level Expressions
- 54 zeroExpression :: Expression
- 55 zeroExpression = contExpression $ Expression $ \ f -> f >< sExpression >>< kExpression
- 56
- 57 oneExpression :: Expression
- 58 oneExpression = makeExpression $ \c -> contExpression $ makeExpression $ \l -> contExpression $ Expression $ \r -> c ><< l >< r
- 59
- 60 contExpression :: Expression -> Expression
- 61 contExpression = Expression . flip (><)
- 62
- 63 sExpression :: Expression
- 64 sExpression = makeExpression $ \x -> makeExpression $ \y -> Expression $ \z -> x >< z >><< y >< z
- 65
- 66 kExpression :: Expression
- 67 kExpression = makeExpression $ makeExpression . const
- 68
- 69 iExpression :: Expression
- 70 iExpression = makeExpression id
- 71
- 72 makeExpression :: (Expression -> Expression) -> Expression
- 73 makeExpression f = Expression $ pure . f
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
deleted file mode 100644
index c593bd870..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
+++ /dev/null
@@ -1,87 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Zot.Expression where
- 2
- 3 import HelVM.HelIO.Control.Safe
- 4
- 5 import HelVM.HelIO.Containers.Extra
- 6 import HelVM.HelIO.Digit.Digitable
- 7 import HelVM.HelIO.Digit.ToDigit
- 8
- 9 import Control.Monad.Writer.Lazy
- 10
- 11 import qualified Data.DList as D
- 12 import qualified Data.Text.Lazy as LT
- 13 import Text.Read
- 14 import qualified Text.Show
- 15
- 16 showExpressionList :: ExpressionList -> LT.Text
- 17 showExpressionList f = fmconcat $ show <$> f
- 18
- 19 readExpressionList :: LT.Text -> ExpressionList
- 20 readExpressionList = stringToExpressionList . toString
- 21
- 22 stringToExpressionList :: String -> ExpressionList
- 23 stringToExpressionList s = charToExpressionList =<< s
- 24
- 25 charToExpressionList :: Char -> ExpressionList
- 26 charToExpressionList = maybeToList . rightToMaybe . charToExpressionSafe
- 27
- 28 charToExpression :: Char -> Expression
- 29 charToExpression = unsafe . charToExpressionSafe
- 30
- 31 charToExpressionSafe :: MonadSafe m => Char -> m Expression
- 32 charToExpressionSafe '0' = pure Zero
- 33 charToExpressionSafe '1' = pure One
- 34 charToExpressionSafe c = liftErrorWithPrefix "charToExpression" $ one c
- 35
- 36 -- | Types
- 37 type ExpressionDList = D.DList Expression
- 38
- 39 type ExpressionList = [Expression]
- 40
- 41 data Expression = Zero | One | Expression (Expression -> Out Expression)
- 42
- 43 type Out = Writer ExpressionDList
- 44
- 45 instance Read Expression where
- 46 readsPrec _ [] = []
- 47 readsPrec _ (c : s) = [(charToExpression c , s)]
- 48 readList s = [(stringToExpressionList s , "")]
- 49
- 50 instance Show Expression where
- 51 show Zero = "0"
- 52 show One = "1"
- 53 show (Expression _) = "function"
- 54 showList fs = (concatMap show fs <>)
- 55
- 56 instance Digitable Expression where
- 57 fromDigit 0 = pure Zero
- 58 fromDigit 1 = pure One
- 59 fromDigit t = wrongToken t
- 60
- 61 instance ToDigit Expression where
- 62 toDigit Zero = pure 0
- 63 toDigit One = pure 1
- 64 toDigit t = wrongToken t
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
deleted file mode 100644
index a4e439887..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
+++ /dev/null
@@ -1,42 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automata.Zot.Parser (
- 2 parse,
- 3 ) where
- 4
- 5 import HelVM.HelMA.Automata.Zot.Expression
- 6
- 7 import qualified Data.Text.Lazy as LT
- 8
- 9 parse :: LT.Text -> ExpressionList
- 10 parse = concatMap parseLine . LT.lines
- 11
- 12 parseLine :: LT.Text -> ExpressionList
- 13 parseLine = readExpressionList . filter01 . LT.takeWhile (/= '#')
- 14
- 15 filter01 :: LT.Text -> LT.Text
- 16 filter01 = LT.filter is01
- 17
- 18 is01 :: Char -> Bool
- 19 is01 c = c == '0' || c == '1'
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
deleted file mode 100644
index bee737adb..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.AutomatonOptions where
- 2
- 3 import HelVM.HelMA.Automaton.API.AutoOptions
- 4 import HelVM.HelMA.Automaton.API.OptimizationLevel
- 5 import HelVM.HelMA.Automaton.Types.RAMType
- 6 import HelVM.HelMA.Automaton.Types.StackType
- 7
- 8 optLevelAutoOptions :: AutomatonOptions -> OptimizationLevel
- 9 optLevelAutoOptions = optLevel . autoOptions
- 10
- 11 withDefaultRam :: StackType -> AutoOptions -> AutomatonOptions
- 12 withDefaultRam s ao = AutomatonOptions
- 13 { ramType = defaultRAMType
- 14 , stackType = s
- 15 , autoOptions = ao
- 16 }
- 17
- 18 data AutomatonOptions = AutomatonOptions
- 19 { stackType :: StackType
- 20 , ramType :: RAMType
- 21 , autoOptions :: AutoOptions
- 22 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
deleted file mode 100644
index 303cf1b4f..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
+++ /dev/null
@@ -1,63 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.EvalParams where
- 2
- 3 import HelVM.HelMA.Automaton.API.AutoOptions
- 4 import qualified HelVM.HelMA.Automaton.API.AutomatonOptions as Automaton
- 5 import HelVM.HelMA.Automaton.API.IOTypes
- 6 import HelVM.HelMA.Automaton.API.MemoryOptions
- 7
- 8 import HelVM.HelMA.Automaton.Types.CellType
- 9 import HelVM.HelMA.Automaton.Types.DumpType
- 10 import HelVM.HelMA.Automaton.Types.FormatType
- 11 import HelVM.HelMA.Automaton.Types.IntCellType
- 12 import HelVM.HelMA.Automaton.Types.RAMType
- 13 import HelVM.HelMA.Automaton.Types.StackType
- 14
- 15 -- | Accessors
- 16 ramAutoOptions :: EvalParams -> RAMType
- 17 ramAutoOptions = ram . memoryOptions
- 18
- 19 stackAutoOptions :: EvalParams -> StackType
- 20 stackAutoOptions = stack . memoryOptions
- 21
- 22 cellAutoOptions :: EvalParams -> CellType
- 23 cellAutoOptions = cell . memoryOptions
- 24
- 25 intCellAutoOptions :: EvalParams -> IntCellType
- 26 intCellAutoOptions = intCell . memoryOptions
- 27
- 28 dumpAutoOptions :: EvalParams -> DumpType
- 29 dumpAutoOptions = dumpType . autoOptions
- 30
- 31 automatonOptions :: EvalParams -> Automaton.AutomatonOptions
- 32 automatonOptions p = Automaton.AutomatonOptions (stackAutoOptions p) (ramAutoOptions p) (autoOptions p)
- 33
- 34 -- | Type
- 35 data EvalParams = EvalParams
- 36 { formatType :: !FormatType
- 37 , source :: !Source
- 38 , memoryOptions :: !MemoryOptions
- 39 , autoOptions :: !AutoOptions
- 40 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
deleted file mode 100644
index fee9a0b3e..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.MemoryOptions where
- 2
- 3 import HelVM.HelMA.Automaton.Types.CellType
- 4 import HelVM.HelMA.Automaton.Types.IntCellType
- 5 import HelVM.HelMA.Automaton.Types.RAMType
- 6 import HelVM.HelMA.Automaton.Types.StackType
- 7
- 8 -- | Types
- 9 data MemoryOptions = MemoryOptions
- 10 { ram :: !RAMType
- 11 , stack :: !StackType
- 12 , cell :: !CellType
- 13 , intCell :: !IntCellType
- 14 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
deleted file mode 100644
index 96e2b9243..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
+++ /dev/null
@@ -1,54 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.API.OptimizationLevel where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 import HelVM.HelIO.Containers.LLIndexSafe
- 6
- 7 -- | Constructors
- 8
- 9 implementedOptimizationLevels :: [OptimizationLevel]
- 10 implementedOptimizationLevels = [NoOptimizations , BasicOptimizations]
- 11
- 12 fromBool :: Bool -> OptimizationLevel
- 13 fromBool = enumFromBool
- 14
- 15 fromNatural :: Natural -> OptimizationLevel
- 16 fromNatural = fromMaybe AllOptimizations . indexMaybe optimizationLevels . fromIntegral
- 17
- 18 defaultOptimizationLevel :: OptimizationLevel
- 19 defaultOptimizationLevel = defaultEnum
- 20
- 21 optimizationLevels :: [OptimizationLevel]
- 22 optimizationLevels = generateEnums 4
- 23
- 24 -- | Types
- 25
- 26 data OptimizationLevel =
- 27 NoOptimizations
- 28 | BasicOptimizations
- 29 | SomeOptimizations
- 30 | AllOptimizations
- 31 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
deleted file mode 100644
index 048d2da46..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
+++ /dev/null
@@ -1,104 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Automaton (
- 2 start,
- 3 runAndDumpLogs,
- 4 run,
- 5 ) where
- 6
- 7 import HelVM.HelMA.Automaton.API.AutoOptions
- 8 import HelVM.HelMA.Automaton.API.AutomatonOptions
- 9
- 10 import HelVM.HelMA.Automaton.Instruction
- 11
- 12 import HelVM.HelMA.Automaton.IO.AutomatonIO
- 13 import HelVM.HelMA.Automaton.IO.BusinessIO
- 14
- 15 import HelVM.HelMA.Automaton.Loop as Loop
- 16 import HelVM.HelMA.Automaton.Optimizer
- 17 import HelVM.HelMA.Automaton.Symbol
- 18
- 19 import HelVM.HelMA.Automaton.Types.DumpType
- 20 import HelVM.HelMA.Automaton.Types.RAMType
- 21 import HelVM.HelMA.Automaton.Types.StackType
- 22
- 23 import HelVM.HelMA.Automaton.Combiner
- 24 import HelVM.HelMA.Automaton.Combiner.CPU as CPU
- 25
- 26 import HelVM.HelIO.Containers.LLIndexSafe
- 27
- 28 import qualified HelVM.HelIO.Collections.MapList as MapList
- 29 import qualified HelVM.HelIO.Collections.SList as SList
- 30
- 31 import Control.Applicative.Tools
- 32 import Control.Monad.Extra
- 33
- 34 import qualified Data.Sequence as Seq
- 35 import Data.Vector as Vector
- 36
- 37 import Prelude hiding (swap)
- 38
- 39 start :: BIO m => InstructionList -> AutomatonOptions -> m ()
- 40 start il ao = start' (flip optimize il $ optLevelAutoOptions ao) (stackType ao) (ramType ao) (autoOptions ao)
- 41
- 42 start' :: BIO m => InstructionList -> StackType -> RAMType -> AutoOptions -> m ()
- 43 start' il s ListRAMType = start'' il s []
- 44 start' il s SeqRAMType = start'' il s Seq.empty
- 45 start' il s SListRAMType = start'' il s SList.sListEmpty
- 46 start' il s MapListRAMType = start'' il s MapList.mapListEmpty
- 47
- 48 start'' :: (RAutomatonIO Symbol r m) => InstructionList -> StackType -> r -> AutoOptions -> m ()
- 49 start'' il ListStackType = start''' il []
- 50 start'' il SeqStackType = start''' il Seq.empty
- 51 start'' il SListStackType = start''' il SList.sListEmpty
- 52
- 53 start''' :: (SRAutomatonIO Symbol s r m) => InstructionList -> s -> r -> AutoOptions -> m ()
- 54 start''' il s r p = runAndDumpLogs p (newMemory il s r)
- 55
- 56 runAndDumpLogs :: (SRAutomatonIO Symbol s r m) => AutoOptions -> Memory s r -> m ()
- 57 runAndDumpLogs p = logDump (dumpType p) <=< run (compileFlag p) (limit p)
- 58
- 59 run :: (SRAutomatonIO Symbol s r m) => Bool -> LimitMaybe -> F s r m
- 60 run False = runI
- 61 run True = runA --FIXME Remove it because it does not work
- 62
- 63 ----
- 64
- 65 runA :: (SRAutomatonIO Symbol s r m) => LimitMaybe -> F s r m
- 66 runA l a = loopMWithLimit (nextStateA $ compileA a) l a
- 67
- 68 compileA :: (SRAutomatonIO Symbol s r m) => Memory s r -> Vector (SF s r m)
- 69 compileA = runInstruction <.> memoryProgram
- 70
- 71 nextStateA :: (SRAutomatonIO Symbol s r m) => Vector (SF s r m) -> SF s r m
- 72 nextStateA fv a = flip id (incrementIC a) =<< indexSafe fv (memoryProgramCounter a)
- 73
- 74 ----
- 75
- 76 runI :: (SRAutomatonIO Symbol s r m) => LimitMaybe -> F s r m
- 77 runI = loopMWithLimit nextStateI
- 78
- 79 nextStateI :: (SRAutomatonIO Symbol s r m) => SF s r m
- 80 nextStateI a = nextStateForInstruction =<< currentInstruction (memoryCM a) where
- 81 nextStateForInstruction i = runInstruction i $ incrementIC a
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
deleted file mode 100644
index cb6f64734..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
+++ /dev/null
@@ -1,76 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.LSU where
- 2
- 3 import HelVM.HelMA.Automaton.Combiner.ALU
- 4 import qualified HelVM.HelMA.Automaton.Combiner.RAM as RAM
- 5
- 6 import HelVM.HelMA.Automaton.IO.BusinessIO
- 7
- 8 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 9 import HelVM.HelMA.Automaton.Instruction.LSInstruction
- 10
- 11 import HelVM.HelIO.Control.Safe
- 12
- 13 import Control.Type.Operator
- 14
- 15 runSLI :: (LSU m s r element) => LSInstruction -> LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 16 runSLI Load = load
- 17 runSLI Store = store
- 18 runSLI (MIO OutputChar) = loadOutputChar
- 19 runSLI (MIO OutputDec) = loadOutputDec
- 20 runSLI (MIO InputChar) = storeInputChar
- 21 runSLI (MIO InputDec) = storeInputDec
- 22
- 23 load :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 24 load (LSM s r) = appendError "LSM.load" $ build <$> pop1 s where
- 25 build (address , s') = LSM (push1 (RAM.genericLoad r address) s') r
- 26
- 27 store :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 28 store (LSM s r) = appendError "LSM.store" $ build <$> pop2 s where
- 29 build (value , address , s') = LSM s' $ RAM.store address value r
- 30
- 31 loadOutputChar :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 32 loadOutputChar (LSM s r) = appendError "LSM.loadOutputChar" $ build =<< pop1 s where
- 33 build (address , s') = LSM s' r <$ wPutAsChar (RAM.genericLoad r address)
- 34
- 35 loadOutputDec :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 36 loadOutputDec (LSM s r) = appendError "LSM.loadOutputDec" $ build =<< pop1 s where
- 37 build (address , s') = LSM s' r <$ wPutAsDec (RAM.genericLoad r address)
- 38
- 39 storeInputChar :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 40 storeInputChar (LSM s r) = appendError "LSM.storeInputChar" $ build =<< pop1 s where
- 41 build (address , s') = LSM s' . flip (RAM.store address) r <$> wGetCharAs
- 42
- 43 storeInputDec :: LSU m s r element => LoadStoreMemory s r -> m $ LoadStoreMemory s r
- 44 storeInputDec (LSM s r) = appendError "LSM.storeInputDec" $ build =<< pop1 s where
- 45 build (address , s') = LSM s' . flip (RAM.store address) r <$> wGetDecAs
- 46
- 47 -- | Types
- 48 type LSU m s r element = (ALU m s element , RAM.RAM r element)
- 49
- 50 data LoadStoreMemory s r = LSM
- 51 { stack :: s
- 52 , ram :: r
- 53 }
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
deleted file mode 100644
index 428fcd692..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
+++ /dev/null
@@ -1,64 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Combiner.RAM (
- 2 genericLoad,
- 3 load,
- 4 flippedStoreChar,
- 5 storeChar,
- 6 genericStore,
- 7 store,
- 8 fromList,
- 9 RAM,
- 10 ) where
- 11
- 12 import HelVM.HelIO.Containers.LLIndexSafe
- 13 import HelVM.HelIO.Containers.LLInsertDef
- 14
- 15 import Data.Default
- 16 import Prelude hiding (divMod, drop, splitAt, swap)
- 17
- 18 genericLoad :: (Integral i , RAM ll element) => ll -> i -> element
- 19 genericLoad l = load l . fromIntegral
- 20
- 21 load :: (RAM ll element) => ll -> Address -> element
- 22 load l i = indexMaybe l i ?: def
- 23
- 24 flippedStoreChar :: (Num element , Integral address , RAM ll element) => address -> ll -> Char -> ll
- 25 flippedStoreChar a = flip (storeChar a)
- 26
- 27 storeChar :: (Num element , Integral address , RAM ll element) => address -> Char -> ll -> ll
- 28 storeChar a char = genericStore a $ ord char
- 29
- 30 genericStore :: (Integral value , Num element , Integral address , RAM ll element) => address -> value -> ll -> ll
- 31 genericStore a v = store a $ fromIntegral v
- 32
- 33 store :: (Integral a , RAM ll element) => a -> element -> ll -> ll
- 34 store = insertDef . fromIntegral
- 35
- 36 -- | Types
- 37 type RAM ll element = (Show ll , Default element , II ll element)
- 38
- 39 type II ll element = (InsertDef ll element , IndexSafe ll element)
- 40
- 41 type Address = Int
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
deleted file mode 100644
index 8ba820942..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
+++ /dev/null
@@ -1,170 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.IO.BusinessIO (
- 2
- 3 Element,
- 4 BIO,
- 5 BusinessIO,
- 6
- 7 wPutAsChar,
- 8 wPutAsDec,
- 9 wGetCharAs,
- 10 wGetDecAs,
- 11
- 12 -- wPutIntAsChar,
- 13 -- wPutIntAsDec,
- 14 -- wGetCharAsInt,
- 15 -- wGetDecAsInt,
- 16
- 17 wGetContentsBS,
- 18 wGetContentsText,
- 19 wGetContents,
- 20 wGetChar,
- 21 wPutChar,
- 22 wGetLine,
- 23 wPutStr,
- 24 wPutStrLn,
- 25 wFlush,
- 26 wLogStr,
- 27 wLogStrLn,
- 28 wLogShow,
- 29
- 30 logStr,
- 31 flush,
- 32 ) where
- 33
- 34 import HelVM.HelIO.Control.Control
- 35 import HelVM.HelIO.Control.Safe
- 36
- 37 import HelVM.HelIO.ReadText
- 38
- 39 import qualified Data.ByteString.Lazy as LBS
- 40 import Data.Default as Default
- 41 import qualified Data.Text.Lazy as LT
- 42 import qualified Data.Text.Lazy.IO as LT
- 43
- 44 import System.IO hiding (getLine, hFlush, stderr, stdout)
- 45
- 46 type Element e = (ReadShow e , Integral e , Default e)
- 47 type ReadShow e = (Read e , Show e)
- 48 type BIO m = (MonadControl m , BusinessIO m)
- 49
- 50 class Monad m => BusinessIO m where
- 51
- 52 wPutAsChar :: Integral v => v -> m ()
- 53 wPutAsDec :: Integral v => v -> m ()
- 54 wGetCharAs :: Integral v => m v
- 55 wGetDecAs :: Integral v => m v
- 56
- 57 wPutIntAsChar :: Int -> m ()
- 58 wPutIntAsDec :: Int -> m ()
- 59 wGetCharAsInt :: m Int
- 60 wGetDecAsInt :: m Int
- 61
- 62 wGetContentsBS :: m LBS.ByteString
- 63 wGetContentsText :: m LT.Text
- 64 wGetContents :: m String
- 65 wGetChar :: m Char
- 66 wGetLine :: m Text
- 67 wPutChar :: Char -> m ()
- 68 wPutStr :: Text -> m ()
- 69 wPutStrLn :: Text -> m ()
- 70 wLogStr :: Text -> m ()
- 71 wLogStrLn :: Text -> m ()
- 72 wLogShow :: Show s => s -> m ()
- 73 wFlush :: m ()
- 74
- 75 wPutAsChar = wPutIntAsChar . fromIntegral
- 76 wPutAsDec = wPutIntAsDec . fromIntegral
- 77 wGetCharAs = fromIntegral <$> wGetCharAsInt
- 78 wGetDecAs = fromIntegral <$> wGetDecAsInt
- 79
- 80 wPutIntAsChar = wPutChar . chr
- 81 wPutIntAsDec = wPutStr . show
- 82 wGetCharAsInt = ord <$> wGetChar
- 83 wGetDecAsInt = readTextUnsafe <$> wGetLine
- 84
- 85 wPutStrLn s = wPutStr $ s <> "\n"
- 86 wLogStrLn s = wLogStr $ s <> "\n"
- 87 wLogShow = wLogStrLn . show
- 88 wFlush = pass
- 89
- 90 logStr :: Text -> IO ()
- 91 logStr = hPutStrLn stderr . toString
- 92
- 93 flush :: IO ()
- 94 flush = hFlush stdout
- 95
- 96 instance BusinessIO IO where
- 97 wGetContentsBS = LBS.getContents
- 98 wGetContentsText = LT.getContents
- 99 wGetContents = getContents
- 100 wGetChar = getChar
- 101 wGetLine = getLine
- 102 wPutChar = putChar
- 103 wPutStr = putText
- 104 wPutStrLn = putTextLn
- 105 wLogStr = logStr
- 106 wFlush = flush
- 107
- 108 type ExceptTLegacy = ExceptT String
- 109
- 110 exceptTLegacy :: Monad m => m a -> ExceptTLegacy m a
- 111 exceptTLegacy a = ExceptT $ pure <$> a
- 112
- 113 instance BusinessIO (ExceptT String IO) where --FIXXME
- 114 wGetContentsBS = exceptTLegacy LBS.getContents
- 115 wGetContentsText = exceptTLegacy LT.getContents
- 116 wGetContents = exceptTLegacy getContents
- 117 wGetChar = exceptTLegacy getChar
- 118 wGetLine = exceptTLegacy getLine
- 119 wPutChar = exceptTLegacy . putChar
- 120 wPutStr = exceptTLegacy . putText
- 121 wPutStrLn = exceptTLegacy . putTextLn
- 122 wLogStr = exceptTLegacy . logStr
- 123 wFlush = exceptTLegacy flush
- 124
- 125 instance BusinessIO (SafeT IO) where
- 126 wGetContentsBS = safeT LBS.getContents
- 127 wGetContentsText = safeT LT.getContents
- 128 wGetContents = safeT getContents
- 129 wGetChar = safeT getChar
- 130 wGetLine = safeT getLine
- 131 wPutChar = safeT . putChar
- 132 wPutStr = safeT . putText
- 133 wPutStrLn = safeT . putTextLn
- 134 wLogStr = safeT . logStr
- 135 wFlush = safeT flush
- 136
- 137 instance BusinessIO (ControlT IO) where
- 138 wGetContentsBS = controlT LBS.getContents
- 139 wGetContentsText = controlT LT.getContents
- 140 wGetContents = controlT getContents
- 141 wGetChar = controlT getChar
- 142 wGetLine = controlT getLine
- 143 wPutChar = controlT . putChar
- 144 wPutStr = controlT . putText
- 145 wPutStrLn = controlT . putTextLn
- 146 wLogStr = controlT . logStr
- 147 wFlush = controlT flush
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
deleted file mode 100644
index 7f99ab6cc..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
+++ /dev/null
@@ -1,169 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 {-# LANGUAGE DeriveFunctor #-}
- 2 module HelVM.HelMA.Automaton.IO.FreeIO (
- 3 interpretFreeIOToBusinessIO,
- 4 logInput,
- 5 logOutput,
- 6 FreeIO,
- 7 ) where
- 8
- 9 import HelVM.HelMA.Automaton.IO.BusinessIO
- 10
- 11 import HelVM.HelIO.Control.Control
- 12 import HelVM.HelIO.Control.Safe
- 13
- 14 import Control.Monad.Free
- 15 import Control.Natural
- 16
- 17 import qualified Data.ByteString.Lazy as LBS
- 18
- 19 import qualified Data.Text.Lazy as LT
- 20
- 21 interpretFreeIOToBusinessIO :: BusinessIO m => FreeIO a -> m a
- 22 interpretFreeIOToBusinessIO = foldFree interpretFreeIOFToBusinessIO
- 23
- 24 logInput :: FreeIO ~> FreeIO
- 25 logInput = foldFree logInputF
- 26
- 27 logOutput :: FreeIO ~> FreeIO
- 28 logOutput = foldFree logOutputF
- 29
- 30 ----
- 31
- 32 interpretFreeIOFToBusinessIO :: BusinessIO m => FreeIOF a -> m a
- 33 interpretFreeIOFToBusinessIO (GetContentsBS cd) = cd <$> wGetContentsBS
- 34 interpretFreeIOFToBusinessIO (GetContentsText cd) = cd <$> wGetContentsText
- 35 interpretFreeIOFToBusinessIO (GetContents cd) = cd <$> wGetContents
- 36 interpretFreeIOFToBusinessIO (GetChar cd) = cd <$> wGetChar
- 37 interpretFreeIOFToBusinessIO (GetLine cd) = cd <$> wGetLine
- 38 interpretFreeIOFToBusinessIO (PutChar c v) = wPutChar c $> v
- 39 interpretFreeIOFToBusinessIO (PutStr s v) = wPutStr s $> v
- 40 interpretFreeIOFToBusinessIO (PutStrLn s v) = wPutStrLn s $> v
- 41 interpretFreeIOFToBusinessIO (LogStr s v) = wLogStr s $> v
- 42 interpretFreeIOFToBusinessIO (LogStrLn s v) = wLogStrLn s $> v
- 43 interpretFreeIOFToBusinessIO (Flush v) = wFlush $> v
- 44
- 45 ----
- 46
- 47 logInputF :: FreeIOF a -> FreeIO a
- 48 logInputF (GetChar cd) = freeGetChar >>= (\c -> liftF $ LogStr (one c) (cd c))
- 49 logInputF (GetLine cd) = freeGetLine >>= (\l -> liftF $ LogStr l (cd l))
- 50 logInputF f = liftF f
- 51
- 52 logOutputF :: FreeIOF a -> FreeIO a
- 53 logOutputF f@(PutChar c v) = liftF (LogStr (one c) v) *> liftF f
- 54 logOutputF f@(PutStr s v) = liftF (LogStr s v) *> liftF f
- 55 logOutputF f = liftF f
- 56
- 57 -- | Instances
- 58 instance BusinessIO FreeIO where
- 59 wGetContentsBS = freeGetContentsBS
- 60 wGetContentsText = freeGetContentsText
- 61 wGetContents = freeGetContents
- 62 wGetChar = freeGetChar
- 63 wGetLine = freeGetLine
- 64 wPutChar = freePutChar
- 65 wPutStr = freePutStr
- 66 wPutStrLn = freePutStrLn
- 67 wLogStr = freeLogStr
- 68 wLogStrLn = freeLogStrLn
- 69 wFlush = freeFlush
- 70
- 71 instance BusinessIO (SafeT FreeIO) where
- 72 wGetContentsBS = safeT freeGetContentsBS
- 73 wGetContentsText = safeT freeGetContentsText
- 74 wGetContents = safeT freeGetContents
- 75 wGetChar = safeT freeGetChar
- 76 wGetLine = safeT freeGetLine
- 77 wPutChar = safeT . freePutChar
- 78 wPutStr = safeT . freePutStr
- 79 wPutStrLn = safeT . freePutStrLn
- 80 wLogStr = safeT . freeLogStr
- 81 wLogStrLn = safeT . freeLogStrLn
- 82 wFlush = safeT freeFlush
- 83
- 84 instance BusinessIO (ControlT FreeIO) where
- 85 wGetContentsBS = controlT freeGetContentsBS
- 86 wGetContentsText = controlT freeGetContentsText
- 87 wGetContents = controlT freeGetContents
- 88 wGetChar = controlT freeGetChar
- 89 wGetLine = controlT freeGetLine
- 90 wPutChar = controlT . freePutChar
- 91 wPutStr = controlT . freePutStr
- 92 wPutStrLn = controlT . freePutStrLn
- 93 wLogStr = controlT . freeLogStr
- 94 wLogStrLn = controlT . freeLogStrLn
- 95 wFlush = controlT freeFlush
- 96
- 97 -- | Low level functions
- 98 freeGetContentsBS :: FreeIO LBS.ByteString
- 99 freeGetContentsBS = liftF $ GetContentsBS id
- 100
- 101 freeGetContentsText :: FreeIO LT.Text
- 102 freeGetContentsText = liftF $ GetContentsText id
- 103
- 104 freeGetContents :: FreeIO String
- 105 freeGetContents = liftF $ GetContents id
- 106
- 107 freeGetChar :: FreeIO Char
- 108 freeGetChar = liftF $ GetChar id
- 109
- 110 freeGetLine :: FreeIO Text
- 111 freeGetLine = liftF $ GetLine id
- 112
- 113 freePutChar :: Char -> FreeIO ()
- 114 freePutChar = liftF . flip PutChar ()
- 115
- 116 freePutStr :: Text -> FreeIO ()
- 117 freePutStr = liftF . flip PutStr ()
- 118
- 119 freePutStrLn :: Text -> FreeIO ()
- 120 freePutStrLn = liftF . flip PutStrLn ()
- 121
- 122 freeLogStr :: Text -> FreeIO ()
- 123 freeLogStr = liftF . flip LogStr ()
- 124
- 125 freeLogStrLn :: Text -> FreeIO ()
- 126 freeLogStrLn = liftF . flip LogStrLn ()
- 127
- 128 freeFlush :: FreeIO ()
- 129 freeFlush = liftF $ Flush ()
- 130
- 131 -- | Types
- 132 type FreeIO = Free FreeIOF
- 133
- 134 data FreeIOF a
- 135 = GetContentsBS (LBS.ByteString -> a)
- 136 | GetContentsText (LT.Text -> a)
- 137 | GetContents (String -> a)
- 138 | GetChar (Char -> a)
- 139 | GetLine (Text -> a)
- 140 | PutChar Char a
- 141 | PutStr Text a
- 142 | PutStrLn Text a
- 143 | LogStr Text a
- 144 | LogStrLn Text a
- 145 | Flush a
- 146 deriving stock (Functor)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
deleted file mode 100644
index c6a861b49..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
+++ /dev/null
@@ -1,202 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.IO.MockIO (
- 2 ioExecMockIOBatch,
- 3 ioExecMockIOWithInput,
- 4
- 5 safeExecMockIOBatch,
- 6 safeExecMockIOWithInput,
- 7
- 8 execMockIOBatch,
- 9 execMockIOWithInput,
- 10
- 11 runMockIO,
- 12 createMockIO,
- 13 calculateOutput,
- 14 calculateLogged,
- 15
- 16 MockIO,
- 17 MockIOData,
- 18 ) where
- 19
- 20 import HelVM.HelMA.Automaton.API.IOTypes
- 21 import HelVM.HelMA.Automaton.IO.BusinessIO
- 22
- 23 import HelVM.HelIO.Control.Control
- 24 import HelVM.HelIO.Control.Safe
- 25
- 26 import HelVM.HelIO.ListLikeExtra
- 27
- 28 import qualified Data.ByteString.Lazy as LBS
- 29
- 30 import Data.Text as Text
- 31 import qualified Data.Text.Lazy as LT
- 32
- 33 ioExecMockIOBatch :: ControlT MockIO () -> IO MockIOData
- 34 ioExecMockIOBatch = ioExecMockIOWithInput ""
- 35
- 36 ioExecMockIOWithInput :: Input -> ControlT MockIO () -> IO MockIOData
- 37 ioExecMockIOWithInput i = safeToIO . safeExecMockIOWithInput i
- 38
- 39 safeExecMockIOBatch :: ControlT MockIO () -> Safe MockIOData
- 40 safeExecMockIOBatch = safeExecMockIOWithInput ""
- 41
- 42 safeExecMockIOWithInput :: Input -> ControlT MockIO () -> Safe MockIOData
- 43 safeExecMockIOWithInput i = pure . runMockIO i . runControlT
- 44
- 45 execMockIOBatch :: MockIO () -> MockIOData
- 46 execMockIOBatch = execMockIOWithInput ""
- 47
- 48 execMockIOWithInput :: Input -> MockIO () -> MockIOData
- 49 execMockIOWithInput i a = runMockIO i $ safeWithMessages <$> a
- 50
- 51 ----
- 52
- 53 runMockIO :: Input -> MockIO UnitSafeWithMessages -> MockIOData
- 54 runMockIO i mockIO = flip mockDataLogStr mockIOData $ safeWithMessagesToText s
- 55 where (s , mockIOData) = runState mockIO $ createMockIO i
- 56
- 57 createMockIO :: Input -> MockIOData
- 58 createMockIO i = MockIOData (toString i) "" ""
- 59
- 60 calculateOutput :: MockIOData -> Output
- 61 calculateOutput = calculateText . output
- 62
- 63 calculateLogged :: MockIOData -> Output
- 64 calculateLogged = calculateText . logged
- 65
- 66 ----
- 67
- 68 instance BusinessIO MockIO where
- 69 wGetContentsBS = mockGetContentsBS
- 70 wGetContentsText = mockGetContentsText
- 71 wGetContents = mockGetContents
- 72 wGetChar = mockGetChar
- 73 wGetLine = mockGetLine
- 74 wPutChar = mockPutChar
- 75 wPutStr = mockPutStr
- 76 wLogStr = mockLogStr
- 77
- 78 instance BusinessIO (SafeT MockIO) where
- 79 wGetContentsBS = safeT mockGetContentsBS
- 80 wGetContentsText = safeT mockGetContentsText
- 81 wGetContents = safeT mockGetContents
- 82 wGetChar = safeT mockGetChar
- 83 wGetLine = safeT mockGetLine
- 84 wPutChar = safeT . mockPutChar
- 85 wPutStr = safeT . mockPutStr
- 86 wLogStr = safeT . mockLogStr
- 87
- 88 instance BusinessIO (ControlT MockIO) where
- 89 wGetContentsBS = controlT mockGetContentsBS
- 90 wGetContentsText = controlT mockGetContentsText
- 91 wGetContents = controlT mockGetContents
- 92 wGetChar = mockGetCharSafe
- 93 wGetLine = mockGetLineSafe
- 94 wPutChar = controlT . mockPutChar
- 95 wPutStr = controlT . mockPutStr
- 96 wLogStr = controlT . mockLogStr
- 97
- 98 ----
- 99
- 100 mockGetContentsBS :: MonadMockIO m => m LBS.ByteString
- 101 mockGetContentsBS = fromStrict . encodeUtf8 <$> mockGetContentsText
- 102
- 103 mockGetContentsText :: MonadMockIO m => m LT.Text
- 104 mockGetContentsText = fromStrict . toText <$> mockGetContents
- 105
- 106 mockGetContents :: MonadMockIO m => m String
- 107 mockGetContents = mockGetContents' =<< get where
- 108 mockGetContents' :: MonadMockIO m => MockIOData -> m String
- 109 mockGetContents' mockIO = content <$ put mockIO { input = "" } where content = input mockIO
- 110
- 111 mockGetChar :: MonadMockIO m => m Char
- 112 mockGetChar = mockGetChar' =<< get where
- 113 mockGetChar' :: MonadMockIO m => MockIOData -> m Char
- 114 mockGetChar' mockIO = orErrorTuple ("mockGetChar" , show mockIO) (top (input mockIO)) <$ put mockIO { input = orErrorTuple ("mockGetChar" , show mockIO) $ discard $ input mockIO }
- 115
- 116 mockGetLine :: MonadMockIO m => m Text
- 117 mockGetLine = mockGetLine' =<< get where
- 118 mockGetLine' :: MonadMockIO m => MockIOData -> m Text
- 119 mockGetLine' mockIO = toText line <$ put mockIO { input = input' } where (line , input') = splitStringByLn $ input mockIO
- 120
- 121 mockGetCharSafe :: MonadControlMockIO m => m Char
- 122 mockGetCharSafe = mockGetChar' =<< get where
- 123 mockGetChar' :: MonadControlMockIO m => MockIOData -> m Char
- 124 mockGetChar' mockIO = appendErrorTuple ("mockGetCharSafe" , show mockIO) $ mockGetChar'' =<< unconsSafe (input mockIO) where
- 125 mockGetChar'' (c, input') = put mockIO { input = input' } $> c
- 126
- 127 mockGetLineSafe :: MonadControlMockIO m => m Text
- 128 mockGetLineSafe = mockGetLine' =<< get where
- 129 mockGetLine' :: MonadControlMockIO m => MockIOData -> m Text
- 130 mockGetLine' mockIO = toText line <$ put mockIO { input = input' } where (line , input') = splitStringByLn $ input mockIO
- 131
- 132
- 133 mockPutChar :: Char -> MockIO ()
- 134 mockPutChar = modify . mockDataPutChar
- 135
- 136 mockPutStr :: Text -> MockIO ()
- 137 mockPutStr = modify . mockDataPutStr
- 138
- 139 mockLogStr :: Text -> MockIO ()
- 140 mockLogStr = modify . mockDataLogStr
- 141
- 142 ----
- 143
- 144 mockDataPutChar :: Char -> MockIOData -> MockIOData
- 145 mockDataPutChar char mockIO = mockIO { output = char : output mockIO }
- 146
- 147 mockDataPutStr :: Text -> MockIOData -> MockIOData
- 148 mockDataPutStr text mockIO = mockIO { output = calculateString text <> output mockIO }
- 149
- 150 mockDataLogStr :: Text -> MockIOData -> MockIOData
- 151 mockDataLogStr text mockIO = mockIO { logged = calculateString text <> logged mockIO }
- 152
- 153 ----
- 154
- 155 type MonadControlMockIO m = (MonadMockIO m , MonadControl m)--FIXME
- 156
- 157 --type MonadSafeMockIO m = (MonadMockIO m , MonadSafe m) --FIXME
- 158
- 159 type MonadMockIO m = MonadState MockIOData m
- 160
- 161 type MockIO = State MockIOData
- 162
- 163 calculateText :: String -> Output
- 164 calculateText = Text.reverse . toText
- 165
- 166 calculateString :: Output -> String
- 167 calculateString = toString . Text.reverse
- 168
- 169 data MockIOData = MockIOData
- 170 { input :: !String
- 171 , output :: !String
- 172 , logged :: !String
- 173 }
- 174 deriving stock (Eq , Read , Show)
- 175
- 176 ----
- 177
- 178 splitStringByLn :: String -> (String , String)
- 179 splitStringByLn = splitBy '\n'
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
deleted file mode 100644
index 8e565b994..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
+++ /dev/null
@@ -1,34 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Instruction.LSInstruction where
- 2
- 3 import HelVM.HelMA.Automaton.Instruction.IOInstruction
- 4
- 5 -- | Types
- 6
- 7 data LSInstruction =
- 8 Load --Restore --Fetch
- 9 | Store --Save
- 10 | MIO !IOInstruction
- 11 deriving stock (Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
deleted file mode 100644
index 70c59eab5..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
+++ /dev/null
@@ -1,73 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer (
- 2 peepholeOptimize1,
- 3 peepholeOptimize2,
- 4 peepholeOptimize3,
- 5 ) where
- 6
- 7 import HelVM.HelMA.Automaton.Instruction
- 8 import HelVM.HelMA.Automaton.Instruction.CFInstruction
- 9 import HelVM.HelMA.Automaton.Instruction.SInstruction
- 10
- 11 peepholeOptimize1 :: InstructionList -> InstructionList
- 12 peepholeOptimize1 (IAL (SPure (Cons i)) : IAL (SPure Halibut) : il) = optimizeHalibut i : peepholeOptimize1 il
- 13 peepholeOptimize1 (IAL (SPure (Cons i)) : IAL (SPure Pick ) : il) = optimizePick i : peepholeOptimize1 il
- 14 peepholeOptimize1 (IAL (SPure (Cons c)) : IAL (SPure (Cons a)) : ICF (Labeled (Branch t) LTop) : il) = optimizeBranch t c a <> peepholeOptimize1 il
- 15 peepholeOptimize1 (IAL (SPure (Cons a)) : ICF (Labeled (Branch t) LTop) : il) = optimizeBranchLabel t a <> peepholeOptimize1 il
- 16 peepholeOptimize1 (i : il) = i : peepholeOptimize1 il
- 17 peepholeOptimize1 [] = []
- 18
- 19 peepholeOptimize2 :: InstructionList -> InstructionList
- 20 peepholeOptimize2 (IAL (SPure (Cons c)) : IAL (SPure (Indexed Move (ImmediateO 1))) : ICF (Labeled (Branch t) LTop) : il) = optimizeBranchCondition t c <> peepholeOptimize2 il
- 21 peepholeOptimize2 (i : il) = i : peepholeOptimize2 il
- 22 peepholeOptimize2 [] = []
- 23
- 24 peepholeOptimize3 :: InstructionList -> InstructionList
- 25 peepholeOptimize3 il = map (\ i -> i) il
- 26 --peepholeOptimize3 (i : il) = i : peepholeOptimize3 il
- 27 --peepholeOptimize3 [] = []
- 28
- 29 optimizeHalibut :: Integer -> Instruction
- 30 optimizeHalibut i
- 31 | 0 < i = moveII $ fromIntegral i
- 32 | otherwise = copyII $ fromIntegral $ negate i
- 33
- 34 optimizePick :: Integer -> Instruction
- 35 optimizePick i
- 36 | 0 <= i = copyII $ fromIntegral i
- 37 | otherwise = moveII $ fromIntegral $ negate i
- 38
- 39 optimizeBranch :: BranchTest -> Integer -> Integer -> InstructionList
- 40 optimizeBranch t c a = check $ isJump t c where
- 41 check True = [jumpII $ fromIntegral a]
- 42 check _ = []
- 43
- 44 optimizeBranchLabel :: BranchTest -> Integer -> InstructionList
- 45 optimizeBranchLabel t a = [bII t $ fromIntegral a]
- 46
- 47 optimizeBranchCondition :: BranchTest -> Integer -> InstructionList
- 48 optimizeBranchCondition t c = check $ isJump t c where
- 49 check True = [jumpTI]
- 50 check _ = [discardI]
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.ReadPExtra.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.ReadPExtra.hs.html
deleted file mode 100644
index d4c90e469..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.ReadPExtra.hs.html
+++ /dev/null
@@ -1,68 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.ReadPExtra where
- 2
- 3 import HelVM.HelMA.Automaton.API.IOTypes
- 4
- 5 import HelVM.HelIO.Control.Safe
- 6
- 7 import Control.Type.Operator
- 8
- 9 import Data.Char
- 10
- 11 import Text.ParserCombinators.ReadP hiding (many)
- 12
- 13 runParser :: MonadSafe m => ReadP a -> Source -> m a
- 14 runParser parser source = fst . last <$> nonEmptyRunParser parser source
- 15
- 16 nonEmptyRunParser :: MonadSafe m => ReadP a -> Source -> m $ NonEmpty (a , String)
- 17 nonEmptyRunParser parser source = nonEmptyFromList ("Cannot parse source\n" <> source) $ listRunParser parser source
- 18
- 19 listRunParser :: ReadP a -> Source -> [(a , String)]
- 20 listRunParser parser = readP_to_S parser . toString
- 21
- 22 -- | Parsers
- 23
- 24 oneOf :: String -> ReadP Char
- 25 oneOf cs = satisfy (`elem` cs)
- 26
- 27 notChar :: Char -> ReadP Char
- 28 notChar c = satisfy (/= c)
- 29
- 30 anyChar :: ReadP Char
- 31 anyChar = satisfy $ const True
- 32
- 33 digit :: ReadP Char
- 34 digit = satisfy isDigit
- 35
- 36 letterAscii :: ReadP Char
- 37 letterAscii = satisfy isAlphaAscii
- 38
- 39 -- | Extra
- 40
- 41 isAlphaAscii :: Char -> Bool
- 42 isAlphaAscii c = isAsciiLower c || isAsciiUpper c
- 43
- 44 manyNonEmpty :: Alternative f => f a -> f $ NonEmpty a
- 45 manyNonEmpty p = liftA2 (:|) p (many p)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.CellType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.CellType.hs.html
deleted file mode 100644
index 002b3d218..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.CellType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.CellType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultCellType :: CellType
- 7 defaultCellType = defaultEnum
- 8
- 9 cellTypes :: [CellType]
- 10 cellTypes = generateEnums 8
- 11
- 12 -- | Types
- 13 data CellType = Int8Type | Word8Type | Int16Type | Word16Type | Int32Type | Word32Type | Int64Type | Word64Type
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.DumpType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.DumpType.hs.html
deleted file mode 100644
index e6e0c3e6f..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.DumpType.hs.html
+++ /dev/null
@@ -1,52 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.DumpType where
- 2
- 3 import HelVM.HelMA.Automaton.IO.BusinessIO
- 4
- 5 import HelVM.HelIO.Control.Logger
- 6
- 7 import HelVM.HelIO.Extra
- 8 import HelVM.HelIO.SwitchEnum
- 9
- 10 logDump :: (BIO m , Show d) => DumpType -> d -> m ()
- 11 logDump dt d = logDump' $ dump dt d where
- 12 logDump' Nothing = pass
- 13 logDump' (Just t) = logMessageTuple ("dump" , t)
- 14
- 15 dump :: Show a => DumpType -> a -> Maybe Text
- 16 dump No _ = Nothing
- 17 dump Ugly a = Just $ show a
- 18 dump Pretty a = Just $ showP a
- 19
- 20 -- | Constructors
- 21 defaultDumpType :: DumpType
- 22 defaultDumpType = defaultEnum
- 23
- 24 dumpTypes :: [DumpType]
- 25 dumpTypes = generateEnums 3
- 26
- 27 -- | Types
- 28 data DumpType = No | Ugly | Pretty
- 29 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.FormatType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.FormatType.hs.html
deleted file mode 100644
index 96a182cbe..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.FormatType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.FormatType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultFormatType :: FormatType
- 7 defaultFormatType = defaultEnum
- 8
- 9 formatTypes :: [FormatType]
- 10 formatTypes = bothEnums
- 11
- 12 -- | Types
- 13 data FormatType = BinaryLabel | TextLabel
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.IntCellType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.IntCellType.hs.html
deleted file mode 100644
index 550234485..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.IntCellType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.IntCellType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultIntCellType :: IntCellType
- 7 defaultIntCellType = defaultEnum
- 8
- 9 intCellTypes :: [IntCellType]
- 10 intCellTypes = generateEnums 5
- 11
- 12 -- | Types
- 13 data IntCellType = IntegerType | Int8Type | Int16Type | Int32Type | Int64Type
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.RAMType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.RAMType.hs.html
deleted file mode 100644
index c76725fb7..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.RAMType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.RAMType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultRAMType :: RAMType
- 7 defaultRAMType = defaultEnum
- 8
- 9 ramTypes :: [RAMType]
- 10 ramTypes = generateEnums 4
- 11
- 12 -- | Types
- 13 data RAMType = MapListRAMType | SListRAMType | SeqRAMType | ListRAMType
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.StackType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.StackType.hs.html
deleted file mode 100644
index 3d02d8a43..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.StackType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.StackType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultStackType :: StackType
- 7 defaultStackType = defaultEnum
- 8
- 9 stackTypes :: [StackType]
- 10 stackTypes = generateEnums 3
- 11
- 12 -- | Types
- 13 data StackType = SeqStackType | SListStackType | ListStackType
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.TokenType.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.TokenType.hs.html
deleted file mode 100644
index 1f07b3bf4..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Types.TokenType.hs.html
+++ /dev/null
@@ -1,37 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.Types.TokenType where
- 2
- 3 import HelVM.HelIO.SwitchEnum
- 4
- 5 -- | Constructors
- 6 defaultTokenType :: TokenType
- 7 defaultTokenType = defaultEnum
- 8
- 9 tokenTypes :: [TokenType]
- 10 tokenTypes = bothEnums
- 11
- 12 -- | Types
- 13 data TokenType = WhiteTokenType | VisibleTokenType
- 14 deriving stock (Bounded , Enum , Eq , Read , Show)
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.WrapTokenList.hs.html b/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.WrapTokenList.hs.html
deleted file mode 100644
index 41a99454c..000000000
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.WrapTokenList.hs.html
+++ /dev/null
@@ -1,38 +0,0 @@
-
-
-
-
-
-
-
-never executed always true always false
-
-
- 1 module HelVM.HelMA.Automaton.WrapTokenList where
- 2
- 3 import qualified Text.Read
- 4 import qualified Text.Show
- 5
- 6 newtype WrapTokenList a = WrapTokenList { unWrapTokenList :: a }
- 7 deriving stock (Eq)
- 8
- 9 ----
- 10
- 11 instance Show a => Show (WrapTokenList [a]) where
- 12 show (WrapTokenList tokens) = show =<< tokens
- 13
- 14 instance Read a => Read (WrapTokenList [a]) where
- 15 readsPrec _ source = [( WrapTokenList $ maybeToList . readMaybe . one =<< source , "")]
-
-
-
-
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.API.BFType.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.SimpleInstruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.Symbol.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Common.TapeOfSymbols.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Instruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Optimizer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Fast.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Instruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Flat.TableOfInstructions.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Instruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.BrainFuck.Impl.Tree.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Cat.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.API.ETAImplType.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Addressing.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
similarity index 97%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
index f4db5f44a..5918360b1 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Automaton.hs.html
@@ -49,7 +49,7 @@
30 doInstruction :: (SAutomatonIO e s m) => Maybe Token -> Memory s -> m $ MemorySame s
31 -- | IO instructions
32 doInstruction (Just O) u = Left . updateStack u <$> doOutputChar2 (memoryStack u)
- 33 doInstruction (Just I) u = Left . updateStack u <$> doInputChar2 (memoryStack u)
+ 33 doInstruction (Just I) u = Left . updateStack u <$> doInputChar2 (memoryStack u)
34
35 -- | Stack instructions
36 doInstruction (Just N) (Memory iu s) = build <$> parseNumber iu where build (symbol , iu') = Left (Memory iu' (push1 symbol s))
@@ -57,7 +57,7 @@
38
39 -- | Arithmetic
40 doInstruction (Just S) u = Left . updateStack u <$> sub (memoryStack u)
- 41 doInstruction (Just E) u = Left . updateStack u <$> divMod (memoryStack u)
+ 41 doInstruction (Just E) u = Left . updateStack u <$> divMod (memoryStack u)
42
43 -- | Control
44 doInstruction (Just R) u = pure $ Left u
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
similarity index 98%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
index 606643d69..38572f10d 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Evaluator.hs.html
@@ -74,7 +74,7 @@
55 originalEval tl SListStackType = eval tl SList.sListEmpty
56
57 eval :: (SAutomatonIO Symbol s m) => TokenList -> s -> AutoOptions -> m ()
- 58 eval tl s (AutoOptions _ _ limit dt) = logDump dt =<< run limit (newMemory tl s)
+ 58 eval tl s (AutoOptions _ limit dt) = logDump dt =<< run limit (newMemory tl s)
+
+never executed always true always false
+
+
+ 1 module HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer (
+ 2 peepholeOptimize1,
+ 3 peepholeOptimize2,
+ 4 peepholeOptimize3,
+ 5 ) where
+ 6
+ 7 import HelVM.HelMA.Automaton.Instruction
+ 8 import HelVM.HelMA.Automaton.Instruction.CFInstruction
+ 9 import HelVM.HelMA.Automaton.Instruction.SInstruction
+ 10
+ 11 peepholeOptimize1 :: InstructionList -> InstructionList
+ 12 peepholeOptimize1 (IAL (SPure (Cons i)) : IAL (SPure (Binary op)) : il) = immediateBinaryI i op : peepholeOptimize1 il
+ 13 peepholeOptimize1 (IAL (SPure (Cons i)) : IAL (SPure Halibut) : il) = optimizeHalibut i : peepholeOptimize1 il
+ 14 peepholeOptimize1 (IAL (SPure (Cons i)) : IAL (SPure Pick) : il) = optimizePick i : peepholeOptimize1 il
+ 15 peepholeOptimize1 (IAL (SPure (Cons c)) : IAL (SPure (Cons a)) : ICF (Labeled LTop (Branch t)) : il) = optimizeBranch t c a <> peepholeOptimize1 il
+ 16 peepholeOptimize1 (IAL (SPure (Cons a)) : ICF (Labeled LTop (Branch t)) : il) = optimizeBranchLabel t a <> peepholeOptimize1 il
+ 17 peepholeOptimize1 (i : il) = i : peepholeOptimize1 il
+ 18 peepholeOptimize1 [] = []
+ 19
+ 20 peepholeOptimize2 :: InstructionList -> InstructionList
+ 21 peepholeOptimize2 (IAL (SPure (Cons c)) : IAL (SPure (Indexed (IImmediate i) Move)) : ICF (Labeled LTop (Branch t)) : il) = optimizeBranchCondition i t c <> peepholeOptimize2 il
+ 22 peepholeOptimize2 (i : il) = i : peepholeOptimize2 il
+ 23 peepholeOptimize2 [] = []
+ 24
+ 25 peepholeOptimize3 :: InstructionList -> InstructionList
+ 26 peepholeOptimize3 (j@(ICF (Labeled _ Jump)) : il) = optimizeDeadCode j il
+ 27 peepholeOptimize3 (i : il) = i : peepholeOptimize3 il
+ 28 peepholeOptimize3 [] = []
+ 29
+ 30 optimizeDeadCode :: Instruction -> InstructionList -> InstructionList
+ 31 optimizeDeadCode j (i@(ICF (Mark _)) : il) = j : i : peepholeOptimize3 il
+ 32 optimizeDeadCode j ( _ : il) = peepholeOptimize3 (j : il)
+ 33 optimizeDeadCode j [] = [j]
+ 34
+ 35 optimizeHalibut :: Integer -> Instruction
+ 36 optimizeHalibut i
+ 37 | 0 < i = moveII $ fromIntegral i
+ 38 | otherwise = copyII $ fromIntegral $ negate i
+ 39
+ 40 optimizePick :: Integer -> Instruction
+ 41 optimizePick i
+ 42 | 0 <= i = copyII $ fromIntegral i
+ 43 | otherwise = moveII $ fromIntegral $ negate i
+ 44
+ 45 optimizeBranch :: BranchTest -> Integer -> Integer -> InstructionList
+ 46 optimizeBranch t c a = check $ isJump t c where
+ 47 check True = [jumpII $ fromIntegral a]
+ 48 check _ = []
+ 49
+ 50 optimizeBranchLabel :: BranchTest -> Integer -> InstructionList
+ 51 optimizeBranchLabel t a = [bII t $ fromIntegral a]
+ 52
+ 53 optimizeBranchCondition :: Index -> BranchTest -> Integer -> InstructionList
+ 54 optimizeBranchCondition 1 t c = optimizeBranchCondition1 t c
+ 55 optimizeBranchCondition i t c = check $ isJump t c where
+ 56 check True = [moveII1 , jumpTI]
+ 57 check _ = [moveII1 , discardI]
+ 58 moveII1 = moveII (i - 1)
+ 59
+ 60 optimizeBranchCondition1 :: BranchTest -> Integer -> InstructionList
+ 61 optimizeBranchCondition1 t c = check $ isJump t c where
+ 62 check True = [jumpTI]
+ 63 check _ = [discardI]
+
+
+
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Lexer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.OperandParsers.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Optimizer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
similarity index 93%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
index 868f93a49..3df324016 100644
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.SimpleParams.hs.html
@@ -26,12 +26,12 @@
7
8 import HelVM.HelMA.Automaton.Types.StackType
9
- 10 simpleParams :: ETAImplType -> StackType -> Bool -> Source -> SimpleParams
- 11 simpleParams it st c s = SimpleParams
+ 10 simpleParams :: ETAImplType -> StackType-> Source -> SimpleParams
+ 11 simpleParams it st s = SimpleParams
12 { implType = it
13 , source = s
14 , stackType = st
- 15 , autoOptions = simpleAutoParams c
+ 15 , autoOptions = simpleAutoParams
16 }
17
18 -- | Type
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.ETA.Token.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.FALSE.Expression.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.FALSE.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Automaton.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Constants.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.InputEncoder.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Lambda.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Lexer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.LazyK.Reducer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Rev.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Automaton.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.SubLeq.Lexer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Lexer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.OperandParsers.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
similarity index 98%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
index f8257845d..b48ae1fc6 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.SimpleParams.hs.html
@@ -55,7 +55,7 @@
36 , formatType = al
37 , stackType = st
38 , ramType = rt
- 39 , autoOptions = simpleAutoParams False
+ 39 , autoOptions = simpleAutoParams
40 }
41
42 -- | Type
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.WhiteSpace.Token.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Automaton.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Evaluator.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Expression.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automata.Zot.Parser.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
similarity index 58%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
index 852979d4f..b98ec6c21 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.AutoOptions.hs.html
@@ -23,23 +23,18 @@
4 import HelVM.HelMA.Automaton.Loop
5 import HelVM.HelMA.Automaton.Types.DumpType
6
- 7 verySimpleAutoParams :: AutoOptions
- 8 verySimpleAutoParams = simpleAutoParams False
- 9
- 10 simpleAutoParams :: Bool -> AutoOptions
- 11 simpleAutoParams c = AutoOptions
- 12 { optLevel = AllOptimizations
- 13 , compileFlag = c
- 14 , limit = testMaybeLimit
- 15 , dumpType = Pretty
- 16 }
- 17
- 18 data AutoOptions = AutoOptions
- 19 { optLevel :: OptimizationLevel
- 20 , compileFlag :: Bool
- 21 , limit :: LimitMaybe
- 22 , dumpType :: DumpType
- 23 }
+ 7 simpleAutoParams :: AutoOptions
+ 8 simpleAutoParams = AutoOptions
+ 9 { optLevel = AllOptimizations
+ 10 , limit = testMaybeLimit
+ 11 , dumpType = Pretty
+ 12 }
+ 13
+ 14 data AutoOptions = AutoOptions
+ 15 { optLevel :: OptimizationLevel
+ 16 , limit :: LimitMaybe
+ 17 , dumpType :: DumpType
+ 18 }
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.AutomatonOptions.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.EvalParams.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.MemoryOptions.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.API.OptimizationLevel.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Automaton.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
similarity index 67%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
index 4a134865b..852d2e31b 100644
--- a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Automaton.hs.html
@@ -42,16 +42,16 @@
23 import HelVM.HelMA.Automaton.Combiner
24 import HelVM.HelMA.Automaton.Combiner.CPU as CPU
25
- 26 import HelVM.HelIO.Containers.LLIndexSafe
- 27
- 28 import qualified HelVM.HelIO.Collections.MapList as MapList
- 29 import qualified HelVM.HelIO.Collections.SList as SList
+ 26 import qualified HelVM.HelIO.Collections.MapList as MapList
+ 27 import qualified HelVM.HelIO.Collections.SList as SList
+ 28
+ 29 import HelVM.HelIO.Control.Safe
30
- 31 import Control.Applicative.Tools
- 32 import Control.Monad.Extra
- 33
- 34 import qualified Data.Sequence as Seq
- 35 import Data.Vector as Vector
+ 31 import HelVM.HelIO.Extra
+ 32
+ 33 import Control.Monad.Extra
+ 34
+ 35 import qualified Data.Sequence as Seq
36
37 import Prelude hiding (swap)
38
@@ -73,31 +73,14 @@
54 start''' il s r p = runAndDumpLogs p (newMemory il s r)
55
56 runAndDumpLogs :: (SRAutomatonIO Symbol s r m) => AutoOptions -> Memory s r -> m ()
- 57 runAndDumpLogs p = logDump (dumpType p) <=< run (compileFlag p) (limit p)
+ 57 runAndDumpLogs p = logDump (dumpType p) <=< run (limit p)
58
- 59 run :: (SRAutomatonIO Symbol s r m) => Bool -> LimitMaybe -> F s r m
- 60 run False = runI
- 61 run True = runA
- 62
- 63 ----
- 64
- 65 runA :: (SRAutomatonIO Symbol s r m) => LimitMaybe -> F s r m
- 66 runA l a = loopMWithLimit (nextStateA $ compileA a) l a
- 67
- 68 compileA :: (SRAutomatonIO Symbol s r m) => Memory s r -> Vector (SF s r m)
- 69 compileA = runInstruction <.> memoryProgram
- 70
- 71 nextStateA :: (SRAutomatonIO Symbol s r m) => Vector (SF s r m) -> SF s r m
- 72 nextStateA fv a = flip id (incrementIC a) =<< indexSafe fv (memoryProgramCounter a)
- 73
- 74 ----
- 75
- 76 runI :: (SRAutomatonIO Symbol s r m) => LimitMaybe -> F s r m
- 77 runI = loopMWithLimit nextStateI
- 78
- 79 nextStateI :: (SRAutomatonIO Symbol s r m) => SF s r m
- 80 nextStateI a = nextStateForInstruction =<< currentInstruction (memoryCM a) where
- 81 nextStateForInstruction i = runInstruction i $ incrementIC a
+ 59 run :: (SRAutomatonIO Symbol s r m) => LimitMaybe -> F s r m
+ 60 run = loopMWithLimit nextState
+ 61
+ 62 nextState :: (SRAutomatonIO Symbol s r m) => SF s r m
+ 63 nextState a = nextStateForInstruction =<< currentInstruction (memoryCM a) where
+ 64 nextStateForInstruction i = appendErrorTupleList [("i" , show i ) , ("Automaton.nextState" , showP a)] $ runInstruction i $ incrementIC a
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
similarity index 58%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
index 3ee811387..3ec881569 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.ALU.hs.html
@@ -74,133 +74,138 @@
55 runSIO InputDec = doInputDec2
56
57 runSAL :: SafeStack m ll element => SPureInstruction -> ll -> m ll
- 58 runSAL (Cons i ) = push i
- 59 runSAL (Unary op ) = error $ show op
- 60 runSAL (Binary op ) = binaryInstruction op
- 61 runSAL (Binaries ops ) = binaryInstructions ops
- 62 runSAL (Indexed op t) = indexedInstruction op t
- 63 runSAL Halibut = halibut
- 64 runSAL Pick = pick
- 65 runSAL Discard = discard
+ 58 runSAL (Cons i ) = push i
+ 59 runSAL (Unary op ) = unaryInstruction op
+ 60 runSAL (Binary op ) = binaryInstruction op
+ 61 runSAL (Binaries ops ) = binaryInstructions ops
+ 62 runSAL (Indexed t op) = indexedInstruction op t
+ 63 runSAL Halibut = halibut
+ 64 runSAL Pick = pick
+ 65 runSAL Discard = discard
66
67 -- | Arithmetic instructions
- 68 divMod :: SafeStack m ll element => ll -> m ll
- 69 divMod = binaryInstructions [Mod , Div]
- 70
- 71 sub :: SafeStack m ll element => ll -> m ll
- 72 sub = binaryInstruction Sub
- 73
- 74 binaryInstruction :: SafeStack m ll element => BinaryOperation -> ll -> m ll
- 75 binaryInstruction i = binaryInstructions [i]
- 76
- 77 binaryInstructions :: SafeStack m ll element => [BinaryOperation] -> ll -> m ll
- 78 binaryInstructions il = build <.> pop2 where
- 79 build (e , e', l) = pushList (calculateOps e e' il) l
- 80
- 81 -- | IO instructions
- 82 doOutputChar2 :: ALU m ll element => ll -> m ll
- 83 doOutputChar2 = appendError "ALU.doOutputChar2" . build <=< pop1 where
- 84 build (e , l) = wPutAsChar e $> l
+ 68 unaryInstruction :: SafeStack m ll element => UnaryOperation -> ll -> m ll
+ 69 unaryInstruction (UImmediate i op) = build <.> pop1 where
+ 70 build (e , l) = push1 (calculateOp (fromInteger i) e op) l
+ 71 unaryInstruction op = error $ show op
+ 72
+ 73 divMod :: SafeStack m ll element => ll -> m ll
+ 74 divMod = binaryInstructions [Mod , Div]
+ 75
+ 76 sub :: SafeStack m ll element => ll -> m ll
+ 77 sub = binaryInstruction Sub
+ 78
+ 79 binaryInstruction :: SafeStack m ll element => BinaryOperation -> ll -> m ll
+ 80 binaryInstruction i = binaryInstructions [i]
+ 81
+ 82 binaryInstructions :: SafeStack m ll element => [BinaryOperation] -> ll -> m ll
+ 83 binaryInstructions il = build <.> pop2 where
+ 84 build (e , e', l) = pushList (calculateOps e e' il) l
85
- 86 doOutputDec2 :: ALU m ll element => ll -> m ll
- 87 doOutputDec2 = appendError "ALU.doOutputDec2" . build <=< pop1 where
- 88 build (e , l) = wPutAsDec e $> l
- 89
- 90 doInputChar2 :: ALU m ll element => ll -> m ll
- 91 doInputChar2 l = appendError "ALU.doOutputDec2" $ build <$> wGetCharAs where
- 92 build e = push1 e l
- 93
- 94 doInputDec2 :: ALU m ll element => ll -> m ll
- 95 doInputDec2 l = build <$> wGetCharAs where
- 96 build e = push1 e l
- 97
- 98 indexedInstruction :: SafeStack m ll element => IndexedOperation -> IndexOperand -> ll -> m ll
- 99 indexedInstruction i TopO = indexedInstructionTop i
- 100 indexedInstruction i (ImmediateO n) = indexedInstructionImmediate i n
- 101
- 102 -- | Indexed instructions
- 103 indexedInstructionTop :: SafeStack m ll element => IndexedOperation -> ll -> m ll
- 104 indexedInstructionTop op = appendError "ALU.indexedInstructionTop" . build <=< unconsSafe where
- 105 build (e , l) = indexedInstructionImmediate op (fromIntegral e) l
+ 86 -- | IO instructions
+ 87 doOutputChar2 :: ALU m ll element => ll -> m ll
+ 88 doOutputChar2 = appendError "ALU.doOutputChar2" . build <=< pop1 where
+ 89 build (e , l) = wPutAsChar e $> l
+ 90
+ 91 doOutputDec2 :: ALU m ll element => ll -> m ll
+ 92 doOutputDec2 = appendError "ALU.doOutputDec2" . build <=< pop1 where
+ 93 build (e , l) = wPutAsDec e $> l
+ 94
+ 95 doInputChar2 :: ALU m ll element => ll -> m ll
+ 96 doInputChar2 l = appendError "ALU.doOutputDec2" $ build <$> wGetCharAs where
+ 97 build e = push1 e l
+ 98
+ 99 doInputDec2 :: ALU m ll element => ll -> m ll
+ 100 doInputDec2 l = build <$> wGetCharAs where
+ 101 build e = push1 e l
+ 102
+ 103 indexedInstruction :: SafeStack m ll element => IndexedOperation -> IndexOperand -> ll -> m ll
+ 104 indexedInstruction i ITop = indexedInstructionTop i
+ 105 indexedInstruction i (IImmediate n) = indexedInstructionImmediate i n
106
- 107 indexedInstructionImmediate :: SafeStack m ll element => IndexedOperation -> Index -> ll -> m ll
- 108 indexedInstructionImmediate Copy = copy
- 109 indexedInstructionImmediate Move = move
- 110 indexedInstructionImmediate Slide = slide
+ 107 -- | Indexed instructions
+ 108 indexedInstructionTop :: SafeStack m ll element => IndexedOperation -> ll -> m ll
+ 109 indexedInstructionTop op = appendError "ALU.indexedInstructionTop" . build <=< unconsSafe where
+ 110 build (e , l) = indexedInstructionImmediate op (fromIntegral e) l
111
- 112 -- | Halibut and Pick instructions
- 113 halibut :: SafeStack m ll element => ll -> m ll
- 114 halibut = appendError "ALU.halibut" . build <=< pop1 where
- 115 build (e , l)
- 116 | 0 < i = move i l
- 117 | otherwise = copy (negate i) l
- 118 where i = fromIntegral e
- 119
- 120 pick :: SafeStack m ll element => ll -> m ll
- 121 pick = appendError "ALU.pick" . build <=< pop1 where
- 122 build (e , l)
- 123 | 0 <= i = copy i l
- 124 | otherwise = move (negate i) l
- 125 where i = fromIntegral e
- 126
- 127 -- | Slide instructions
- 128 slide :: SafeStack m ll element => Index -> ll -> m ll
- 129 slide i = appendError "ALU.pop2" . build <.> pop1 where
- 130 build (e , l) = push1 e $ drop i l
+ 112 indexedInstructionImmediate :: SafeStack m ll element => IndexedOperation -> Index -> ll -> m ll
+ 113 indexedInstructionImmediate Copy = copy
+ 114 indexedInstructionImmediate Move = move
+ 115 indexedInstructionImmediate Slide = slide
+ 116
+ 117 -- | Halibut and Pick instructions
+ 118 halibut :: SafeStack m ll element => ll -> m ll
+ 119 halibut = appendError "ALU.halibut" . build <=< pop1 where
+ 120 build (e , l)
+ 121 | 0 < i = move i l
+ 122 | otherwise = copy (negate i) l
+ 123 where i = fromIntegral e
+ 124
+ 125 pick :: SafeStack m ll element => ll -> m ll
+ 126 pick = appendError "ALU.pick" . build <=< pop1 where
+ 127 build (e , l)
+ 128 | 0 <= i = copy i l
+ 129 | otherwise = move (negate i) l
+ 130 where i = fromIntegral e
131
- 132 -- | Move instructions
- 133 move :: SafeStack m ll element => Index -> ll -> m ll
- 134 move i l = build $ length l where
- 135 build ll
- 136 | ll <= i = liftErrorWithTupleList "ALU.move index must be less then lenght" [("i" , show i) , ("ll" , show ll)]
- 137 | otherwise = pure $ l1 <> l2 <> l3 where
- 138 (l1 , l3) = splitAt 1 l'
- 139 (l2 , l') = splitAt i l
- 140
- 141 -- | Copy instructions
- 142 copy :: SafeStack m ll element => Index -> ll -> m ll
- 143 copy i = teeMap flipPush1 (findSafe i)
- 144
- 145 -- | Pop instructions
- 146 pop1 :: SafeStack m ll element => ll -> m (element , ll)
- 147 pop1 = appendError "ALU.pop1" . unconsSafe
- 148
- 149 pop2 :: SafeStack m ll element => ll -> m (element , element , ll)
- 150 pop2 = appendError "ALU.pop2" . uncons2Safe
- 151
- 152 -- | Push instructions
- 153 push :: SafeStack m ll element => Integer -> ll -> m ll
- 154 push i = pure . genericPush1 i
- 155
- 156 flipPush1 :: Stack ll element => ll -> element -> ll
- 157 flipPush1 = flip push1
- 158
- 159 charPush1 :: (Num element , Stack ll element) => Char -> ll -> ll
- 160 charPush1 = genericPush1 . ord
- 161
- 162 genericPush1 :: (Integral v , Num element , Stack ll element) => v -> ll -> ll
- 163 genericPush1 = push1 . fromIntegral
- 164
- 165 push1 :: Stack ll element => element -> ll -> ll
- 166 push1 e = pushList [e]
- 167
- 168 push2 :: Stack ll element => element -> element -> ll -> ll
- 169 push2 e e' = pushList [e , e']
- 170
- 171 pushList :: Stack ll element => [element] -> ll -> ll
- 172 pushList es l = fromList es <> l
- 173
- 174 teeMap :: Functor f => (t -> a -> b) -> (t -> f a) -> t -> f b
- 175 teeMap f2 f1 x = f2 x <$> f1 x
- 176
- 177 -- | Types
- 178 type ALU m ll element = (BIO m , SafeStack m ll element)
- 179
- 180 type SafeStack m ll element = (MonadSafe m , IntegralStack ll element)
+ 132 -- | Slide instructions
+ 133 slide :: SafeStack m ll element => Index -> ll -> m ll
+ 134 slide i = appendError "ALU.pop2" . build <.> pop1 where
+ 135 build (e , l) = push1 e $ drop i l
+ 136
+ 137 -- | Move instructions
+ 138 move :: SafeStack m ll element => Index -> ll -> m ll
+ 139 move i l = build $ length l where
+ 140 build ll
+ 141 | ll <= i = liftErrorWithTupleList "ALU.move index must be less then lenght" [("i" , show i) , ("ll" , show ll)]
+ 142 | otherwise = pure $ l1 <> l2 <> l3 where
+ 143 (l1 , l3) = splitAt 1 l'
+ 144 (l2 , l') = splitAt i l
+ 145
+ 146 -- | Copy instructions
+ 147 copy :: SafeStack m ll element => Index -> ll -> m ll
+ 148 copy i = teeMap flipPush1 (findSafe i)
+ 149
+ 150 -- | Pop instructions
+ 151 pop1 :: SafeStack m ll element => ll -> m (element , ll)
+ 152 pop1 = appendError "ALU.pop1" . unconsSafe
+ 153
+ 154 pop2 :: SafeStack m ll element => ll -> m (element , element , ll)
+ 155 pop2 = appendError "ALU.pop2" . uncons2Safe
+ 156
+ 157 -- | Push instructions
+ 158 push :: SafeStack m ll element => Integer -> ll -> m ll
+ 159 push i = pure . genericPush1 i
+ 160
+ 161 flipPush1 :: Stack ll element => ll -> element -> ll
+ 162 flipPush1 = flip push1
+ 163
+ 164 charPush1 :: (Num element , Stack ll element) => Char -> ll -> ll
+ 165 charPush1 = genericPush1 . ord
+ 166
+ 167 genericPush1 :: (Integral v , Num element , Stack ll element) => v -> ll -> ll
+ 168 genericPush1 = push1 . fromIntegral
+ 169
+ 170 push1 :: Stack ll element => element -> ll -> ll
+ 171 push1 e = pushList [e]
+ 172
+ 173 push2 :: Stack ll element => element -> element -> ll -> ll
+ 174 push2 e e' = pushList [e , e']
+ 175
+ 176 pushList :: Stack ll element => [element] -> ll -> ll
+ 177 pushList es l = fromList es <> l
+ 178
+ 179 teeMap :: Functor f => (t -> a -> b) -> (t -> f a) -> t -> f b
+ 180 teeMap f2 f1 x = f2 x <$> f1 x
181
- 182 type IntegralStack ll element = (Stack ll element , Integral element)
- 183
- 184 type Stack ll element = (Show ll , ListLike ll element , IndexSafe ll element)
+ 182 -- | Types
+ 183 type ALU m ll element = (BIO m , SafeStack m ll element)
+ 184
+ 185 type SafeStack m ll element = (MonadSafe m , IntegralStack ll element)
+ 186
+ 187 type IntegralStack ll element = (Stack ll element , Integral element)
+ 188
+ 189 type Stack ll element = (Show ll , ListLike ll element , IndexSafe ll element)
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
similarity index 79%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
index b44f80e80..215e32697 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.CPU.hs.html
@@ -34,9 +34,9 @@
15
16 runCFI :: (ALU m ll element , Show element) => CFInstruction -> CentralProcessingStep ll m
17 runCFI (Mark _ ) = pure
- 18 runCFI (Labeled i LTop ) = topInstruction i
- 19 runCFI (Labeled i (LImmediate l)) = immediateInstruction i l
- 20 runCFI (Labeled i (LArtificial l)) = artificialInstruction i l
+ 18 runCFI (Labeled LTop i) = topInstruction i
+ 19 runCFI (Labeled (LImmediate l) i) = immediateInstruction i l
+ 20 runCFI (Labeled (LArtificial l) i) = artificialInstruction i l
21 runCFI Return = popAddress
22
23 popAddress :: ALU m ll element => CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
@@ -46,10 +46,10 @@
27 --
28
29 topInstruction :: (ALU m ll element , Show element) => LabeledOperation -> CentralProcessingStep ll m
- 30 topInstruction i cpm = appendError "CPM.topInstruction" $ uncurry (immediateInstruction i) =<< cpmPop1 cpm
+ 30 topInstruction i cpm = appendError "CPM.topInstruction" $ uncurry (immediateInstruction i) =<< cpmPop1 cpm
31
32 immediateInstruction :: (ALU m ll element, DynamicLabel l) => LabeledOperation -> l -> CentralProcessingStep ll m
- 33 immediateInstruction i l cpm = appendError "CPM.immediateInstruction" $ flip (labeled i) cpm =<< findAddressForNaturalLabel l (cpmProgram cpm)
+ 33 immediateInstruction i l cpm = appendError "CPM.immediateInstruction" $ flip (labeled i) cpm =<< findAddressForNaturalLabel l (cpmProgram cpm)
34
35 artificialInstruction :: ALU m ll element => LabeledOperation -> Label -> CentralProcessingStep ll m
36 artificialInstruction i l cpm = appendError "CPM.artificialInstruction" $ flip (labeled i) cpm =<< findAddressForArtificialLabel l (cpmProgram cpm)
@@ -59,7 +59,7 @@
40 findAddressForNaturalLabel :: (MonadSafe m , DynamicLabel n) => n -> InstructionVector -> m InstructionAddress --FIXME
41 findAddressForNaturalLabel n il
42 | n < 0 = liftError $ show n
- 43 | otherwise = liftMaybeOrErrorTuple ("Undefined label", show n) $ findIndex (checkNaturalMark $ fromIntegral n) il
+ 43 | otherwise = liftMaybeOrErrorTuple ("Undefined label", show n) $ findIndex (checkNaturalMark $ fromIntegral n) il
44
45 findAddressForArtificialLabel :: MonadSafe m => Label -> InstructionVector -> m InstructionAddress
46 findAddressForArtificialLabel l = liftMaybeOrErrorTuple ("Undefined label", show l) . findIndex (checkArtificialMark l)
@@ -104,30 +104,34 @@
85 cpmPop1 (CPM cm s) = build <$> pop1 s where
86 build (l , s') = (l , CPM cm s')
87
- 88 -- | Types
- 89 type DynamicLabel l = (Integral l , Show l)
- 90
- 91 type CentralProcessingStep ll m = CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
- 92
- 93 data CentralProcessingMemory ll = CPM
- 94 { controlMemory :: ControlMemory
- 95 , alm :: ll
- 96 }
- 97 deriving stock (Show)
- 98
- 99 data ControlMemory = CM
- 100 { program :: InstructionVector
- 101 , programCounter :: InstructionCounter
- 102 , returnStack :: InstructionStack
- 103 }
- 104 deriving stock (Show)
- 105
- 106 newtype InstructionStack = IS [InstructionAddress]
- 107 deriving stock (Show)
- 108
- 109 type InstructionCounter = InstructionAddress
- 110
- 111 type InstructionAddress = Int
+ 88 cpmPop2 :: ALU m ll element => CentralProcessingMemory ll -> m (element , element , CentralProcessingMemory ll)
+ 89 cpmPop2 (CPM cm s) = build <$> pop2 s where
+ 90 build (l1 , l2 , s') = (l1 , l2 , CPM cm s')
+ 91
+ 92 -- | Types
+ 93 type DynamicLabel l = (Integral l , Show l)
+ 94
+ 95 type CentralProcessingStep ll m = CentralProcessingMemory ll -> m $ CentralProcessingMemory ll
+ 96
+ 97 data CentralProcessingMemory ll = CPM
+ 98 { controlMemory :: ControlMemory
+ 99 , alm :: ll
+ 100 }
+ 101 deriving stock (Show)
+ 102
+ 103 data ControlMemory = CM
+ 104 { program :: InstructionVector
+ 105 , programCounter :: InstructionCounter
+ 106 , returnStack :: InstructionStack
+ 107 }
+ 108 deriving stock (Show)
+ 109
+ 110 newtype InstructionStack = IS [InstructionAddress]
+ 111 deriving stock (Show)
+ 112
+ 113 type InstructionCounter = InstructionAddress
+ 114
+ 115 type InstructionAddress = Int
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.LSU.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.RAM.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
similarity index 98%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
index eb962e5df..62dadbee7 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Combiner.hs.html
@@ -78,10 +78,10 @@
59 -- | Accessors
60
61 memoryProgram :: Memory s r -> InstructionVector
- 62 memoryProgram = program . memoryCM
+ 62 memoryProgram = program . memoryCM
63
64 memoryProgramCounter :: Memory s r -> InstructionCounter
- 65 memoryProgramCounter = programCounter . memoryCM
+ 65 memoryProgramCounter = programCounter . memoryCM
66
67 toCPM :: Memory s r -> CentralProcessingMemory s
68 toCPM a = CPM { controlMemory = memoryCM a , alm = memoryStack a }
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.BusinessIO.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.FreeIO.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.IO.MockIO.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
similarity index 66%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
index a1bc59fa6..cd8e556c1 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.CFInstruction.hs.html
@@ -21,42 +21,37 @@
2
3 import HelVM.HelIO.Collections.SList
4
- 5 -- | Constructors
+ 5 -- | Others
6
- 7 cfJumpI :: CFInstruction
- 8 cfJumpI = Labeled Jump LTop
+ 7 isNotJump :: Integral e => BranchTest -> e -> Bool
+ 8 isNotJump t = not . isJump t
9
- 10 -- | Others
- 11
- 12 isNotJump :: Integral e => BranchTest -> e -> Bool
- 13 isNotJump t = not . isJump t
- 14
- 15 isJump :: Integral e => BranchTest -> e -> Bool
- 16 isJump NE e = e /= 0
- 17 isJump EZ e = e == 0
- 18 isJump LTZ e = e < 0
- 19 isJump GTZ e = e > 0
- 20
- 21 -- | Types
- 22 data CFInstruction =
- 23 Mark !Mark
- 24 | Labeled !LabeledOperation !LabelOperand
- 25 | Return
- 26 deriving stock (Eq , Read , Show)
- 27
- 28 data Mark = MNatural Natural | MArtificial Label
- 29 deriving stock (Eq , Read , Show)
+ 10 isJump :: Integral e => BranchTest -> e -> Bool
+ 11 isJump NE e = e /= 0
+ 12 isJump EZ e = e == 0
+ 13 isJump LTZ e = e < 0
+ 14 isJump GTZ e = e > 0
+ 15
+ 16 -- | Types
+ 17 data CFInstruction =
+ 18 Mark !Mark
+ 19 | Labeled !LabelOperand !LabeledOperation
+ 20 | Return
+ 21 deriving stock (Eq , Read , Show)
+ 22
+ 23 data Mark = MNatural Natural | MArtificial Label
+ 24 deriving stock (Eq , Read , Show)
+ 25
+ 26 data LabelOperand = LTop | LImmediate !Natural | LArtificial Label
+ 27 deriving stock (Eq , Read , Show)
+ 28
+ 29 type Label = SString --FIXME Artificial
30
- 31 data LabelOperand = LTop | LImmediate !Natural | LArtificial Label
+ 31 data LabeledOperation = Call | Jump | Branch !BranchTest
32 deriving stock (Eq , Read , Show)
33
- 34 type Label = SString --FIXME Artificial
- 35
- 36 data LabeledOperation = Call | Jump | Branch !BranchTest
- 37 deriving stock (Eq , Read , Show)
- 38
- 39 data BranchTest = EZ | LTZ | GTZ | NE
- 40 deriving stock (Eq , Read , Show)
+ 34 data BranchTest = EZ | LTZ | GTZ | NE
+ 35 deriving stock (Eq , Read , Show)
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.IOInstruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.4-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.LSInstruction.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
similarity index 97%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
index 3043c4e9b..3dd6e7365 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.SInstruction.hs.html
@@ -70,16 +70,16 @@
51 | Unary !UnaryOperation
52 | Binary !BinaryOperation
53 | Binaries [BinaryOperation]
- 54 | Indexed !IndexedOperation !IndexOperand
+ 54 | Indexed !IndexOperand !IndexedOperation
55 | Halibut
56 | Pick
57 | Discard
58 deriving stock (Eq , Read , Show)
59
- 60 data IndexOperand = TopO | ImmediateO !Index
+ 60 data IndexOperand = ITop | IImmediate !Index
61 deriving stock (Eq , Read , Show)
62
- 63 data UnaryOperation = Neg | BNot | LNot
+ 63 data UnaryOperation = Neg | BNot | LNot | UImmediate Integer BinaryOperation
64 deriving stock (Eq , Read , Show)
65
66 data BinaryOperation =
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
similarity index 61%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
index d036c17f4..b04f08fbe 100644
--- a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Instruction.hs.html
@@ -28,134 +28,137 @@
9
10 -- | Constructors
11
- 12 consI :: Integer -> Instruction
- 13 consI = sal . Cons
+ 12 immediateBinaryI :: Integer -> BinaryOperation -> Instruction
+ 13 immediateBinaryI i = IAL . SPure . Unary . UImmediate i
14
- 15 addI , subI , mulI , divI , modI :: Instruction
- 16 addI = binary Add
- 17 subI = binary Sub
- 18 mulI = binary Mul
- 19 divI = binary Div
- 20 modI = binary Mod
- 21
- 22 divModI , negI , halibutI :: Instruction
- 23 divModI = binaries [Mod, Div]
- 24 negI = unary Neg
- 25 halibutI = sal Halibut
- 26
- 27 dupI , swapI , rotI , copyTI , discardI :: Instruction
- 28 dupI = copyII 0
- 29 swapI = moveII 1
- 30 rotI = moveII 2
- 31 copyTI = sal $ Indexed Copy TopO
- 32 discardI = sal Discard
- 33
- 34 copyII :: Index -> Instruction
- 35 copyII = manipulationII Copy
+ 15 consI :: Integer -> Instruction
+ 16 consI = sal . Cons
+ 17
+ 18 addI , subI , mulI , divI , modI :: Instruction
+ 19 addI = binary Add
+ 20 subI = binary Sub
+ 21 mulI = binary Mul
+ 22 divI = binary Div
+ 23 modI = binary Mod
+ 24
+ 25 divModI , negI , halibutI :: Instruction
+ 26 divModI = binaries [Mod, Div]
+ 27 negI = unary Neg
+ 28 halibutI = sal Halibut
+ 29
+ 30 dupI , swapI , rotI , copyTI , discardI :: Instruction
+ 31 dupI = copyII 0
+ 32 swapI = moveII 1
+ 33 rotI = moveII 2
+ 34 copyTI = sal $ Indexed ITop Copy
+ 35 discardI = sal Discard
36
- 37 moveII :: Index -> Instruction
- 38 moveII = manipulationII Move
+ 37 copyII :: Index -> Instruction
+ 38 copyII = manipulationII Copy
39
- 40 slideII :: Index -> Instruction
- 41 slideII = manipulationII Slide
+ 40 moveII :: Index -> Instruction
+ 41 moveII = manipulationII Move
42
- 43 manipulationII :: IndexedOperation -> Index -> Instruction
- 44 manipulationII i = sal . Indexed i . ImmediateO
+ 43 slideII :: Index -> Instruction
+ 44 slideII = manipulationII Slide
45
- 46 sInputI , sOutputI , sOutputDecI :: Instruction
- 47 sInputI = sio InputChar
- 48 sOutputI = sio OutputChar
- 49 sOutputDecI = sio OutputDec
- 50
- 51 binaries :: [BinaryOperation] -> Instruction
- 52 binaries = sal . Binaries
+ 46 manipulationII :: IndexedOperation -> Index -> Instruction
+ 47 manipulationII op i = sal $ Indexed (IImmediate i) op
+ 48
+ 49 sInputI , sOutputI , sOutputDecI :: Instruction
+ 50 sInputI = sio InputChar
+ 51 sOutputI = sio OutputChar
+ 52 sOutputDecI = sio OutputDec
53
- 54 binary :: BinaryOperation -> Instruction
- 55 binary = sal . Binary
+ 54 binaries :: [BinaryOperation] -> Instruction
+ 55 binaries = sal . Binaries
56
- 57 unary :: UnaryOperation -> Instruction
- 58 unary = sal . Unary
+ 57 binary :: BinaryOperation -> Instruction
+ 58 binary = sal . Binary
59
- 60 sal :: SPureInstruction -> Instruction
- 61 sal = IAL . SPure
+ 60 unary :: UnaryOperation -> Instruction
+ 61 unary = sal . Unary
62
- 63 sio :: IOInstruction -> Instruction
- 64 sio = IAL . SIO
+ 63 sal :: SPureInstruction -> Instruction
+ 64 sal = IAL . SPure
65
- 66 markNI :: Natural -> Instruction
- 67 markNI = ICF . Mark . MNatural
+ 66 sio :: IOInstruction -> Instruction
+ 67 sio = IAL . SIO
68
- 69 markSI :: Label -> Instruction
- 70 markSI = ICF . Mark . MArtificial
+ 69 markNI :: Natural -> Instruction
+ 70 markNI = ICF . Mark . MNatural
71
- 72 jumpTI :: Instruction
- 73 jumpTI = cft Jump
+ 72 markSI :: Label -> Instruction
+ 73 markSI = ICF . Mark . MArtificial
74
- 75 jumpII :: Natural -> Instruction
- 76 jumpII = cfi Jump
+ 75 jumpTI :: Instruction
+ 76 jumpTI = cft Jump
77
- 78 callSI , jumpSI :: Label -> Instruction
- 79 callSI = cfs Call
- 80 jumpSI = cfs Jump
- 81
- 82 bNeTI :: Instruction
- 83 bNeTI = cft (Branch NE)
+ 78 jumpII :: Natural -> Instruction
+ 79 jumpII = cfi Jump
+ 80
+ 81 callSI , jumpSI :: Label -> Instruction
+ 82 callSI = cfs Call
+ 83 jumpSI = cfs Jump
84
- 85 bNeII :: Natural -> Instruction
- 86 bNeII = bII NE
+ 85 bNeTI :: Instruction
+ 86 bNeTI = cft (Branch NE)
87
- 88 bII :: BranchTest -> Natural -> Instruction
- 89 bII t = cfi (Branch t)
+ 88 bNeII :: Natural -> Instruction
+ 89 bNeII = bII NE
90
- 91 bEzSI , bLtzSI :: Label -> Instruction
- 92 bEzSI = cfs (Branch EZ )
- 93 bLtzSI = cfs (Branch LTZ)
- 94
- 95 cft :: LabeledOperation -> Instruction
- 96 cft i = ICF $ Labeled i LTop
+ 91 bII :: BranchTest -> Natural -> Instruction
+ 92 bII t = cfi (Branch t)
+ 93
+ 94 bEzSI , bLtzSI :: Label -> Instruction
+ 95 bEzSI = cfs (Branch EZ )
+ 96 bLtzSI = cfs (Branch LTZ)
97
- 98 cfi :: LabeledOperation -> Natural -> Instruction
- 99 cfi i = ICF . Labeled i . LImmediate
+ 98 cft :: LabeledOperation -> Instruction
+ 99 cft = ICF . Labeled LTop
100
- 101 cfs :: LabeledOperation -> Label -> Instruction
- 102 cfs i = ICF . Labeled i . LArtificial
+ 101 cfi :: LabeledOperation -> Natural -> Instruction
+ 102 cfi op n = ICF $ Labeled (LImmediate n) op
103
- 104 returnI :: Instruction
- 105 returnI = ICF Return
+ 104 cfs :: LabeledOperation -> Label -> Instruction
+ 105 cfs op l = ICF $ Labeled (LArtificial l) op
106
- 107 storeI , loadI :: Instruction
- 108 storeI = ILS Store
- 109 loadI = ILS Load
- 110
- 111 mInputI , mInputDecI :: Instruction
- 112 mInputI = ILS (MIO InputChar)
- 113 mInputDecI = ILS (MIO InputDec )
- 114
- 115 -- | Others
- 116
- 117 isICF :: Instruction -> Bool
- 118 isICF (ICF _) = True
- 119 isICF _ = False
- 120
- 121 checkNaturalMark :: Natural -> Instruction -> Bool
- 122 checkNaturalMark n (ICF (Mark (MNatural n'))) = n == n'
- 123 checkNaturalMark _ _ = False
- 124
- 125 checkArtificialMark :: Label -> Instruction -> Bool
- 126 checkArtificialMark l (ICF (Mark (MArtificial l'))) = l == l'
- 127 checkArtificialMark _ _ = False
- 128
- 129 -- | Types
- 130
- 131 data Instruction =
- 132 IAL !SInstruction
- 133 | ILS !LSInstruction
- 134 | ICF !CFInstruction
- 135 | End
- 136 deriving stock (Eq , Read , Show)
- 137
- 138 type InstructionList = [Instruction]
- 139 type InstructionVector = Vector Instruction
+ 107 returnI :: Instruction
+ 108 returnI = ICF Return
+ 109
+ 110 storeI , loadI :: Instruction
+ 111 storeI = ILS Store
+ 112 loadI = ILS Load
+ 113
+ 114 mInputI , mInputDecI :: Instruction
+ 115 mInputI = ILS (MIO InputChar)
+ 116 mInputDecI = ILS (MIO InputDec )
+ 117
+ 118 -- | Others
+ 119
+ 120 isICF :: Instruction -> Bool
+ 121 isICF (ICF _) = True
+ 122 isICF _ = False
+ 123
+ 124 checkNaturalMark :: Natural -> Instruction -> Bool
+ 125 checkNaturalMark n (ICF (Mark (MNatural n'))) = n == n'
+ 126 checkNaturalMark _ _ = False
+ 127
+ 128 checkArtificialMark :: Label -> Instruction -> Bool
+ 129 checkArtificialMark l (ICF (Mark (MArtificial l'))) = l == l'
+ 130 checkArtificialMark _ _ = False
+ 131
+ 132 -- | Types
+ 133
+ 134 data Instruction =
+ 135 IAL !SInstruction
+ 136 | ILS !LSInstruction
+ 137 | ICF !CFInstruction
+ 138 | End
+ 139 deriving stock (Eq , Read , Show)
+ 140
+ 141 type InstructionList = [Instruction]
+ 142 type InstructionVector = Vector Instruction
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Loop.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Loop.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Loop.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Loop.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.ConstantFoldingOptimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.ConstantFoldingOptimizer.hs.html
similarity index 100%
rename from docs/reports/helma-test/helma-0.8.4.5-inplace/HelVM.HelMA.Automaton.Optimizer.ConstantFoldingOptimizer.hs.html
rename to docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.ConstantFoldingOptimizer.hs.html
diff --git a/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
new file mode 100644
index 000000000..b8423603b
--- /dev/null
+++ b/docs/reports/helma-test/helma-0.8.4.6-inplace/HelVM.HelMA.Automaton.Optimizer.PeepholeOptimizer.hs.html
@@ -0,0 +1,86 @@
+
+