1(require-library import-library-test1) 2 3(module bar (xcase) 4 (import scheme (chicken base) foo) 5 (assert (equal? '(123) (foo))) 6 (assert (= 2 (xcase 1 ((1) 2))))) 7 8(import bar) 9(assert (= 2 (xcase 1 ((1) 2)))) 10