diff options
Diffstat (limited to 'new-luxc/test')
-rw-r--r-- | new-luxc/test/test/luxc/lang/translation/function.lux | 10 | ||||
-rw-r--r-- | new-luxc/test/test/luxc/lang/translation/primitive.lux | 8 | ||||
-rw-r--r-- | new-luxc/test/test/luxc/lang/translation/structure.lux | 8 |
3 files changed, 19 insertions, 7 deletions
diff --git a/new-luxc/test/test/luxc/lang/translation/function.lux b/new-luxc/test/test/luxc/lang/translation/function.lux index e8f99e09e..d3a32534b 100644 --- a/new-luxc/test/test/luxc/lang/translation/function.lux +++ b/new-luxc/test/test/luxc/lang/translation/function.lux @@ -115,6 +115,10 @@ ## (<| (times +100) ## (function-spec run-scheme))) -(context: "[Common Lisp] Function." - (<| (times +100) - (function-spec run-common-lisp))) +## (context: "[Common Lisp] Function." +## (<| (times +100) +## (function-spec run-common-lisp))) + +(context: "[PHP] Function." + (<| (times +1) + (function-spec run-php))) diff --git a/new-luxc/test/test/luxc/lang/translation/primitive.lux b/new-luxc/test/test/luxc/lang/translation/primitive.lux index d832a6ccf..a430c3866 100644 --- a/new-luxc/test/test/luxc/lang/translation/primitive.lux +++ b/new-luxc/test/test/luxc/lang/translation/primitive.lux @@ -84,6 +84,10 @@ ## (<| (times +100) ## (spec run-scheme))) -(context: "[Common Lisp] Primitives." +## (context: "[Common Lisp] Primitives." +## (<| (times +100) +## (spec run-common-lisp))) + +(context: "[PHP] Primitives." (<| (times +100) - (spec run-common-lisp))) + (spec run-php))) diff --git a/new-luxc/test/test/luxc/lang/translation/structure.lux b/new-luxc/test/test/luxc/lang/translation/structure.lux index a28a877dd..033553f3d 100644 --- a/new-luxc/test/test/luxc/lang/translation/structure.lux +++ b/new-luxc/test/test/luxc/lang/translation/structure.lux @@ -105,6 +105,10 @@ ## (<| (times +100) ## (structure-spec run-scheme))) -(context: "[Common Lisp] Structures." +## (context: "[Common Lisp] Structures." +## (<| (times +100) +## (structure-spec run-common-lisp))) + +(context: "[PHP] Structures." (<| (times +100) - (structure-spec run-common-lisp))) + (structure-spec run-php))) |