From ca55e0ac6ae2348f1a090ddbee9493d3876b9f2b Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Tue, 26 Oct 2004 00:45:11 +0000 Subject: [PATCH] Removed dubious assertion in make-broadcast-stream.1 --- ansi-tests/make-broadcast-stream.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ansi-tests/make-broadcast-stream.lsp b/ansi-tests/make-broadcast-stream.lsp index 73767ead..eca5ff6a 100644 --- a/ansi-tests/make-broadcast-stream.lsp +++ b/ansi-tests/make-broadcast-stream.lsp @@ -13,7 +13,7 @@ ;; (assert (not (input-stream-p s))) (assert (open-stream-p s)) (assert (streamp s)) - (assert (eq (stream-element-type s) t)) + ;; (assert (eq (stream-element-type s) t)) (values (notnot (typep s 'stream)) (notnot (typep s 'broadcast-stream)) -- GitLab