From e84ba37fb2e00b6bf8e22046349b1bab58d94fb4 Mon Sep 17 00:00:00 2001 From: pfdietz Date: Thu, 8 May 2003 11:31:44 +0000 Subject: [PATCH] Fixed the &REST specified in VALUES type specs to be consistent with how &REST parameter type specifiers are specified in FUNCITON type specs. --- ansi-tests/the.lsp | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/ansi-tests/the.lsp b/ansi-tests/the.lsp index f59e9a9..390c93e 100644 --- a/ansi-tests/the.lsp +++ b/ansi-tests/the.lsp @@ -99,12 +99,20 @@ 1 1) (deftest the.14 - (the (values &rest (cons t (cons t null))) (values 'a 'b)) + (the (values &rest t) (values 'a 'b)) a b) (deftest the.15 - (the (values &rest (cons symbol (cons symbol null))) (values 'a 'b)) + (the (values &rest symbol) (values 'a 'b)) a b) (deftest the.16 (the (values &rest null) (values))) + +(deftest the.17 + (the (values symbol integer &rest null) (values 'a 1)) + a 1) + +(deftest the.18 + (the (values symbol integer &rest t) (values 'a 1 'foo '(x y))) + a 1 foo (x y)) -- GitLab