X-Git-Url: https://git.distorted.org.uk/~mdw/lisp/blobdiff_plain/77f935dafbb63f1674a3df832972fda67c10e3d6..b59116d4852b98693178ff0d98b99dc690514c69:/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