diff options
| author | Ben Sima <ben@bsima.me> | 2021-06-07 16:34:36 -0400 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2021-11-26 13:47:35 -0500 |
| commit | 0ff0a23c8c7425b0d56b95e318c2087e74cb6605 (patch) | |
| tree | a5bfbaf70fa6a73c2e4b083cdefa5b2228153d98 /bs | |
| parent | 310275abdc61130c8cc77f7827163f136d57b63f (diff) | |
Get all scheme code compiling with Guile
Diffstat (limited to 'bs')
| -rw-r--r-- | bs/re.scm | 3 | ||||
| -rw-r--r-- | bs/repl.scm | 4 | ||||
| -rw-r--r-- | bs/test.scm | 5 |
3 files changed, 7 insertions, 5 deletions
@@ -21,8 +21,7 @@ ) (import (rnrs base) ;; TODO: port to srfi-115 - (only (ice-9 regex) - make-regexp)) + (ice-9 regex)) ;; (define I regexp/icase) ;; (define IGNORECASE regexp/icase) diff --git a/bs/repl.scm b/bs/repl.scm index 3932433..3bf1ca1 100644 --- a/bs/repl.scm +++ b/bs/repl.scm @@ -1,4 +1,6 @@ -(define-module (bs repl)) +(define-module (bs repl) + #:use-module (system repl command)) + ;; (use-modules (system repl common)) ;; (repl-default-option-set! ;; 'prompt diff --git a/bs/test.scm b/bs/test.scm index 9152760..a45bca1 100644 --- a/bs/test.scm +++ b/bs/test.scm @@ -12,5 +12,6 @@ ;; simple analog to clojure's `testing' (define-syntax testing - ((_ description ...) - ((begin (prn description) ...)))) + (syntax-rules () + ((_ description ...) + ((begin (prn description) ...))))) |