在球拍中包含外部文件

Question

我想包括在给定的racket文件中定义的所有函数,以便获得与复制时相同的效果.有可能吗？

Answer 1

要从模块中导出函数,请使用provide,考虑一个文件"foo.rkt":

#lang racket
(define fortytwo 42)
(define (det a b c)
  (- (* b b) (* 4 a c)))
(provide (fortytwo det))

该文件"bar.rkt"现在可以导入以下定义"foo.rkt":

#lang racket
(require "foo.rkt")
(define (baz a b c)
  (+ (det a b c) (- c 4)))

您可以允许其他文件访问文件中定义的所有内容的另一种方法是使用(all-defined-out):

#lang racket
(define fortytwo 42)
(define (det a b c)
  (- (* b b) (* 4 a c)))
(provide (all-defined-out))

希望有所帮助.

Answer 2

您可以使用include如下:

创建一个名为的文件"foo.rkt",如下所示:

(define x 1)
(define y 2)

然后在另一个文件中:

#lang racket
(require racket/include)
(include "foo.rkt")
(+ x y)

你应该看到结果3.

您也可以查看文档include.