diff options
Diffstat (limited to 'judge/core.ml')
| -rw-r--r-- | judge/core.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/judge/core.ml b/judge/core.ml index 0f665c2..259bc1e 100644 --- a/judge/core.ml +++ b/judge/core.ml @@ -28,7 +28,7 @@ module type GAME = sig val new_game : game - val turn : game -> player -> string -> game + val play : game -> player -> string -> game val s : game -> game_status val display_game : game -> (string * string) -> unit @@ -287,7 +287,7 @@ module Core (G: GAME) : CORE = struct p.s <- StandBy !game_time; | Play act, Thinking (time, beg_r) -> let end_r = Unix.gettimeofday () in - let new_g = G.turn (List.hd g.hist) pi act in + let new_g = G.play (List.hd g.hist) pi act in let new_s = G.s new_g in send_m p OK; send_m op (Play act); |