projects
/
mes.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
3cbadcd
)
scm: Add with-throw-handler hack.
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 26 Mar 2017 21:09:11 +0000
(23:09 +0200)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 26 Mar 2017 21:09:11 +0000
(23:09 +0200)
* module/mes/catch.mes (with-throw-handler): Add hack for Nyacc 0.75
module/mes/catch.mes
patch
|
blob
|
history
diff --git
a/module/mes/catch.mes
b/module/mes/catch.mes
index 18300040f29fceb61534c065c24c043298d214fc..baf174a1245bea45f958a33073f815b1384237ba 100644
(file)
--- a/
module/mes/catch.mes
+++ b/
module/mes/catch.mes
@@
-45,3
+45,5
@@
(define (throw key . args)
(let ((handler (fluid-ref %eh)))
(apply handler (cons key args))))
+
+(define with-throw-handler catch) ; FIXME: hack for Nyacc 0.75