diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-11-01 02:17:23 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-11-01 02:17:23 -0700 |
commit | 0909f30c47392e2f9548e6a37dd11a4eb26607f3 (patch) | |
tree | 65ab0e83545d05779fa8317bb3fb6fd462116f95 | |
parent | 990963b47033b6392531d5feaff71a064ddb787c (diff) | |
download | mu-0909f30c47392e2f9548e6a37dd11a4eb26607f3.tar.gz |
198
-rw-r--r-- | mu.arc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mu.arc b/mu.arc index 56152fbd..7746d668 100644 --- a/mu.arc +++ b/mu.arc @@ -220,10 +220,10 @@ basetype typeinfo.operand idx (v field-offset)) (when (pos 'deref metadata.operand) - (assert basetype!address "base @operand requests deref, but its type is not an address") + (assert basetype!address "@operand requests deref, but it's not an address of a record") (= basetype (types* basetype!elem))) (assert basetype!record "get on non-record @operand") - (assert (< -1 idx (len basetype!elems)) "@idx is out of bounds of @operand") + (assert (< -1 idx (len basetype!elems)) "@idx is out of bounds of record @operand") (list (+ base (apply + (map sz (firstn idx basetype!elems)))) basetype!elems.idx))) |