[plt-scheme] Function names

I might be missing something obvious, but it doesn't look too useful
to have this behavior:

  Welcome to MzScheme version 200, Copyright (c) 1995-2002 PLT
  > (define (f) (lambda () 1))
  > (define ff (f))
  > ff
  #<procedure:STDIN::13>

Is there any reason for `define' (and `let') to not always add an
'inferred-name property so the name of `ff' would be a more
informative "#<procedure:ff>"?

-- 
          ((lambda (x) (x x)) (lambda (x) (x x)))          Eli Barzilay:
                  http://www.barzilay.org/                 Maze is Life!