如何使用funset_avltree库？

Question

我正在尝试使用 funset_avltree 库，但编译器生成了无效的 C 代码。我正在使用 ATS/Postiats 版本 0.2.10.

我的代码相当简单：

(* ast.sats *)
staload "libats/SATS/funset_avltree.sats"

datatype ast =
  | ast_var of string

fun free_vars (ast : ast) :<> set string

(* ast.dats *)
#include "share/atspre_staload.hats"
staload "./ast.sats"
staload "libats/SATS/funset_avltree.sats"
dynload "libats/DATS/funset_avltree.dats"

implement free_vars (ast : ast) : set string =
  case+ ast of
  | ast_var name => funset_sing name

然而，编译器的输出相当混乱：

ast_dats.c:359:51: warning: implicit declaration of function 'S2EVar' is invalid
      in C99 [-Wimplicit-function-declaration]
ATSINSmove(tmpret0, PMVtmpltcstmat[0](funset_sing<S2EVar(4713)>)(tmp1)) ;
                                                  ^

ast_dats.c:359:39: error: use of undeclared identifier 'funset_sing'
ATSINSmove(tmpret0, PMVtmpltcstmat[0](funset_sing<S2EVar(4713)>)(tmp1)) ;
                                      ^

ast_dats.c:359:64: error: expected expression
ATSINSmove(tmpret0, PMVtmpltcstmat[0](funset_sing<S2EVar(4713)>)(tmp1)) ;
                                                               ^

我在 funset 和 funset_listord 中遇到了类似的错误。我一定是遗漏了一些微不足道的东西。我是否需要包含一些东西或将一些标志传递给编译器？

Answer 1

根本原因是您没有静态加载库提供的 AVL 树模板。

在错误信息中，PMVtmpltcstmat通常表示模板有问题。通常情况下，程序员会忘记包含模板，或者忘记提供模板变量。你是第一种情况。

请添加这一行，

staload _ = "libats/DATS/funset_avltree.dats"

静态加载模板，并使它们可供编译器使用。请在此处查看工作示例，https://glot.io/snippets/eiu6f3dd2r

此外，当您有 "global" 个需要评估的值时，需要 dynload。在您的情况下，您不需要 dynload avl 树库。另外，在你自己的文件ast.dats中，没有这样的全局值。您可以定义

#define ATS_DYNLOADFLAG 0

告诉编译器不要为ast.dats生成动态加载代码。

Answer 2

以下是 ATSLIB 中的示例：

https://github.com/githwxi/ATS-Postiats/blob/master/libats/ML/HATS/myfunset.hats

下面有一章是关于函数集和映射的书：

http://ats-lang.sourceforge.net/DOCUMENT/ATS2TUTORIAL/HTML/HTMLTOC/book1.html

目前是第12章：

http://ats-lang.sourceforge.net/DOCUMENT/ATS2TUTORIAL/HTML/HTMLTOC/c514.html

如何使用funset_avltree库？

How to use the funset_avltree library?

code-generation

compiler-errors

ats