使用plt方案导入结构

我突然发现一个简单的scheme应用程序有一个问题。

(define-struct book-category (id name books))

我尝试的是,在dataloader.ss中,使用

(provide book-category)

(require "dataloader.ss").

例如

(make-book-category 2 "test" '())

给我:

定义:使图书分类

另一方面,如果我在第二个文件中重新定义结构,它会告诉我: 所以,我想导入至少部分有效。但我仍然无法访问相关的函数。还有别的事要做吗?