summaryrefslogtreecommitdiff
path: root/modules/language/python/try.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/language/python/try.scm')
-rw-r--r--modules/language/python/try.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/modules/language/python/try.scm b/modules/language/python/try.scm
index 68a9b5d..50ca23f 100644
--- a/modules/language/python/try.scm
+++ b/modules/language/python/try.scm
@@ -56,6 +56,11 @@
(apply c k l)))))
(define-syntax handler
+ (lambda (x)
+ (syntax-case x ()
+ ((_ . l) #'(handler_ . l)))))
+
+(define-syntax handler_
(syntax-rules (=>)
((handler ecx)
(m