From 84a71e373e01f36c57d1bf42b7946f3a8b212d4f Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Fri, 1 Dec 2017 18:13:05 -0400 Subject: - Got the tests to compile again. --- new-luxc/test/tests.lux | 46 +++++++++++++++++++++++----------------------- 1 file changed, 23 insertions(+), 23 deletions(-) (limited to 'new-luxc/test/tests.lux') diff --git a/new-luxc/test/tests.lux b/new-luxc/test/tests.lux index b36782517..98043260b 100644 --- a/new-luxc/test/tests.lux +++ b/new-luxc/test/tests.lux @@ -1,32 +1,32 @@ -(;module: +(.module: lux (lux (control monad) [io] (concurrency [promise]) [cli #+ program:] [test]) - (test (luxc (lang (analysis ["_;A" primitive] - ["_;A" structure] - ["_;A" reference] - ["_;A" case] - ["_;A" function] - ["_;A" type] - (procedure ["_;A" common] - ["_;A" host])) - (synthesis ["_;S" primitive] - ["_;S" structure] - (case ["_;S" special]) - ["_;S" function] - ["_;S" procedure] - ["_;S" loop]) - (translation ["_;T" primitive] - ["_;T" structure] - ["_;T" case] - ["_;T" function] - ["_;T" reference] - (procedure ["_;T" common] - ["_;T" host]))) + (test (luxc (lang (analysis ["_.A" primitive] + ["_.A" structure] + ["_.A" reference] + ["_.A" case] + ["_.A" function] + ["_.A" type] + (procedure ["_.A" common] + ["_.A" host])) + (synthesis ["_.S" primitive] + ["_.S" structure] + (case ["_.S" special]) + ["_.S" function] + ["_.S" procedure] + ["_.S" loop]) + (translation ["_.T" primitive] + ["_.T" structure] + ["_.T" case] + ["_.T" function] + ["_.T" reference] + (procedure ["_.T" common] + ["_.T" host]))) ))) (program: args - (test;run)) + (test.run)) -- cgit v1.2.3