aboutsummaryrefslogtreecommitdiffstats
path: root/lib/csc/format-test.csc
diff options
context:
space:
mode:
authorRose Hogenson <rhogenson@posteo.net>2023-05-01 07:56:42 -0700
committerRose Hogenson <rhogenson@posteo.net>2023-05-01 07:56:42 -0700
commita89d6c82e981fec7d6e4c975e083d2b9e04467ad (patch)
treed5445ceb797473dd45ac006c337d990e5dd6f0d4 /lib/csc/format-test.csc
parent112ce5291da35e54c38c4ff1d7a2408a64a98e71 (diff)
downloadchromatopelma-a89d6c82e981fec7d6e4c975e083d2b9e04467ad.tar.zst
Rewrite most of the compiler.
This represents a major step back in terms of functionality, and amount of code. The latter I think constitutes a major win. Next steps are to reimplement syntax-rules, call/cc, and call-with-values.
Diffstat (limited to 'lib/csc/format-test.csc')
-rw-r--r--lib/csc/format-test.csc26
1 files changed, 0 insertions, 26 deletions
diff --git a/lib/csc/format-test.csc b/lib/csc/format-test.csc
deleted file mode 100644
index 1906af6..0000000
--- a/lib/csc/format-test.csc
+++ /dev/null
@@ -1,26 +0,0 @@
-(define-library (csc format-test)
- (import (scheme base)
- (only (csc strings) str-quote)
- (only (csc testing) assert-equal test)
- (csc format))
- (begin
-
-
- (test sprintf-single-string
- (assert-equal "test-string" (sprintf "test-string")))
-
-
- (test sprintf-list
- (assert-equal "(1 2 3)" (sprintf "{}" '(1 2 3))))
-
-
- (test sprintf-complex
- (assert-equal "this (1 2 3) is 1 a bbb test" (sprintf "this {} is {} a {} test" '(1 2 3) 1 "bbb")))
-
-
- (test sprintf-escape-open
- (assert-equal "{" (sprintf "{{")))
-
-
- (test sprintf-escape-close
- (assert-equal "}" (sprintf "}}")))))