diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2014-08-21 20:50:38 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2014-08-21 20:50:38 -0700 |
| commit | c7dc4ba972d66ccbbb41f5ed88603d80912dadab (patch) | |
| tree | d8828b331b47b2b4a3afeb42bc59a52dd2379184 | |
| parent | 0a8858dbc5311461e0d853c00997c6bfca73f1bf (diff) | |
| download | mu-c7dc4ba972d66ccbbb41f5ed88603d80912dadab.tar.gz | |
67
| -rw-r--r-- | mu.arc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mu.arc b/mu.arc index 46bc7d44..2bd2937d 100644 --- a/mu.arc +++ b/mu.arc @@ -69,7 +69,7 @@ (yield n) (++ n)))) -(mac m (loc) ; for memory +(mac m (loc) ; read memory, respecting metadata `(let loc@ ,loc ;? (prn "m " loc@ sz.loc@) (if (is 1 sz.loc@) @@ -77,7 +77,7 @@ (annotate 'record (map memory* (addrs (addr loc@) sz.loc@)))))) -(mac setm (loc val) ; set memory, respecting addressing-mode tags +(mac setm (loc val) ; set memory, respecting metadata `(with (loc@ ,loc val@ ,val) ;? (prn "setm " loc@ " " val@) |