/[gcl]/gcl/ansi-tests/rt.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/rt.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by pfdietz, Thu Mar 6 03:59:34 2003 UTC revision 1.7 by pfdietz, Tue Apr 22 00:30:16 2003 UTC
# Line 114  them.") Line 114  them.")
114    "Like EQUALP, but doesn't do case conversion of characters.    "Like EQUALP, but doesn't do case conversion of characters.
115     Currently doesn't work on arrays of dimension > 2."     Currently doesn't work on arrays of dimension > 2."
116    (cond    (cond
117       ((eq x y) t)
118     ((consp x)     ((consp x)
119      (and (consp y)      (and (consp y)
120           (equalp-with-case (car x) (car y))           (equalp-with-case (car x) (car y))

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26