diff options
Diffstat (limited to 'stdlib/source/library/lux/math')
-rw-r--r-- | stdlib/source/library/lux/math/infix.lux | 4 | ||||
-rw-r--r-- | stdlib/source/library/lux/math/modulus.lux | 2 | ||||
-rw-r--r-- | stdlib/source/library/lux/math/number/complex.lux | 4 | ||||
-rw-r--r-- | stdlib/source/library/lux/math/number/ratio.lux | 4 |
4 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/library/lux/math/infix.lux b/stdlib/source/library/lux/math/infix.lux index ee319a0e7..5c4603e99 100644 --- a/stdlib/source/library/lux/math/infix.lux +++ b/stdlib/source/library/lux/math/infix.lux @@ -66,10 +66,10 @@ (code.form parts) {#Unary op subject} - (` ((~ op) (~ (prefix subject)))) + (` ((, op) (, (prefix subject)))) {#Binary left op right} - (` ((~ op) (~ (prefix right)) (~ (prefix left)))))) + (` ((, op) (, (prefix right)) (, (prefix left)))))) (def .public infix (syntax (_ [expr ..expression]) diff --git a/stdlib/source/library/lux/math/modulus.lux b/stdlib/source/library/lux/math/modulus.lux index 46eb4e45e..57e313bcf 100644 --- a/stdlib/source/library/lux/math/modulus.lux +++ b/stdlib/source/library/lux/math/modulus.lux @@ -50,4 +50,4 @@ (meta.lifted (do try.monad [_ (..modulus divisor)] - (in (list (` ((~! try.trusted) (..modulus (~ (code.int divisor))))))))))) + (in (list (` ((,! try.trusted) (..modulus (, (code.int divisor))))))))))) diff --git a/stdlib/source/library/lux/math/number/complex.lux b/stdlib/source/library/lux/math/number/complex.lux index 5e8161de3..65e28513d 100644 --- a/stdlib/source/library/lux/math/number/complex.lux +++ b/stdlib/source/library/lux/math/number/complex.lux @@ -27,8 +27,8 @@ (def .public complex (syntax (_ [real <code>.any ?imaginary (<>.maybe <code>.any)]) - (in (list (` [..#real (~ real) - ..#imaginary (~ (maybe.else (' +0.0) ?imaginary))]))))) + (in (list (` [..#real (, real) + ..#imaginary (, (maybe.else (' +0.0) ?imaginary))]))))) (def .public i Complex diff --git a/stdlib/source/library/lux/math/number/ratio.lux b/stdlib/source/library/lux/math/number/ratio.lux index d9c927d35..5c11f118c 100644 --- a/stdlib/source/library/lux/math/number/ratio.lux +++ b/stdlib/source/library/lux/math/number/ratio.lux @@ -43,8 +43,8 @@ (def .public ratio (syntax (_ [numerator <code>.any ?denominator (<>.maybe <code>.any)]) - (in (list (` ((~! ..normal) [..#numerator (~ numerator) - ..#denominator (~ (maybe.else (' 1) ?denominator))])))))) + (in (list (` ((,! ..normal) [..#numerator (, numerator) + ..#denominator (, (maybe.else (' 1) ?denominator))])))))) (def .public (= parameter subject) (-> Ratio Ratio Bit) |