Parent Directory | Revision Log | Patch
revision 1.2 by pfdietz, Mon Jul 4 13:16:07 2005 UTC | revision 1.3 by pfdietz, Mon Oct 24 11:50:43 2005 UTC | |
---|---|---|
# | Line 22 | Line 22 |
22 | t t) | t t) |
23 | ||
24 | (deftest base-string.5 | (deftest base-string.5 |
25 | :notes (:allow-nil-arrays) | :notes (:allow-nil-arrays :nil-vectors-are-strings) |
26 | (subtypep* '(array nil (*)) 'base-string) | (subtypep* '(array nil (*)) 'base-string) |
27 | nil t) | nil t) |
28 | ||
# | Line 30 | Line 30 |
30 | :notes (:nil-vectors-are-strings) | :notes (:nil-vectors-are-strings) |
31 | (subtypep* 'string 'base-string) | (subtypep* 'string 'base-string) |
32 | nil t) | nil t) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |