Ticket #1482: two-should-not.scm

File two-should-not.scm, 208 bytes (added by snoewchen, 8 years ago)

Example referenced by my comment

Line 
1(define-interface iface-a (some-a))
2(define-interface iface-b (some-b))
3
4(module two-should-not (
5 (interface: iface-a iface-b))
6 (import scheme (chicken base))
7
8 (define some-a (lambda ()
9 (print "a"))))