aboutsummaryrefslogtreecommitdiff
path: root/stdlib
diff options
context:
space:
mode:
authorEduardo Julian2016-12-26 22:56:45 -0400
committerEduardo Julian2016-12-26 22:56:45 -0400
commit1fb74875f73fdf2fcf12a4a9d927a9a06a7889e5 (patch)
treecc9011186e1cc3d3fc1ac5cb25a4a45ba481fc5d /stdlib
parent18d553c416424a5eb2553754ab2faa6cc05d1dcb (diff)
- Finished compiler's support for Frac numbers.
Diffstat (limited to '')
-rw-r--r--stdlib/test/test/lux/data/number.lux8
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>]