- Improved abstract types.

- Got rid of "lux noop" translations.

8 files changed, 0 insertions, 40 deletions

diff --git a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
index 43ef5c384..b7dd1b58a 100644
--- a/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/common-lisp/procedure/common.jvm.lux
@@ -105,10 +105,6 @@
   Trinary
   (caseT.translate-if testO thenO elseO))
 
-(def: (lux//noop valueO)
-  Unary
-  valueO)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -138,7 +134,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary runtimeT.lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/js/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/js/procedure/common.jvm.lux
index 7b4a19b91..1d4e0e5c4 100644
--- a/new-luxc/source/luxc/lang/translation/js/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/js/procedure/common.jvm.lux
@@ -116,10 +116,6 @@
   Unary
   (format runtimeT.lux//try "(" riskyJS ")"))
 
-(def: (lux//noop valueJS)
-  Unary
-  valueJS)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -413,7 +409,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
index 7daf35fb5..db92bc413 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
@@ -164,10 +164,6 @@
                         ($t.method (list $Function) (#.Some $Object-Array) (list))
                         false)))
 
-(def: (lux//noop valueI)
-  Unary
-  valueI)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -553,7 +549,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
index b49d4951c..21baddcfc 100644
--- a/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux
@@ -108,10 +108,6 @@
   Unary
   (runtimeT.lux//try riskyO))
 
-(def: (lux//noop valueO)
-  Unary
-  valueO)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -402,7 +398,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/php/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/php/procedure/common.jvm.lux
index 0e0931b1e..8ce6fe1ef 100644
--- a/new-luxc/source/luxc/lang/translation/php/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/php/procedure/common.jvm.lux
@@ -109,10 +109,6 @@
 ##   Unary
 ##   (runtimeT.lux//try riskyO))
 
-## (def: (lux//noop valueO)
-##   Unary
-##   valueO)
-
 ## (exception: #export (Wrong-Syntax {message Text})
 ##   message)
 
@@ -142,7 +138,6 @@
 ## (def: lux-procs
 ##   Bundle
 ##   (|> (dict.new text.Hash<Text>)
-##       (install "noop" (unary lux//noop))
 ##       (install "is" (binary lux//is))
 ##       (install "try" (unary lux//try))
 ##       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/python/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/python/procedure/common.jvm.lux
index a83a897d1..f63371bd1 100644
--- a/new-luxc/source/luxc/lang/translation/python/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/python/procedure/common.jvm.lux
@@ -109,10 +109,6 @@
   Unary
   (runtimeT.lux//try riskyO))
 
-(def: (lux//noop valueO)
-  Unary
-  valueO)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -142,7 +138,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
index 885837078..022e1ea16 100644
--- a/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux
@@ -110,10 +110,6 @@
   Unary
   (runtimeT.lux//try riskyO))
 
-(def: (lux//noop valueO)
-  Unary
-  valueO)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -143,7 +139,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))
diff --git a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
index f26cefad6..7a9dfcb08 100644
--- a/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux
@@ -108,10 +108,6 @@
   Unary
   (runtimeT.lux//try riskyO))
 
-(def: (lux//noop valueO)
-  Unary
-  valueO)
-
 (exception: #export (Wrong-Syntax {message Text})
   message)
 
@@ -141,7 +137,6 @@
 (def: lux-procs
   Bundle
   (|> (dict.new text.Hash<Text>)
-      (install "noop" (unary lux//noop))
       (install "is" (binary lux//is))
       (install "try" (unary lux//try))
       (install "if" (trinary lux//if))