diff options
Diffstat (limited to 'shell/primitives.mu')
-rw-r--r-- | shell/primitives.mu | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/shell/primitives.mu b/shell/primitives.mu index 66bc3786..b7f46a6e 100644 --- a/shell/primitives.mu +++ b/shell/primitives.mu @@ -179,13 +179,8 @@ fn primitive-global? _x: (addr global) -> _/eax: boolean { break-if-!= return 0/false } - { - var value-type/eax: (addr int) <- get value, type - compare *value-type, 4/primitive - break-if-= - return 0/false - } - return 1/true + var primitive?/eax: boolean <- primitive? value + return primitive? } fn append-primitive _self: (addr global-table), name: (addr array byte) { |