diff options
author | Eduardo Julian | 2016-12-26 22:56:45 -0400 |
---|---|---|
committer | Eduardo Julian | 2016-12-26 22:56:45 -0400 |
commit | 1fb74875f73fdf2fcf12a4a9d927a9a06a7889e5 (patch) | |
tree | cc9011186e1cc3d3fc1ac5cb25a4a45ba481fc5d /stdlib | |
parent | 18d553c416424a5eb2553754ab2faa6cc05d1dcb (diff) |
- Finished compiler's support for Frac numbers.
Diffstat (limited to '')
-rw-r--r-- | stdlib/test/test/lux/data/number.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/test/test/lux/data/number.lux b/stdlib/test/test/lux/data/number.lux index d5d60a9ce..832c8fbdd 100644 --- a/stdlib/test/test/lux/data/number.lux +++ b/stdlib/test/test/lux/data/number.lux @@ -104,10 +104,10 @@ ["Real/Mul" R;real Number<Real> Mul@Monoid<Real> (r.% 1000.0) (r.> 0.0)] ["Real/Min" R;real Number<Real> Min@Monoid<Real> (r.% 1000.0) (r.> 0.0)] ["Real/Max" R;real Number<Real> Max@Monoid<Real> (r.% 1000.0) (r.> 0.0)] - ## ["Frac/Add" R;frac Number<Frac> Add@Monoid<Frac> (f.% .125)] - ## ["Frac/Mul" R;frac Number<Frac> Mul@Monoid<Frac> (f.% .125)] - ## ["Frac/Min" R;frac Number<Frac> Min@Monoid<Frac> (f.% .125)] - ## ["Frac/Max" R;frac Number<Frac> Max@Monoid<Frac> (f.% .125)] + ["Frac/Add" R;frac Number<Frac> Add@Monoid<Frac> (f.% .125) (lambda [_] true)] + ## ["Frac/Mul" R;frac Number<Frac> Mul@Monoid<Frac> (f.% .125) (lambda [_] true)] + ["Frac/Min" R;frac Number<Frac> Min@Monoid<Frac> (f.% .125) (lambda [_] true)] + ["Frac/Max" R;frac Number<Frac> Max@Monoid<Frac> (f.% .125) (lambda [_] true)] ) (do-template [<category> <rand-gen> <Number> <Codec>] |