source: project/chicken/trunk/tests/compiler-tests.scm @ 12102

Last change on this file since 12102 was 12102, checked in by felix winkelmann, 13 years ago

added test-case for declarations in modules

File size: 183 bytes
Line 
1;;;; compiler-tests.scm
2
3
4(module foo (bar)
5  (import scheme chicken)
6  (declare (hide bar))
7  (define (bar x) (+ x 1)))
8
9(assert (not (##sys#symbol-has-toplevel-binding? 'foo#bar)))
Note: See TracBrowser for help on using the repository browser.