Verified Commit b734520e authored by Vladimir Sedach's avatar Vladimir Sedach
Browse files

Fix unneeded expressionization of RETURN of LOCALLY

parent cf4cab20
......@@ -299,7 +299,7 @@ invocations or not.")
,@declarations
,@(butlast body)
(return-from ,tag ,(car (last body))))))
(progn
((progn locally)
`(progn ,@(butlast (cdr form))
(return-from ,tag ,(car (last (cdr form))))))
(switch
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment