From 2b9727b18150b40d51a13666ba8e73c33621c986 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sun, 5 Oct 2014 15:05:26 -0700 Subject: [PATCH] 109 --- mu.arc | 1 + mu.arc.t | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/mu.arc b/mu.arc index ab1bc05a..79caa881 100644 --- a/mu.arc +++ b/mu.arc @@ -58,6 +58,7 @@ location (obj size 1) integer (obj size 1) boolean (obj size 1) + boolean-address (obj size 1 address t) byte (obj size 1) ;? string (obj array t elem 'byte) ; inspired by Go char (obj size 1) ; int32 like a Go rune diff --git a/mu.arc.t b/mu.arc.t index 19e82d75..0e82da57 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -426,7 +426,7 @@ '((main ((1 integer) <- literal 34) ((2 integer) <- literal t) - ((3 integer-boolean-pair-address) <- get-address (1 integer-point-pair) (1 offset))))) + ((3 boolean-address) <- get-address (1 integer-boolean-pair) (1 offset))))) (run 'main) ;? (prn memory*) (if (~iso memory* (obj 1 34 2 t 3 2))