diff options
Diffstat (limited to 'share')
| -rw-r--r-- | share/txr/stdlib/match.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/match.tl b/share/txr/stdlib/match.tl index d8af1baf..91885472 100644 --- a/share/txr/stdlib/match.tl +++ b/share/txr/stdlib/match.tl @@ -751,7 +751,7 @@ ^(progn (sethash *match-macro* ',name (lambda (,args) - (mac-param-bind ,args + (mac-param-bind *match-form* (,name-dummy ,*destructuring-args) ,args ,*body))) ',name))) |