[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Gcl-devel] ansi-test
From: |
Sam Steingold |
Subject: |
Re: [Gcl-devel] ansi-test |
Date: |
17 Dec 2002 11:52:14 -0500 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 |
> * In message <address@hidden>
> * On the subject of "Re: [Gcl-devel] ansi-test"
> * Sent on Tue, 17 Dec 2002 07:30:11 -0600
> * Honorable "Paul F. Dietz" <address@hidden> writes:
>
> Send me a list of tests you want explained and I'll add the comments.
at the very least you might replace ALPHANUMERICP.5.BODY (&c) with
(loop :for i :from 0 :below char-code-limit
:for x = (code-char i)
:unless (or (not (characterp x))
(if (or (digit-char-p x) (alpha-char-p x))
(alphanumericp x)
(not (alphanumericp x))))
:collect (list x :digit (digit-char-p x) :alpha (alpha-char-p x)
:alphanumericp (alphanumericp x)))
this at least makes it obvious what is being tested!
--
Sam Steingold (http://www.podval.org/~sds) running RedHat8 GNU/Linux
<http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/>
<http://www.mideasttruth.com/> <http://www.palestine-central.com/links.html>
What was the best thing before sliced bread?