Fwd: [Openmcl-devel] Possible problem with host-namestring

[Gary King]

I think that the problem indicated below is legitimate. Is there a 
reason for OpenMCL's differing behavior (that I will work around in my 
own code) or is OpenMCL in the "wrong". Thanks in advance.

Begin forwarded message:

> From: Gary King <gwking at cs.umass.edu>
> Date: December 22, 2003 8:12:16 PM EST
> To: Gary Byers <gb at clozure.com>
> Cc: openmcl-devel <openmcl-devel at clozure.com>
> Subject: Re: [Openmcl-devel] Possible problem with host-namestring
> Reply-To: gwking at cs.umass.edu
>
> I think I'm now less confused <smile>.
>
> Start OpenMCL fresh and try:
>
> Welcome to OpenMCL Version (Beta: Darwin) 0.13.6!
> ? (host-namestring #4P"ccl:foo;bar.bat")
> "ccl:"
>
> Looking at the definition for host-namestring in MCL and OpenMCL shows 
> that, sure enough, OpenMCL appends a #\: to the return value. This 
> doesn't seem right to me but maybe it is. I'm happy to work around it 
> if this makes the rest of OpenMCL better.
>
> ;; MCL
> (defun host-namestring (path)
>   (let ((host (pathname-host path)))
>     (if (and host (neq host :unspecific)) host  "")))
>
> ;; OpenMCL
> (defun host-namestring (path)
>   (let ((host (pathname-host path)))
>     (if (and host (neq host :unspecific)) (%str-cat host ":") "")))
>
> Thanks,
> -- 
> Gary Warren King, Lab Manager
> EKSL East, University of Massachusetts * 413 577 0176
>
> "The incompetence of our adversaries has given us an exaggerated idea 
> of how much progress we have made in transforming our forces."
>     Loren B. Thompson of the independent Lexington Institute
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>
-- 
Gary Warren King, Lab Manager
EKSL East, University of Massachusetts * 413 577 0176

Until real software engineering is developed, the next best practice is 
to develop with a dynamic system that has extreme late binding in all 
aspects. The first system to really do this in an important way was 
Lisp.

-- Alan Kay
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: text/enriched
Size: 2370 bytes
Desc: not available
URL: <https://lists.clozure.com/pipermail/openmcl-devel/attachments/20040104/b27f4d17/attachment.bin>