Ocaml + oasis +自定义模块，如何编译

Question

所以我有以下文件:

_oasis:

OASISFormat: 0.4
Name:        PongBattleServer
Version:     0.1.0
Synopsis:    Server for handling multi-player pong games
Authors:     Jason Miesionczek
License:     MIT
Plugins:     META (0.4), DevFiles (0.4)
Executable pongserver
  Path:       src
  BuildTools: ocamlbuild
  MainIs:     main.ml

main.ml:

open Players;;
let () =
    let mgr = new player_manager

players.ml:

type player =
    {
        name: string;
        score: int;
    }
class player_manager =
    object (self)
        val mutable player_list = ( [] : player list)
        method add p =
            player_list <- p :: player_list
    end;;

当我运行make时，我得到这个错误:

ocaml setup.ml -build 
/home/araxia/.opam/system/bin/ocamlfind ocamldep -modules src/main.ml > src/main.ml.depends
+ /home/araxia/.opam/system/bin/ocamlfind ocamldep -modules src/main.ml > src/main.ml.depends
File "src/main.ml", line 4, characters 32-32:
Error: Syntax error
Command exited with code 2.
E: Failure("Command ''/usr/bin/ocamlbuild' src/main.byte -tag debug' terminated with error code 10")
make: *** [build] Error 1
Makefile:7: recipe for target 'build' failed

我是新的ocaml和绿洲等，我做错了什么?

Answer 1

这与Oasis无关，只是当你写

let () =
  let mgr = new player_manager

OCaml需要一个in关键字，因为let要么引入一个全局变量，要么引入一个局部变量，然后你需要一个let var = expr in expr，没有其他。

用

代替

let () =
  let mgr = new player_manager in ()

现在，因为你没有做任何与mgr