diff options
| -rw-r--r-- | mu.arc | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/mu.arc b/mu.arc index e80c1795..ab1bc05a 100644 --- a/mu.arc +++ b/mu.arc @@ -93,20 +93,6 @@ (def typeinfo (operand) (types* ty.operand)) -;? (def is-array (operand) -;? (if (pos 'deref metadata.operand) -;? (if typeinfo.operand!address -;? ((types* typeinfo.operand!elem) 'array) -;? (err "can't deref non-address @operand")) -;? typeinfo.operand!array)) -;? -;? (def is-record (operand) -;? (if (pos 'deref metadata.operand) -;? (if typeinfo.operand!address -;? ((types* typeinfo.operand!elem) 'record) -;? (err "can't deref non-address @operand")) -;? typeinfo.operand!record)) - (def sz (operand) ;? (prn "sz " operand) ; todo: override this for arrays |