From: Mark Wooding <mdw@distorted.org.uk>
Date: Wed, 20 Sep 2017 21:19:06 +0000 (+0100)
Subject: mdw-base.lisp: Export `case2' correctly.
X-Git-Url: https://git.distorted.org.uk/~mdw/lisp/commitdiff_plain/d9cfb3e0f486ebb403c2456ac5d8f0b2152dd255

mdw-base.lisp: Export `case2' correctly.

Alas, `optparse.lisp' miscompiles hopelessly if we don't do this.
---

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