use current-write-relative-directory to produce .zo without absolute paths for inferred procedure names
use current-write-relative-directory to produce .zo without absolute paths for inferred procedure names

svn: r4855

mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket,mafagafogigante/racket