fix compilation of quasiquote with splicing and improper lists
[bpt/guile.git] / testsuite / t-mutual-toplevel-defines.scm
1 (define (even? x)
2 (or (zero? x)
3 (not (odd? (1- x)))))
4
5 (define (odd? x)
6 (not (even? (1- x))))
7
8 (even? 20)