From a1606229e94a7286d494bf8eebbc53ad989fa42e Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sat, 2 Nov 2002 00:13:12 +0000 Subject: [PATCH] Fixed type in program-error symbol in some loops tests. --- ansi-tests/loop2.lsp | 4 ++-- ansi-tests/loop3.lsp | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/ansi-tests/loop2.lsp b/ansi-tests/loop2.lsp index 336679fe..f93c566a 100644 --- a/ansi-tests/loop2.lsp +++ b/ansi-tests/loop2.lsp @@ -76,12 +76,12 @@ (classify-error (loop for x in '(a b c) for x in '(d e f) collect x)) - programm-error) + program-error) (deftest loop.2.15 (classify-error (loop for (x . x) in '((a b) (c d)) collect x)) - programm-error) + program-error) (deftest loop.2.16 (loop for nil in nil do (return t)) diff --git a/ansi-tests/loop3.lsp b/ansi-tests/loop3.lsp index 9fe3051a..44ccd030 100644 --- a/ansi-tests/loop3.lsp +++ b/ansi-tests/loop3.lsp @@ -75,12 +75,12 @@ (classify-error (loop for x on '(a b c) for x on '(d e f) collect x)) - programm-error) + program-error) (deftest loop.3.15 (classify-error (loop for (x . x) on '((a b) (c d)) collect x)) - programm-error) + program-error) (deftest loop.3.16 (loop for nil on nil do (return t)) -- GitLab