[racket] obtaining name of module-level binding

[Galler]

Is there a function or syntax to obtain the module-level binding of a 
function?

For example:
(define (my-function)
  (display 
(some-useful-function-which-captures-name-of-module-level-binding)))

;-> 'my-function


Thanks very much.

R./
Zack
____________________
 Racket Users list:
 http://lists.racket-lang.org/users