109
This commit is contained in:
parent
5fca71f1ee
commit
2b9727b181
1
mu.arc
1
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
|
||||
|
|
2
mu.arc.t
2
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))
|
||||
|
|
Loading…
Reference in New Issue