swrup/pellest
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

implement grid offset

Browse source
This commit is contained in:
pena 2023-01-15 00:48:47 +01:00 • committed by Swrup
parent 03933d3fd4
commit 8e2faf3b21
5 changed files with 141 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/ws.ml
View file

@ -35,8 +35,12 @@ let handle_client request client =
Dream.log "check_action error: %s" msg;
e
| Ok action' ->
Dream.log "check_action ok: %a" State.pp_action' action';
let state = State.perform_action state action' in
Dream.log "check_action ok: %a"
(Format.pp_print_list
~pp_sep:(fun fmt () -> Format.fprintf fmt " ; ")
State.pp_action' )
action';
let state = List.fold_left State.perform_action state action' in
User.set_state user_id state;
Ok action'
in