diff options
author | Kartik Agaram <vc@akkartik.com> | 2020-11-09 21:25:56 -0800 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2020-11-09 21:25:56 -0800 |
commit | 7e4f8983f8d7357d576bc51a32f49159c0c82203 (patch) | |
tree | 85597062cdb18f9c33ef613af5a9bf0b24fa7b7f /apps/tile/table.mu | |
parent | c01289dddea2398fe7f4335f5d0babc4a9e789c5 (diff) | |
download | mu-7e4f8983f8d7357d576bc51a32f49159c0c82203.tar.gz |
7219
We're still busted, but on the right track.
Diffstat (limited to 'apps/tile/table.mu')
-rw-r--r-- | apps/tile/table.mu | 72 |
1 files changed, 36 insertions, 36 deletions
diff --git a/apps/tile/table.mu b/apps/tile/table.mu index 5e8bfeb3..91407e09 100644 --- a/apps/tile/table.mu +++ b/apps/tile/table.mu @@ -53,42 +53,42 @@ fn shallow-copy-table-values _src: (addr table), dest: (addr table) { #? print-string-to-real-screen "\n" #? } bind-in-table dest, key-ah, val - var foo: (handle value) - var foo2/ecx: (addr handle value) <- address foo - var foo3/eax: (addr array byte) <- lookup *key-ah - print-string-to-real-screen foo3 - print-string-to-real-screen " -> " - lookup-binding dest, foo3, foo2 - var _foo4/eax: (addr value) <- lookup *foo2 - var foo4/ecx: (addr value) <- copy _foo4 - var foo5/eax: (addr int) <- get foo4, type - print-int32-hex-to-real-screen *foo5 - print-string-to-real-screen ": " - var foo6/eax: (addr int) <- get foo4, int-data - print-int32-hex-to-real-screen *foo6 - print-string-to-real-screen " " - var foo7/eax: (addr handle array byte) <- get foo4, text-data - var foo8/eax: (addr array byte) <- lookup *foo7 - var foo9/eax: int <- copy foo8 - print-int32-hex-to-real-screen foo9 - print-string-to-real-screen " " - var foo10/eax: (addr handle array value) <- get foo4, array-data - var foo11/eax: (addr array value) <- lookup *foo10 - var foo12/eax: int <- copy foo11 - print-int32-hex-to-real-screen foo12 - print-string-to-real-screen " " - var foo10/eax: (addr handle array value) <- get foo4, array-data - var foo13/eax: (addr handle buffered-file) <- get foo4, file-data - var foo14/eax: (addr buffered-file) <- lookup *foo13 - var foo15/eax: int <- copy foo14 - print-int32-hex-to-real-screen foo15 - print-string-to-real-screen " " - var foo10/eax: (addr handle array value) <- get foo4, array-data - var foo16/eax: (addr handle screen) <- get foo4, screen-data - var foo17/eax: (addr screen) <- lookup *foo16 - var foo18/eax: int <- copy foo17 - print-int32-hex-to-real-screen foo18 - print-string-to-real-screen "\n" +#? var foo: (handle value) +#? var foo2/ecx: (addr handle value) <- address foo +#? var foo3/eax: (addr array byte) <- lookup *key-ah +#? print-string-to-real-screen foo3 +#? print-string-to-real-screen " -> " +#? lookup-binding dest, foo3, foo2 +#? var _foo4/eax: (addr value) <- lookup *foo2 +#? var foo4/ecx: (addr value) <- copy _foo4 +#? var foo5/eax: (addr int) <- get foo4, type +#? print-int32-hex-to-real-screen *foo5 +#? print-string-to-real-screen ": " +#? var foo6/eax: (addr int) <- get foo4, int-data +#? print-int32-hex-to-real-screen *foo6 +#? print-string-to-real-screen " " +#? var foo7/eax: (addr handle array byte) <- get foo4, text-data +#? var foo8/eax: (addr array byte) <- lookup *foo7 +#? var foo9/eax: int <- copy foo8 +#? print-int32-hex-to-real-screen foo9 +#? print-string-to-real-screen " " +#? var foo10/eax: (addr handle array value) <- get foo4, array-data +#? var foo11/eax: (addr array value) <- lookup *foo10 +#? var foo12/eax: int <- copy foo11 +#? print-int32-hex-to-real-screen foo12 +#? print-string-to-real-screen " " +#? var foo10/eax: (addr handle array value) <- get foo4, array-data +#? var foo13/eax: (addr handle buffered-file) <- get foo4, file-data +#? var foo14/eax: (addr buffered-file) <- lookup *foo13 +#? var foo15/eax: int <- copy foo14 +#? print-int32-hex-to-real-screen foo15 +#? print-string-to-real-screen " " +#? var foo10/eax: (addr handle array value) <- get foo4, array-data +#? var foo16/eax: (addr handle screen) <- get foo4, screen-data +#? var foo17/eax: (addr screen) <- lookup *foo16 +#? var foo18/eax: int <- copy foo17 +#? print-int32-hex-to-real-screen foo18 +#? print-string-to-real-screen "\n" } i <- increment loop |