Hi, Andy Wingo <wi...@pobox.com> skribis:
> On Thu 16 Feb 2012 22:34, l...@gnu.org (Ludovic Courtès) writes: > >> 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? > > That makes this recipe not work: > > (add-to-load-path (dirname (current-filename))) > > I think the canonicalize-path was added after Neil's concerns about > add-to-load-path. We could take it out if that's the thing to do; > dunno. Would it work to let the user call it themself if needed, like: (add-to-load-path (dirname (canonicalize-path (current-filename)))) Thanks, Ludo’.
