diff options
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))))) |