Andy Wingo <wi...@pobox.com> skribis: > (define-syntax current-filename > (lambda (x) > "A macro that expands to the current filename: the filename that > the (current-filename) form appears in. Expands to #f if this > information is unavailable." > (false-if-exception > (pk 'canonicalized (canonicalize-path (pk 'filename (assq-ref > (syntax-source x) 'filename)))))))
What about not canonicalizing the file name? After all, C’s __FILE__ isn’t canonicalized in any way, and canonicalization is sometimes undesirable (you don’t necessarily want to dump the absolute path of a temporary source directory in binaries.) Thanks, Ludo’.
