* testing commit of bzr.16

This commit is contained in:
Abdulaziz Ghuloum 2007-05-08 10:04:00 -04:00
parent 18e6ac04fa
commit 1948dd5942
1 changed files with 2 additions and 2 deletions

View File

@ -379,8 +379,8 @@
(unless label
(stx-error e "unbound identifier"))
(case type
[(lexical core-prim macro global local-macro global-macro
displaced-lexical)
[(lexical core-prim macro global local-macro
global-macro displaced-lexical)
(values type (binding-value b) id)]
[else (values 'other #f #f)])))]
[(syntax-pair? e)