ffi/unsafe/obj: fix use of ivar in rator position

Merge to v5.3.4
(cherry picked from commit fff88eeb92)
This commit is contained in:
Matthew Flatt 2013-04-12 14:19:20 -06:00 committed by Ryan Culpepper
parent 1850b4bbd4
commit fd4f374195

View File

@ -664,7 +664,7 @@
[(set! _ val)
(syntax/loc stx (set-ivar! self sym val))]
[(_ arg ...)
(quasisyntax/loc stx (#,(quasisyntax/loc #'sym #'(get-ivar self sym))
(quasisyntax/loc stx (#,(quasisyntax/loc #'sym (get-ivar self sym))
arg ...))]
[_ (quasisyntax/loc #'sym (get-ivar self sym))])))))