I think you just need to (import scheme chicken) instead of (import chicken).
On Jan 21, 2013, at 8:09 PM, Werner Schmierdorfer wrote: > Hi! > > I try the following in chicken-4.8.0.1: > > > (module rectest (make-foo foo-a foo-b) > (import chicken) > (define-record foo a b)) > > > …and csi prints the following output: > > #;1> (module rectest (make-foo foo-a foo-b) > (import chicken) > (define-record foo a b)) > > Warning: reference to possibly unbound identifier `foo' in: > Warning: foo? > > Warning: reference to possibly unbound identifier `quote' in: > Warning: foo? > > Error: module unresolved: rectest > > Call history: > > <syntax> (define84 foo-b-set! (##core#lambda (x val) > (##core#check (##sys#check-structure x (##core#quote foo... > <syntax> (##core#set! foo-b-set! (##core#lambda (x > val) (##core#check (##sys#check-structure x (##core#quote foo... > <syntax> (##core#lambda (x val) (##core#check > (##sys#check-structure x (##core#quote foo))) (##sys#block-set!...... > <syntax> [foo-b-set!] (##core#begin (##core#check > (##sys#check-structure x (##core#quote foo))) (##sys#block-set! x 2 val)... > <syntax> [foo-b-set!] (##core#check > (##sys#check-structure x (##core#quote foo))) > <syntax> [foo-b-set!] (##sys#check-structure x > (##core#quote foo)) > <syntax> [foo-b-set!] (##core#quote foo) > <syntax> [foo-b-set!] (##sys#block-set! x 2 val) > <syntax> (define84 foo-b (##core#lambda (x) > (##core#check (##sys#check-structure x (##core#quote foo))) (##sy...... > <syntax> (##core#set! foo-b (##core#lambda (x) > (##core#check (##sys#check-structure x (##core#quote foo))) (#...... > <syntax> (##core#lambda (x) (##core#check > (##sys#check-structure x (##core#quote foo))) (##sys#block-ref x 2)... > <syntax> [foo-b] (##core#begin (##core#check > (##sys#check-structure x (##core#quote foo))) (##sys#block-ref x 2)) > <syntax> [foo-b] (##core#check (##sys#check-structure > x (##core#quote foo))) > <syntax> [foo-b] (##sys#check-structure x > (##core#quote foo)) > <syntax> [foo-b] (##core#quote foo) > <syntax> [foo-b] (##sys#block-ref x 2) <-- > > > Is it possible (and if yes - how?) to export functions created by > define-record? > > > Greetings, Werner > _______________________________________________ > Chicken-users mailing list > [email protected] > https://lists.nongnu.org/mailman/listinfo/chicken-users _______________________________________________ Chicken-users mailing list [email protected] https://lists.nongnu.org/mailman/listinfo/chicken-users
