3

我有一个模块导出nat/1以测试/生成自然数：

:- module nat.

:- interface.

:- import_module int.

:- pred nat(int).
:- mode nat(in) is det.
:- mode nat(out) is multi.

:- implementation.

:- pragma promise_pure(nat/1).
nat(_::in).
nat(0::out).
nat(X::out) :- nat(Y), X = Y + 1.

和同一目录中的主模块进行尝试：

:- module main.

:- interface.
:- import_module io.

:- pred main(io__state::di, io__state::uo) is cc_multi.

:- implementation.
:- import_module nat.

main(!IO) :- nat(X), print(X, !IO).

我运行mmc --make-int nat.m它成功生成了接口文件，但是当我运行时mmc main.m出现以下错误：

/usr/bin/ld: main.o: in function `<predicate 'main'/2 mode 0>':
main.c:(.text+0x45): undefined reference to `<predicate 'nat.nat'/1 mode 1>'
collect2: error: ld returned 1 exit status

我正在使用 MMC version 20.06.1, on x86_64-pc-linux-gnu。

我错过了一些明显的东西吗？代码改进也非常受欢迎。

4

1 回答 1

3

在“mmc --make-int nat.m”之后，需要运行的命令不是“mmc main.m”，而是“mmc main.m nat.m”。前者只编译main.m，而后者也编译 nat.m。两者都尝试从生成的目标文件构建可执行文件，但前者会失败，因为“nat”谓词的定义将在它不生成的目标文件中。

通常，与其尝试手动管理接口文件、目标文件和可执行文件的创建，不如使用自动构建系统更容易：mmake 脚本或 mmc --make。

至于代码改进，我建议用简单的 io 替换 io__state，这要短得多。我们在 io.m 中添加了“io”作为“状态”类型的同义词，专门使这成为可能。

于 2021-04-05T04:05:36.503 回答