aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/spec/compositor/generation/reference.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-07-24 23:23:13 -0400
committerEduardo Julian2019-07-24 23:23:13 -0400
commit30c19b40f5fd583d19aa7cf495a19c1b91f86320 (patch)
tree77cda2c601e7975b665a358b96b7ae00882d3ed9 /stdlib/source/spec/compositor/generation/reference.lux
parent68b37de7281d31470263d0e06bc72b1c5b6c2e32 (diff)
No more "f/"-prefixed functions.
+ No more "m/"-prefixed functions.
Diffstat (limited to '')
-rw-r--r--stdlib/source/spec/compositor/generation/reference.lux7
1 files changed, 5 insertions, 2 deletions
diff --git a/stdlib/source/spec/compositor/generation/reference.lux b/stdlib/source/spec/compositor/generation/reference.lux
index eb5e3bf92..a5e75b590 100644
--- a/stdlib/source/spec/compositor/generation/reference.lux
+++ b/stdlib/source/spec/compositor/generation/reference.lux
@@ -6,6 +6,9 @@
[control
[pipe (#+ case>)]
["." try]]
+ [data
+ [number
+ ["f" frac]]]
[tool
[compiler
["." reference]
@@ -28,7 +31,7 @@
(_.test "Definitions."
(|> (define name (synthesis.f64 expected))
(case> (#try.Success actual)
- (f/= expected (:coerce Frac actual))
+ (f.= expected (:coerce Frac actual))
(#try.Failure _)
false)))))
@@ -44,7 +47,7 @@
(synthesis.variable/local register)])
(run "variable")
(case> (#try.Success actual)
- (f/= expected (:coerce Frac actual))
+ (f.= expected (:coerce Frac actual))
(#try.Failure _)
false)))))