diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-10-12 14:27:26 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-10-12 14:27:26 -0700 |
commit | 0c9f837918fd40395cda3efe6965ed7c9d980511 (patch) | |
tree | c2b35407e659a077dcc90e74e04925a828492a55 /mu.arc.t | |
parent | a28ca9a7ad6c13c38a07ca121789e77ffc8c8969 (diff) | |
download | mu-0c9f837918fd40395cda3efe6965ed7c9d980511.tar.gz |
142 - helper for lists
Amazing how easy it was to just dump the trace and diff, compared to my old approach of adding new traces and rerunning.
Diffstat (limited to 'mu.arc.t')
-rw-r--r-- | mu.arc.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mu.arc.t b/mu.arc.t index 4aff9b4f..b4f9cf3f 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -689,7 +689,7 @@ '((test1 ; 1 points at first node: tagged-value (int 34) ((1 list-address) <- new (list type)) - ((2 tagged-value-address) <- get-address (1 list-address deref) (0 offset)) + ((2 tagged-value-address) <- list-value-address (1 list-address)) ((3 type-address) <- get-address (2 tagged-value-address deref) (0 offset)) ((3 type-address deref) <- copy (integer literal)) ((4 location) <- get-address (2 tagged-value-address deref) (1 offset)) |