diff options
Diffstat (limited to 'new-luxc/test/test/luxc/common.lux')
| -rw-r--r-- | new-luxc/test/test/luxc/common.lux | 25 |
1 files changed, 17 insertions, 8 deletions
diff --git a/new-luxc/test/test/luxc/common.lux b/new-luxc/test/test/luxc/common.lux index 7a6cabe73..633263243 100644 --- a/new-luxc/test/test/luxc/common.lux +++ b/new-luxc/test/test/luxc/common.lux @@ -44,11 +44,16 @@ ## [".T_scheme" eval] ## [".T_scheme" runtime] ## [".T_scheme" statement]) - [common-lisp] - (common-lisp [".T_common-lisp" expression] - [".T_common-lisp" eval] - [".T_common-lisp" runtime] - [".T_common-lisp" statement]) + ## [common-lisp] + ## (common-lisp [".T_common-lisp" expression] + ## [".T_common-lisp" eval] + ## [".T_common-lisp" runtime] + ## [".T_common-lisp" statement]) + [php] + (php [".T_php" expression] + [".T_php" eval] + [".T_php" runtime] + [".T_php" statement]) )))) (type: #export Runner (-> Synthesis (e.Error Top))) @@ -68,7 +73,8 @@ ## [init-python python.init] ## [init-r r.init] ## [init-scheme scheme.init] - [init-common-lisp common-lisp.init] + ## [init-common-lisp common-lisp.init] + [init-php php.init] ) (def: (runner translate-runtime translate-expression eval init) @@ -118,5 +124,8 @@ ## (def: #export run-scheme (runner runtimeT_scheme.translate expressionT_scheme.translate evalT_scheme.eval init-scheme)) ## (def: #export def-scheme (definer runtimeT_scheme.translate expressionT_scheme.translate evalT_scheme.eval init-scheme statementT_scheme.translate-def)) -(def: #export run-common-lisp (runner runtimeT_common-lisp.translate expressionT_common-lisp.translate evalT_common-lisp.eval init-common-lisp)) -(def: #export def-common-lisp (definer runtimeT_common-lisp.translate expressionT_common-lisp.translate evalT_common-lisp.eval init-common-lisp statementT_common-lisp.translate-def)) +## (def: #export run-common-lisp (runner runtimeT_common-lisp.translate expressionT_common-lisp.translate evalT_common-lisp.eval init-common-lisp)) +## (def: #export def-common-lisp (definer runtimeT_common-lisp.translate expressionT_common-lisp.translate evalT_common-lisp.eval init-common-lisp statementT_common-lisp.translate-def)) + +(def: #export run-php (runner runtimeT_php.translate expressionT_php.translate evalT_php.eval init-php)) +(def: #export def-php (definer runtimeT_php.translate expressionT_php.translate evalT_php.eval init-php statementT_php.translate-def)) |