summaryrefslogtreecommitdiff
path: root/modules/language/python/module/_python.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/module/_python.scm')
-rw-r--r--modules/language/python/module/_python.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/modules/language/python/module/_python.scm b/modules/language/python/module/_python.scm
index 531a6b5..6db3cf1 100644
--- a/modules/language/python/module/_python.scm
+++ b/modules/language/python/module/_python.scm
@@ -55,7 +55,11 @@
(define-syntax-rule (aif it p x y) (let ((it p)) (if it x y)))
-(define vars py-dict)
+(define (vars x)
+ (for ((k v : x)) ((l '()))
+ (cons (cons k v) l)
+ #:final
+ (dict l)))
(define (repr x) ((@ (guile) format) #f "~a" x))
(define abs py-abs)