diff options
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux')
| -rw-r--r-- | stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux b/stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux index 7afbb3331..dd645886f 100644 --- a/stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux +++ b/stdlib/source/lux/tool/compiler/phase/extension/analysis/common.lux @@ -160,18 +160,13 @@ (///bundle.install "left-shift" (binary Nat I64* I64)) (///bundle.install "logical-right-shift" (binary Nat I64* I64)) (///bundle.install "arithmetic-right-shift" (binary Nat I64* I64)) + (///bundle.install "=" (binary I64* I64* Bit)) + (///bundle.install "<" (binary Int Int Bit)) (///bundle.install "+" (binary I64* I64* I64)) (///bundle.install "-" (binary I64* I64* I64)) - (///bundle.install "=" (binary I64* I64* Bit))))) - -(def: bundle::int - Bundle - (<| (///bundle.prefix "int") - (|> ///bundle.empty (///bundle.install "*" (binary Int Int Int)) (///bundle.install "/" (binary Int Int Int)) (///bundle.install "%" (binary Int Int Int)) - (///bundle.install "<" (binary Int Int Bit)) (///bundle.install "f64" (unary Int Frac)) (///bundle.install "char" (unary Int Text))))) @@ -212,7 +207,6 @@ (|> ///bundle.empty (dictionary.merge (bundle::lux eval)) (dictionary.merge bundle::i64) - (dictionary.merge bundle::int) (dictionary.merge bundle::f64) (dictionary.merge bundle::text) (dictionary.merge bundle::io) |