diff options
| author | Eduardo Julian | 2018-07-11 21:45:38 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2018-07-11 21:45:38 -0400 |
| commit | f76922dfef6e88db854a27dc17987ccdc9736d6a (patch) | |
| tree | 5c3dc4b67b6bddcbb31152ae2ace4baf9c5a3fe3 /new-luxc/test | |
| parent | 0097e306a1e3b53e4cda304aac82b8778036eddf (diff) | |
- Removed stale machinery for "lux int min" and "lux int max".
Diffstat (limited to 'new-luxc/test')
| -rw-r--r-- | new-luxc/test/test/luxc/lang/translation/common.lux | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/new-luxc/test/test/luxc/lang/translation/common.lux b/new-luxc/test/test/luxc/lang/translation/common.lux index d12a5f87d..f933abe8d 100644 --- a/new-luxc/test/test/luxc/lang/translation/common.lux +++ b/new-luxc/test/test/luxc/lang/translation/common.lux @@ -8,7 +8,7 @@ ["e" error] [bool "bool/" Eq<Bool>] [text "text/" Eq<Text>] - [number "int/" Number<Int> Interval<Int> "frac/" Number<Frac> Interval<Frac>] + [number "int/" Number<Int> "frac/" Number<Frac> Interval<Frac>] (coll ["a" array] [list])) ["r" math/random] @@ -67,19 +67,6 @@ #let [_ (log! (format " param = " (%i param) "\n" "subject = " (%i subject) "\n"))]] (`` ($_ seq - (~~ (do-template [<name> <reference>] - [(test <name> - (|> (run (` (<name>))) - (case> (#e.Success valueT) - (i/= <reference> (:coerce Int valueT)) - - (#e.Error error) - (exec (log! error) - false))))] - - ["lux int min" int/bottom] - ["lux int max" int/top] - )) (~~ (do-template [<name> <type> <prepare> <comp> <subject-expr>] [(test <name> (|> (run (` (<name> (~ (code.int subject))))) |