[Ecls-list] Re: Patches for defsystem and fixes for ECL

[Marco Antoniotti]

> From: Juan Jose Garcia Ripoll <worm at arrakis.es>
> Reply-To: worm at arrakis.es
> Date: Thu, 14 Nov 2002 20:13:09 -0800
> Cc: ecls-list at lists.sourceforge.net
> X-MIME-Autoconverted: from quoted-printable to 8bit by cat.nyu.edu id gAEJEcqs026012
> X-UIDL: %/8"!X at U"!EN4"!$+@"!
> 
> I think this time I made the patches right. There were some issures with the 
> only IN-PACKAGE form in defsystem.lisp, because it uses non-standard 
> arguments :nicknames, or something like that. I had also forgoten to add 
> support for invoking unix shell commands via #'si:system.

Ok.  Send me a set of patches.

> 
> The following had to be fixed in ECL
> 
> + FILENAME-NAMESTRING was broken

Ok.

> 
> + WITH-COMPILATION-UNIT now implemented and does nothing.

Ok.

> 
> + ENSURE-DIRECTORIES-EXIST now implemented.

Ok.

> 
> + New logical hostname "HOME:" has the translation
> 	("**/*.*" "~/**/*.*")

This is better implemented as

        `("**;*.*" ; <== Note the LP syntax.
           ,(merge-pathnames (make-pathname :directory '(:relative :wild-inferiors)
                                            :name :wild
                                            :type :wild)
                             (user-homedir-pathname)))

More verbose, but safer.

> + Wildcard-directory "**" now works... I hope. At least someting like 
> "home:dira;dirb;dirc;name.lisp" gets properly translated to 
> "~/dira/dirb/dirc/name.lisp".

See above.

Cheers

-- 
Marco Antoniotti ========================================================
NYU Courant Bioinformatics Group        tel. +1 - 212 - 998 3488
715 Broadway 10th Floor                 fax  +1 - 212 - 995 4122
New York, NY 10003, USA                 http://bioinformatics.cat.nyu.edu
                    "Hello New York! We'll do what we can!"
                           Bill Murray in `Ghostbusters'.