Custom Query (1030 matches)

I think that DIRECTORY is out of compliance with the (albeit fuzzy in this regard) ANSI CL as well as the CCL documentation for said function.

According to the ANSI CL, DIRECTORY should return "files", and by "files" it is pretty clear it does not refer to directories. The spec gives plenty of wiggle room for extensions, however.

CCL provides the extension keyword options :DIRECTORIES and :FILES to specify whether directories and/or files are considered. :DIRECTORIES should default to nil according to the CCL docs (and my interpretation of ANSI CL compliance) but actually defaults to T (from usage results and source code inspection.) Thus the bare, naked usage of DIRECTORY, such as (DIRECTORY "*") will provide directories, if any are found, in the results.

If CCL's DIRECTORY defaults to :DIRECTORY nil, it would be in compliance as far as this point goes. However, I think there is further work to ensure that DIRECTORY (and related functions like PROBE-FILE) are consistent and compliant in the treatment of pathnames.

That will be the subject of a follow up either here or the the mailing list.

Man do I feel like a nit picking Lisper now!

Consider the following code, which is a simplified version of stuff that can be found in CL-Yacc:

(defstruct item x)
(defstruct (sub-item (:include item) (:conc-name item-)) y)

The ANSI CL spec explicitly states that this is allowed, in the description of :CONC-NAME in the description of DEFSTRUCT. However, CCL generates a warning:

;Compiler warnings for "/home/pps/jch/struct-test.lisp" :
;   In an anonymous lambda form at position 18: Duplicate definitions of ITEM-X, in this file

It would appear that CCL generates correct code, but I believe that this is by accident.

If I DELETE-PACKAGE a package, which is the current package, I get

Error: #<Deleted Package> is a deleted package . While executing: #<error printing #<Recursive printing error> #x30004001A4BE> #x3000400CD6EE>, in process listener(1).

And CCL ends up in the kernel debugger, when i try to call functions with unqualified names.