~ chicken-r7rs (master) 8a0d4f049757f438aa2de79c973c08095b964ba7

commit 8a0d4f049757f438aa2de79c973c08095b964ba7
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Sun Jan 26 00:43:51 2014 +0000
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Sun Jan 26 00:43:51 2014 +0000

    Add (not <req>) cond-expand syntax

diff --git a/r7rs-compile-time.scm b/r7rs-compile-time.scm
index ad24c86..854df7d 100644
--- a/r7rs-compile-time.scm
+++ b/r7rs-compile-time.scm
@@ -45,6 +45,7 @@
   (define (check test)
     (match test
       ('else #t)
+      (('not test) (not (check test)))
       (('and tests ...) (every check tests))
       (('or tests ...) (any check tests))
       (('library name) (locate-library name 'cond-expand))