X-Git-Url: https://git.distorted.org.uk/~mdw/lisp/blobdiff_plain/209dc75acf6ca1b236324bbad404070a88f99851..813da880d2d77f04ea623f426d543d298528f967:/mdw-base.lisp diff --git a/mdw-base.lisp b/mdw-base.lisp index 774ea9f..aa14f27 100644 --- a/mdw-base.lisp +++ b/mdw-base.lisp @@ -342,7 +342,7 @@ forms)))) clauses))))) -(export 'caase2) +(export 'case2) (defmacro case2 (vform &body clauses) "VFORM is a form which evaluates to two values, SCRUTINEE and ARGUMENT. The CLAUSES have the form (CASES ([[SCRUVAR] ARGVAR]) FORMS...), where a