0

这是代码:

class parser =

let test1 = function
| 1 -> print_int 1
| 2 -> print_int 2
| _ -> print_int 3 in

let test = function
| 1 -> print_int 1
| 2 -> print_int 2
| _ -> print_int 3 in

object(self)

end

这里是_tags

true: syntax(camlp4o)
true: package(deriving,deriving.syntax)
true: thread,debug,annot
true: bin_annot

这是编译命令:

ocamlbuild -use-ocamlfind test.native

这是编译错误:

Warning: tag "package" does not expect a parameter, but is used with parameter   "deriving,deriving.syntax"
Warning: tag "syntax" does not expect a parameter, but is used with parameter "camlp4o"
+ /usr/local/bin/ocamldep.opt -modules test.ml > test.ml.depends
File "test.ml", line 8, characters 0-3:
Error: Syntax error
Command exited with code 2.
Compilation unsuccessful after building 1 target (0 cached) in 00:00:00.

但是,当我使用这个时:

ocamlbuild test.native

然后代码就可以编译成功了...

4

1 回答 1

1

这是因为ocamlbuild -use-ocamlfind test.native指示编译器使用camlp4 解析器。它与标准的 OCaml 解析器有点不同。实际上,parser是camlp4中的一个关键字,所以你不能用它作为类名。改名就行了

于 2014-04-24T20:00:43.413 回答