gcl-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Gcl-devel] some GCL bugs revealed by ansi test suite


From: Camm Maguire
Subject: Re: [Gcl-devel] some GCL bugs revealed by ansi test suite
Date: 20 Aug 2002 19:25:49 -0400

Greetings!

"Paul F. Dietz" <address@hidden> writes:

> 4. ASSOC-IF is not taking the required :KEY argument.
> 
> 5. When ASSOC-IF is called on a list in which one of the elements
>    is NIL, it does not ignore that element.
> 
>   Example:
> 
>    (ASSOC-IF #'EVENP '((1 . a) nil (3 . b) (4 . c) (6 . d)))
>       should yield (4 . c)
>       but instead is throwing an error.
> 
> 6, 7.  Same as 4, 5, but for ASSOC-IF-NOT.
> 
> 8, 9.  Same as 4, 5, but for RASSOC-IF.
> 
> 10, 11.  Same as 4, 5, but for RASSOC-IF-NOT.
> 

Done.  Please verify.

> 12. BUTLAST doesn't work on dotted lists.
> 
>    (BUTLAST (LIST* 1 2 3 4) 1) should yield (1 2)
>      but instead throws an error.
> 
> 13. NBUTLAST doesn't work on dotted lists (same as 12).
> 

Done.  Please verify. Should be cleared by last night's commit.

> 14. This expression
>  (let ((p (copy-list '(a 1 b 2)))
>         (foo nil))
>       (setf (getf p 'a (progn (setf foo t) 0)) 3)
>       (and
>        (eql (getf p 'a) 3)
>        (eql (getf p 'b) 2)
>        (eql
>       (loop
>           for ptr on p by #'cddr count
>             (not (member (car ptr) '(a b))))
>       0)
>        foo))
> 
> should evaluate to T, but (contrary to the standard) the third
> argument to the getf in the setf form is not being evaluated.
> (See the CLHS entry for GETF.)
> 

Done.  Please verify.  From my reading, this eval only takes place
from a getf in a setf.

> 15.  This is a tricky one.  As I read the standard, the :test or :test-not
>   function for SET-EXCLUSIVE-OR must preserve the order of the items being
>   compared.  That is, the first must be from the first list and the second
>   from the second list.  This is not being done -- the argument order is
>   getting reversed.
> 

Can you provide a specific example here?

Take care,


>       Paul
> 
> 
> _______________________________________________
> Gcl-devel mailing list
> address@hidden
> http://mail.gnu.org/mailman/listinfo/gcl-devel
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah




reply via email to

[Prev in Thread] Current Thread [Next in Thread]