diff options
| author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-09-03 21:00:18 +0200 |
|---|---|---|
| committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-09-03 21:00:18 +0200 |
| commit | d75a196fe299e3661e23d6f216008ab49660edec (patch) | |
| tree | 8f6b30e92d6cfc27928d8efe5aac483f2023b0c8 /modules/language/python/def.scm | |
| parent | 71312b2a7a233350a67c8ded472ba4f04d5ae721 (diff) | |
encoding libraries added
Diffstat (limited to 'modules/language/python/def.scm')
| -rw-r--r-- | modules/language/python/def.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/modules/language/python/def.scm b/modules/language/python/def.scm index 1f527e9..569023c 100644 --- a/modules/language/python/def.scm +++ b/modules/language/python/def.scm @@ -89,7 +89,7 @@ (if (and (pair? u12345678) (not (keyword? (car u12345678)))) (raise (ArgumentError "too many arguments to function"))) - code ...)) + (let () code ...))) (with-syntax ((kw (if (null? kw) (datum->syntax x (gensym "kw")) (car kw))) @@ -107,7 +107,7 @@ ...) (let ((ww ww*) (kw (pytonize kw))) - code ...))))))))))))) + (let () code ...)))))))))))))) (define-syntax-rule (def (f . args) code ...) (define f (lam args code ...))) |