[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?

reply via email to

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