How to open a file given its pathname relative to the current batch script
Subject: How to open a file given its pathname relative to the current batch script
From: Manuel Fiorelli
Date: Tue, 24 Nov 2009 20:17:21 +0100
2009/11/24 Robert Dodier <robert.dodier at gmail.com>:
> (defun $extract_filename (e)
> ?(let ((l (car e)))
> ? ?(loop for x in l do
> ? ? ?(if (and (consp x) (eq (car (last x)) 'src))
> ? ? ? ?(return (second x))))))
>
> Then you should find extract_filename(x) returns the path + script name.
I'd like to define a function which generates relative pathnames using
pathname_merge.
:lisp (defun $relative_filename ($name) (namestring
#$filename_merge(extract_filename(x),name)$));
Unfortunately, the argument "name" of filename_merge isn't bound to
the parameter name of the function "relative_filename"
Manuel Fiorelli