Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

ocp-jslib: remove debug messages

  • Loading branch information...
commit 6c19676dbdb7e8bd068b2a8ae396ed8ac9cd4816 1 parent da99a6e
Fabrice Le Fessant authored
Showing with 2 additions and 0 deletions.
  1. +2 −0  ocp-jslib/graphics.ml
2  ocp-jslib/graphics.ml
View
@@ -36,9 +36,11 @@ let get_state () =
match !state with
None -> raise (Graphic_failure "Not initialized")
| Some s ->
+(*
Printf.fprintf stderr "state pos %d %d\n" s.x s.y;
Printf.fprintf stderr "state screen %d %d\n" s.width s.height;
Printf.fprintf stderr "state color %d\n" s.color;
+*)
s
let raw_set_color color =
Please sign in to comment.
Something went wrong with that request. Please try again.