From afc28140cdcec76e93cf874e34570f5cee221123 Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Fri, 3 Jun 2005 00:45:54 +0000 Subject: [PATCH] Relax make-sequence.error.15 since it's only specified to produce an error, not necessarily a type-error --- ansi-tests/make-sequence.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ansi-tests/make-sequence.lsp b/ansi-tests/make-sequence.lsp index 5086099e..6ef56a47 100644 --- a/ansi-tests/make-sequence.lsp +++ b/ansi-tests/make-sequence.lsp @@ -472,7 +472,7 @@ (deftest make-sequence.error.15 :notes (:result-type-element-type-by-subtype) (if (subtypep '(or (vector bit) (vector t)) 'vector) - (signals-error (make-sequence '(or (vector bit) (vector t)) 10 :initial-element 0) type-error) + (signals-error (make-sequence '(or (vector bit) (vector t)) 10 :initial-element 0) error) t) t) -- GitLab