From 38ce556c6e3d21acdf53d6f8e9cfd80903360c8c Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Tue, 3 Jul 2018 23:36:21 -0400 Subject: - Improved abstract types. - Got rid of "lux noop" translations. --- .../luxc/lang/translation/common-lisp/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/js/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/lua/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/php/procedure/common.jvm.lux | 5 ----- .../source/luxc/lang/translation/python/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/r/procedure/common.jvm.lux | 5 ----- new-luxc/source/luxc/lang/translation/ruby/procedure/common.jvm.lux | 5 ----- 8 files changed, 40 deletions(-) (limited to 'new-luxc/source/luxc/lang/translation') 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) - (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) - (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) - (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) - (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) -## (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) - (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) - (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) - (install "noop" (unary lux//noop)) (install "is" (binary lux//is)) (install "try" (unary lux//try)) (install "if" (trinary lux//if)) -- cgit v1.2.3