diff options
Diffstat (limited to 'modules/language/python/compile.scm')
| -rw-r--r-- | modules/language/python/compile.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm index 7ffe57a..151e0c2 100644 --- a/modules/language/python/compile.scm +++ b/modules/language/python/compile.scm @@ -3,6 +3,10 @@ #:use-module (ice-9 pretty-print) #:export (comp)) +(define-syntax call + (syntax-rules () + ((_ (f) . l) (f . l)))) + (define (fold f init l) (if (pair? l) (fold f (f (car l) init) (cdr l)) @@ -543,10 +547,6 @@ #`(let/ec ret #,code) code)))))) -(define-syntax call - (syntax-rules () - ((_ (f) . l) (f . l)))) - (define-syntax-rule (var v) (if (defined? 'v) (values) |