c-define doesn't expand properly

[alvatar]

c-define doesn't expand its code properly: functions called withing this form don't get their names processed in order to be the same as the function called.

(define (setup-hook) 0)

; Doesn't work: setup-hook isn't defined according to Blackhole
(c-define (c-setup) () int "setup_scheme_hook" "" (setup-hook))
; Works, but breaks easily
(c-define (c-setup) () int "setup_scheme_hook" "" (anygame_1#setup-hook))