导入模块的方案语法是什么（尤其是诡计）？

Question

如何在 Scheme 中导入模块（尤其是 guile）？

如何在scheme中创建一个模块并将其导入到另一个脚本中？导入模块时应该如何编译脚本，必须传递的命令行参数是什么？如果模块在另一个目录中，如何导入？

Answer 1

让我们创建一个模块 test_module.scm，其中包含以下代码，其位置为 /some/dir，

(define-module (test_module)
    #: export (square
               cube))

(define (square a)
    (* a a))
(define (cube a)
    (* a a a))

这里我们使用语法创建了一个模块：

(define-module (name-of-the-module)
    #: export (function1-to-be-exported
               function2-to-be-exported))
;; rest of the code goes here for example: function1-to-be-exported

现在让我们创建一个脚本，导入我们创建的名为 use_module.scm 的模块，其中包含此代码，位于当前目录中。

(use-modules (test_module))
(format #t "~a\n" (square 12))

这里我们使用了使用语法的模块：

(use-modules (name-of-the-module))
;; now all the functions that were exported from the 
;; module will be available here for our use

现在进入编译部分，我们必须将GUILE_LOAD_PATH设置到/some/dir位置，然后编译脚本。

现在假设 test_module.scm 和 use_module.scm 都在同一目录中，然后执行以下操作：

$ GUILE_LOAD_PATH=. guile use_module.scm

但如果模块存在于 /some/dir:

中，通常会这样做

$ GUILE_LOAD_PATH=/some/dir guile code.scm

p.s。更简单的方法是编写脚本，使用 add-to-load-path 告诉 guile 模块的位置。现在我们可以编译而不用担心环境变量了。

(add-to-load-path "/some/dir")
(use-modules (name-of-the-module))
;; rest of the code

导入模块的方案语法是什么（尤其是诡计）？

What is the scheme syntax to import modules (guile especially)?

scheme

lisp

guile