diff options
| -rw-r--r-- | mu.arc | 1 | ||||
| -rw-r--r-- | mu.arc.t | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/mu.arc b/mu.arc index 11ca3b95..f73e5a61 100644 --- a/mu.arc +++ b/mu.arc @@ -98,6 +98,7 @@ boolean-address (obj size 1 address t elem 'boolean) byte (obj size 1) string (obj array t elem 'byte) ; inspired by Go + string-address (obj size 1 address t elem 'string) character (obj size 1) ; int32 like a Go rune character-address (obj size 1 address t elem 'character) ; isolating function calls diff --git a/mu.arc.t b/mu.arc.t index cbb566bc..94d9fd44 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -2874,7 +2874,7 @@ (reset) (new-trace "string-new") (add-code '((def main [ - ((1 integer) <- new (string literal) (5 literal)) + ((1 string-address) <- new (string literal) (5 literal)) ]))) (let before Memory-in-use-until (run 'main) @@ -2885,7 +2885,7 @@ (reset) (new-trace "string-literal") (add-code '((def main [ - ((1 integer) <- new "hello") + ((1 string-address) <- new "hello") ]))) (let before Memory-in-use-until (run 'main) |