summaryrefslogtreecommitdiff
path: root/src/guile/srfi
diff options
context:
space:
mode:
Diffstat (limited to 'src/guile/srfi')
-rw-r--r--src/guile/srfi/srfi-64.upstream.scm7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/guile/srfi/srfi-64.upstream.scm b/src/guile/srfi/srfi-64.upstream.scm
index 4ad9ccb..15de1f1 100644
--- a/src/guile/srfi/srfi-64.upstream.scm
+++ b/src/guile/srfi/srfi-64.upstream.scm
@@ -24,9 +24,12 @@
(chicken
(require-extension syntax-case))
(guile
- (use-modules (ice-9 syncase) (srfi srfi-9)
+ (use-modules (srfi srfi-9)
;;(srfi srfi-34) (srfi srfi-35) - not in Guile 1.6.7
- (srfi srfi-39)))
+ (srfi srfi-39))
+ (cond-expand ((not guile-2)
+ (ice-9 syncase))
+ (else (begin))))
(sisc
(require-extension (srfi 9 34 35 39)))
(kawa