[Logs-devel] Re: defsystem loses with cmucl on filenames of form "name.ext1.ext2" (fwd)

[Marco Antoniotti]

Hi

just by very quick inspection, it looks like the problem is the dot in  
the filename.  Obviously the new rules forced by CMUCL (which, I  
believe, are correct) do not work well with the file names you are  
using.

I'll have to look exactly where things are generated, but, I wouldn't  
be surprised if you stumbled on a similar problem with CMUCL regardless  
of MK:DEFSYSTEM.

Cheers

Marco








On May 17, 2006, at 2:06 PM, Jim Prewett wrote:

> Hi Suresh,
>
> I don't believe we've met, but we share the UNM TLD, so I'd bet we're
> neighbors :)  I was unaware that anyone at UNM was interested in LoGS
> (besides myself).  Just cureous, what are you doing with LoGS?
>
> While I am more than happy to support defsystem, I believe ASDF is  
> already
> reasonably supported.
>
> Is this a problem with defsystem, my filenames, or CMUCL?  ( I'll  
> agree,
> those filenames are a bit funky :)
>
> Jim
>
> ---------- Forwarded message ----------
> Date: Wed, 17 May 2006 05:23:23 -0600
> From: Suresh Madhu <address@hidden>
> To: address@hidden
> Cc: address@hidden, address@hidden
> Subject: defsystem loses with cmucl on filenames of form  
> "name.ext1.ext2"
>
> [please do not CC to any sourceforge or public lists where this
> message might be redisplayed with advertisments/etc]
>
> I am trying to write a defsystem file for the LoGS project. I got the
> latest snapshot and the date on the defsystem file is Nov 18
>
> I have a file called #p"Data_Sources/File-Follower_CMUCL.low.lisp"
>
> There are 4 cases, below , all 4 don't work. The fourth was most
> likely to work but is defeated because of ANSI changes. I submit this
> as a problem that needs to be solved
>
> 
> ;;  
> ----------------------------------------------------------------------
> CASE 1:
>
> (defsystem logs
>     :source-pathname *logs-source-dir*
>     :binary-pathname *logs-binary-dir*
>     :source-extension "lisp"
>     :components (
>         ...
>         (:module "Data_Sources"
>                   :components ( "File-Follower_CMUCL.low" ...
>                         ))
>         ...
>         ))
>
> CASE1 Failure:
> ;         
> home:scratch/extern/logs/Data_Sources/File-Follower_CMUCL.low.low.low
> ;        and binary file
> ;         
> fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.low.low
> ;        not found, not loading.
>
>
> Error in function MAKE::LOAD-FILE-OPERATION:
> Source file  
> "home:scratch/extern/logs/Data_Sources/File- 
> Follower_CMUCL.low.low.low" and binary file  
> "fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.low.low" do not exist.
>    [Condition of type SIMPLE-ERROR]
>
> Restarts:
>   0: [CONTINUE] Continue, ignoring missing files.
>   1:            Return NIL from load of "home:cmu/logs/sysdcl".
>   2: [ABORT   ] Return to Top-Level.
>
>
>
>
> 
> ;;  
> ----------------------------------------------------------------------
> CASE2:
>         (:module "Data_Sources"
>                           :components (
>                                (:file "File-Follower_CMUCL.low.lisp")
>                                 ... )
>
>
> CASE2 Failure:
>
> ;      - Source file
> ;         
> home:scratch/extern/logs/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp
> ;        and binary file
> ;         
> fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp
> ;        not found, not loading.
>
>
> Error in function MAKE::LOAD-FILE-OPERATION:
> Source file  
> "home:scratch/extern/logs/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp" and binary file  
> "fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp" do not exist.
>    [Condition of type SIMPLE-ERROR]
>
>
>
> 
> ;;  
> ----------------------------------------------------------------------
> CASE3:
>                  (:module "Data_Sources"
>                           :source-extension nil ;;  or "" ;;<---------------
>                           :components (
>                                        (:file "File-Follower_CMUCL.low.lisp")
>         ...
>                                        ))
>
>
> CASE3 Failure:
>
> ;      - Source file
> ;         
> home:scratch/extern/logs/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp
> ;        and binary file
> ;         
> fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp
> ;        not found, not loading.
>
>
> Error in function MAKE::LOAD-FILE-OPERATION:
> Source file  
> "home:scratch/extern/logs/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp" and binary file  
> "fasl:logs/binary-cmucl/19c/Data_Sources/File- 
> Follower_CMUCL.low.lisp.lisp.lisp" do not exist.
>    [Condition of type SIMPLE-ERROR]
>
> Restarts:
>   0: [CONTINUE] Continue, ignoring missing files.
>   1:            Return NIL from load of "home:cmu/logs/sysdcl".
>   2: [ABORT   ] Return to Top-Level.
>
> Debug  (type H for help)
>
>
> 
> ;;  
> ----------------------------------------------------------------------
> CASE 4:
>                  (:module "Data_Sources"
>                           :source-extension "low.lisp"
>                           :components (
>                                        (:file "File-Follower_CMUCL")
>         ...
>                                        ))
>
>
> CASE4 Failure:
>
> Error in function LISP::UNPARSE-UNIX-FILE:
>    Cannot specify a dot in a pathname type: "low.lisp"
>    [Condition of type SIMPLE-ERROR]
>
>
>
> --
> Regards
> Madhu
>
> PS - I recommend against telent clx in CMUCL and am still searching
> for unix:unix-errno in this snapshot (under linux)
--
Marco Antoniotti                                        
http://bioinformatics.nyu.edu/~marcoxa
NYU Courant Bioinformatics Group                tel. +1 - 212 - 998 3488
715 Broadway 10th FL                            fax. +1 - 212 - 998 3484
New York, NY, 10003, U.S.A.