6 |
s is a structure class name or a structure class object. |
s is a structure class name or a structure class object. |
7 |
This is causing 95 ansi-test failures. |
This is causing 95 ansi-test failures. |
8 |
|
|
9 |
2. (sublis x y :test #'fn) is passing the arguments to fn in the |
2. (FIXED) (sublis x y :test #'fn) is passing the arguments to fn in the |
10 |
wrong order. The problem here is that the :key argument is being |
wrong order. The problem here is that the :key argument is being |
11 |
applied somewhat unusually, making the usual TEST macro not do |
applied somewhat unusually, making the usual TEST macro not do |
12 |
quite the right thing. ansi-tests: sublis.9 and sublis.10 |
quite the right thing. ansi-tests: sublis.9 and sublis.10 |
13 |
|
|
14 |
3. (nsublis x y :test #'fn) is passing the arguments to fn in the |
3. (FIXED) (nsublis x y :test #'fn) is passing the arguments to fn in the |
15 |
wrong order. Similar to bug #2. ansi-tests: nsublis.10 and nsublis.11 |
wrong order. Similar to bug #2. ansi-tests: nsublis.10 and nsublis.11 |
16 |
|
|
17 |
4. (last x n) is incorrectly signaling an error when n is a positive |
4. (FIXED) (last x n) is incorrectly signaling an error when n is a positive |
18 |
bignum. Instead, it should return x. ansi-tests: last.11, last.12 |
bignum. Instead, it should return x. ansi-tests: last.11, last.12 |
19 |
|
|
20 |
5. The map* functions should signal a type error when given an improper |
5. (FIXED) The map* functions should signal a type error when given an improper |
21 |
list. They do so, but the slots of the type error object don't |
list. They do so, but the slots of the type error object don't |
22 |
satisfy the property that the value in the datum slot is not of |
satisfy the property that the value in the datum slot is not of |
23 |
the type in the expected-type slot. ansi-tests: mapc.error.8, |
the type in the expected-type slot. ansi-tests: mapc.error.8, |
24 |
mapcar.error.8, mapcan.error.8, mapl.error.8, maplist.error.11, |
mapcar.error.8, mapcan.error.8, mapl.error.8, maplist.error.11, |
25 |
mapcon.error.8 |
mapcon.error.8 |
26 |
|
|
27 |
6. Similar to #5, but the error is for GET-PROPERTIES. ansi-tests: |
6. (FIXED) Similar to #5, but the error is for GET-PROPERTIES. ansi-tests: |
28 |
get-properties.error.[456] |
get-properties.error.[456] |
29 |
|
|
30 |
7. (SETF (GETF form1 form2 form3) form4) is evaluating the subforms |
7. (FIXED) (SETF (GETF form1 form2 form3) form4) is evaluating the subforms |
31 |
in the wrong order: form3 is being evaluated before (the subforms of) |
in the wrong order: form3 is being evaluated before (the subforms of) |
32 |
form1 and form2. ansi-tests: setf-getf.order.2 |
form1 and form2. ansi-tests: setf-getf.order.2 |
33 |
|
|
34 |
8. Similar to #5, but the error is for GETF. ansi-tests: getf.error.[45] |
8. (FIXED) Similar to #5, but the error is for GETF. ansi-tests: |
35 |
|
getf.error.[45] |
36 |
|
|
37 |
9. (FIXED) REMF is violating the requirement that the value of the place be |
9. (FIXED) REMF is violating the requirement that the value of the place be |
38 |
read out after all the other subforms of the REMF form are computed |
read out after all the other subforms of the REMF form are computed |
50 |
elt-adj-array.10, elt-displaced-array.1, elt-fill-pointer.[3468], |
elt-adj-array.10, elt-displaced-array.1, elt-fill-pointer.[3468], |
51 |
and elt,error.[45]). |
and elt,error.[45]). |
52 |
|
|
53 |
12. Coerce can't coerce a vector of characters into a base-string. |
12. (FIXED) Coerce can't coerce a vector of characters into a base-string. |
54 |
ansi-tests: fill.string.10 |
ansi-tests: fill.string.10 |
55 |
|
|
56 |
13. (partially FIXED) MAKE-SEQUENCE fails on type argument NULL, |
13. (FIXED) MAKE-SEQUENCE fails on type argument NULL, |
57 |
(CLASS-OF NIL), or (FIND-CLASS LIST). |
(CLASS-OF NIL), or (FIND-CLASS LIST). |
58 |
ansi-tests: make-sequence.57 |
ansi-tests: make-sequence.57 |
59 |
|
|
60 |
14. The datum and expected type fields of the type errors thrown by |
14. (partially FIXED; map.error.11 still fails) |
61 |
|
The datum and expected type fields of the type errors thrown by |
62 |
MAKE-SEQUENCE, MAP do not satisfy the constraint that the datum |
MAKE-SEQUENCE, MAP do not satisfy the constraint that the datum |
63 |
is not of type expected-type. ansi-tests: make-sequence.error.1, |
is not of type expected-type. ansi-tests: make-sequence.error.1, |
64 |
make-sequence.error.2, make-sequence.error.14, make-sequence.error.16, |
make-sequence.error.2, make-sequence.error.14, make-sequence.error.16, |
65 |
map.error.1, map.error.1a, map.error.11. |
map.error.1, map.error.1a, map.error.11. |
66 |
|
|
67 |
15. MAP fails on type argument NULL, (OR (VECTOR 5) (VECTOR 10)) |
15. (FIXED) MAP fails on type argument NULL, (OR (VECTOR 5) (VECTOR 10)) |
68 |
ansi-tests: map-null.1, map.48 |
ansi-tests: map-null.1, map.48 |
69 |
|
|
70 |
16. NREVERSE is broken on vectors of element type LISP:SIGNED-SHORT |
16. NREVERSE is broken on vectors of element type LISP:SIGNED-SHORT |
80 |
entire vector is returned rather than the aubsequence being assigned.) |
entire vector is returned rather than the aubsequence being assigned.) |
81 |
ansi-tests: subseq.order.[34] |
ansi-tests: subseq.order.[34] |
82 |
|
|
83 |
18. CONCATENATE fails on type argument of NULL, as does MERGE. |
18. (FIXED) CONCATENATE fails on type argument of NULL, as does MERGE. |
84 |
ansi-tests:. concatenate.24, merge-null.1, merge.error.6 |
ansi-tests:. concatenate.24, merge-null.1, merge.error.6 |
85 |
|
|
86 |
19, There are 140 symbols exported from the COMMON-LISP package that |
19, (partially FIXED; no-extra-symbols-exported-from-common-lisp still fails) |
87 |
|
There are 140 symbols exported from the COMMON-LISP package that |
88 |
should not be external in that package. |
should not be external in that package. |
89 |
ansi-tests: no-extra-symbols-exported-from-common-lisp |
ansi-tests: no-extra-symbols-exported-from-common-lisp |
90 |
all-exported-cl-class-names-are-valid |
all-exported-cl-class-names-are-valid |
165 |
21. The following macros are missing: (FIXED)define-compiler-macro |
21. The following macros are missing: (FIXED)define-compiler-macro |
166 |
(FIXED)define-setf-expander define-symbol-macro in-package. |
(FIXED)define-setf-expander define-symbol-macro in-package. |
167 |
ansi-tests: cl-macro-symbols.1 in-package.error.1 |
ansi-tests: cl-macro-symbols.1 in-package.error.1 |
168 |
dcf-macros define-setf-expander.error.1 |
dcf-macros define-setf-expander.error.1 (FIXED) |
169 |
define-setf-expander.[1234567] define-compiler-macro.error.[123] |
define-setf-expander.[1234567] (partially FIXED; define-setf-expander.7 |
170 |
|
still fails) |
171 |
|
define-compiler-macro.error.[123] |
172 |
define-compiler-macro.[12345678] define-symbol-macro.error.[123] |
define-compiler-macro.[12345678] define-symbol-macro.error.[123] |
173 |
documentation.symbol.setf.[12] |
documentation.symbol.setf.[12] |
174 |
|
|
247 |
when called on an invalid number of arguments. ansi-tests: |
when called on an invalid number of arguments. ansi-tests: |
248 |
destructuring-bind.error.[789] |
destructuring-bind.error.[789] |
249 |
|
|
250 |
45. No hash table with :key EQUALP. |
45. (FIXED) No hash table with :key EQUALP. |
251 |
ansi-tests: equalp.21 |
ansi-tests: equalp.21 |
252 |
|
|
253 |
46. EQUALP fails to properly compare hash tables. |
46. (partially FIXED; equalp.35 still fails) |
254 |
|
EQUALP fails to properly compare hash tables. |
255 |
ansi-tests: equalp.22 to equalp.35 |
ansi-tests: equalp.22 to equalp.35 |
256 |
|
|
257 |
47. The type error signaled by EVERY and related functions has |
47. (FIXED) The type error signaled by EVERY and related functions has |
258 |
the datum and expected-type slots switched. ansi-tests: |
the datum and expected-type slots switched. ansi-tests: |
259 |
every.error.1 notany.error.1 notevery.error.1 some.error.1 |
every.error.1 notany.error.1 notevery.error.1 some.error.1 |
260 |
|
|
274 |
ansi-tests: function-lambda-expression.[123] |
ansi-tests: function-lambda-expression.[123] |
275 |
function-lambda-expression.order.1 function-lambda-expression.error.[12] |
function-lambda-expression.order.1 function-lambda-expression.error.[12] |
276 |
|
|
277 |
52. Lambda forms are no longer of type function. |
52. (FIXED) Lambda forms are no longer of type function. |
278 |
ansi-tests: function.6 function.10 functionp.6 functionp.10 |
ansi-tests: function.6 function.10 functionp.6 functionp.10 |
279 |
|
|
280 |
53. Symbols are no longer functions. |
53. (FIXED) Symbols are no longer functions. |
281 |
ansi-tests: functionp.2 |
ansi-tests: functionp.2 |
282 |
|
|
283 |
54. Free special declarations do not apply to the init forms of a LET or LET*. |
54. Free special declarations do not apply to the init forms of a LET or LET*. |
313 |
|
|
314 |
64. Free special declarations in a LAMBDA form should not affect |
64. Free special declarations in a LAMBDA form should not affect |
315 |
the expressions in key, aux, or optional parameters. |
the expressions in key, aux, or optional parameters. |
316 |
ansi-tests: lambda.52 lambda.53 lambda.55 |
ansi-tests: lambda.5[234] |
317 |
|
|
318 |
65. The second argument to COMPILE is allowed to be a function; |
65. The second argument to COMPILE is allowed to be a function; |
319 |
not just a lambda expression. ansi-tests: lambda.55 lambda.56 |
not just a lambda expression. ansi-tests: lambda.5[56] |
320 |
|
|
321 |
66. COMPILE-FILE is incorrectly executing the code twice i |
66. COMPILE-FILE is incorrectly executing the code twice i |
322 |
an EVAL-WHEN form with both the :COMPILE-TOPLEVEL and |
an EVAL-WHEN form with both the :COMPILE-TOPLEVEL and |
326 |
environment in which the DEFMACRO form appears. |
environment in which the DEFMACRO form appears. |
327 |
ansi-tests: defmacro.3 defmacro.4 defmacro.12 defmacro.13 |
ansi-tests: defmacro.3 defmacro.4 defmacro.12 defmacro.13 |
328 |
|
|
329 |
68. (typep nil (find-class 'null)) ==> nil |
68. (FIXED) (typep nil (find-class 'null)) ==> nil |
330 |
See also bug #81. |
See also bug #81. |
331 |
ansi-tests: the.9 the.10 |
ansi-tests: the.9 the.10 |
332 |
|
|
397 |
two-way-stream. |
two-way-stream. |
398 |
ansi-tests: all-structure-classes-are-subtypes-of-structure-object |
ansi-tests: all-structure-classes-are-subtypes-of-structure-object |
399 |
|
|
400 |
79. The standardized generic function DOCUMENTATION should be a member |
79. (FIXED) The standardized generic function DOCUMENTATION should be a member |
401 |
of the class GENERIC-FUNCTION. |
of the class GENERIC-FUNCTION. |
402 |
|
|
403 |
80. (FIXED, please check) SUBTYPEP is not correctly determining that if a class X is a subclass |
80. (FIXED, please check) SUBTYPEP is not correctly determining that if a class X is a subclass |
478 |
in PCL that also showed up in SBCL and CMUCL. The function starts |
in PCL that also showed up in SBCL and CMUCL. The function starts |
479 |
returning NIL after a few calls. ansi-tests: *-CPL |
returning NIL after a few calls. ansi-tests: *-CPL |
480 |
|
|
481 |
93. READTABLE-CASE is undefined (and its SETF form) |
93. (partially FIXED; prin1.symbol.3 is still failing, but is a different |
482 |
|
bug) READTABLE-CASE is undefined (and its SETF form) |
483 |
ansi-tests: read-symbol.1[678] read-symbol.25 |
ansi-tests: read-symbol.1[678] read-symbol.25 |
484 |
readtable-case.* set-syntax-from-char-trait-* |
readtable-case.* set-syntax-from-char-trait-* |
485 |
print.symbol.[123456789] print-symbol.1[012] prin1.symbol.[123] |
print.symbol.[123456789] print.symbol.1[012] prin1.symbol.[123] |
486 |
|
|
487 |
|
93a. PRIN1 is not escape the symbol |1| properly when readtabkle-case |
488 |
|
is set to :UPCASE. ansi-tests: prin1.symbol.3 |
489 |
|
|
490 |
|
|
491 |
94. Binding *READ-SUPPRESS* to true doesn't totally suppress reading; |
94. Binding *READ-SUPPRESS* to true doesn't totally suppress reading; |