mdw-base.lisp: Export `case2' correctly.
authorMark Wooding <mdw@distorted.org.uk>
Wed, 20 Sep 2017 21:19:06 +0000 (22:19 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Wed, 20 Sep 2017 21:19:06 +0000 (22:19 +0100)
Alas, `optparse.lisp' miscompiles hopelessly if we don't do this.

mdw-base.lisp

index 774ea9f..aa14f27 100644 (file)
                               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