From f76922dfef6e88db854a27dc17987ccdc9736d6a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 11 Jul 2018 21:45:38 -0400
Subject: - Removed stale machinery for "lux int min" and  "lux int max".

---
 new-luxc/test/test/luxc/lang/translation/common.lux | 15 +--------------
 1 file changed, 1 insertion(+), 14 deletions(-)

(limited to 'new-luxc/test')

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)))))
-- 
cgit v1.2.3