From d4873d999695dd724f3955000697e58d09fb4654 Mon Sep 17 00:00:00 2001 From: Ambrose Bonnaire-Sergeant Date: Wed, 29 Jan 2025 23:38:57 -0600 Subject: [PATCH] tests --- compiler+runtime/test/jank/form/bool/pass-bool.jank | 7 +++++++ compiler+runtime/test/jank/form/keyword/pass-keyword.jank | 4 ++++ compiler+runtime/test/jank/form/number/pass-number.jank | 4 ++++ compiler+runtime/test/jank/form/symbol/pass-symbol.jank | 4 ++++ 4 files changed, 19 insertions(+) create mode 100644 compiler+runtime/test/jank/form/bool/pass-bool.jank create mode 100644 compiler+runtime/test/jank/form/keyword/pass-keyword.jank create mode 100644 compiler+runtime/test/jank/form/number/pass-number.jank create mode 100644 compiler+runtime/test/jank/form/symbol/pass-symbol.jank diff --git a/compiler+runtime/test/jank/form/bool/pass-bool.jank b/compiler+runtime/test/jank/form/bool/pass-bool.jank new file mode 100644 index 000000000..3c80561bc --- /dev/null +++ b/compiler+runtime/test/jank/form/bool/pass-bool.jank @@ -0,0 +1,7 @@ +true +false + +(assert (= true true,)) +(assert (= false false,)) + +:success diff --git a/compiler+runtime/test/jank/form/keyword/pass-keyword.jank b/compiler+runtime/test/jank/form/keyword/pass-keyword.jank new file mode 100644 index 000000000..e4948f879 --- /dev/null +++ b/compiler+runtime/test/jank/form/keyword/pass-keyword.jank @@ -0,0 +1,4 @@ +(assert (= :a (keyword "a"))) +(assert (= :a, (keyword "a"))) + +:success diff --git a/compiler+runtime/test/jank/form/number/pass-number.jank b/compiler+runtime/test/jank/form/number/pass-number.jank new file mode 100644 index 000000000..53aa142c5 --- /dev/null +++ b/compiler+runtime/test/jank/form/number/pass-number.jank @@ -0,0 +1,4 @@ +(assert (= 1 1)) +(assert (= 1, 1)) + +:success diff --git a/compiler+runtime/test/jank/form/symbol/pass-symbol.jank b/compiler+runtime/test/jank/form/symbol/pass-symbol.jank new file mode 100644 index 000000000..a714074a6 --- /dev/null +++ b/compiler+runtime/test/jank/form/symbol/pass-symbol.jank @@ -0,0 +1,4 @@ +(assert (= 'a (symbol "a"))) +(assert (= 'a, (symbol "a"))) + +:success