scheme - 如何在不打印出其顶级表达式的情况下将文件设为 `require`？

Question

文件a.rkt:

#lang racket
(provide f)
(define (f) 10)
(f)

文件b.rkt:

#lang racket
(require "a.rkt")

然后当我运行b.rkt时，我会得到f，这就是我想要的。但是 10 也会打印在我的 REPL 中，这是我不想要的。

如果我的 REPL 上没有打印 10，我如何require 文件 a.rkt？

谢谢

Answer 1

在 a.rkt 的 module 子句中包含对 f 的调用:

#lang racket
(provide f)
(define (f) 10)
(module+ main
  (f))

module+ main 部分的表单只会在您直接运行a.rkt 时执行，而不会在您require 时执行。

有关详细信息，请参阅 here .