iitalics
/
geometra
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

remove redundant "window initialized" message

This commit is contained in:
tali 2024-01-19 19:01:31 -05:00
parent 231de4b245
commit 9162e9f3b4
1 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/s2/window.ml
View File

@ -7,14 +7,10 @@ type t = Sdl.window
let make ~title = let make ~title =
let flags = Sdl.Window.(opengl + resizable + hidden) in let flags = Sdl.Window.(opengl + resizable + hidden) in
let window = Sdl.create_window_exn
Sdl.create_window_exn ~w:1024 ~h:800
~w:1024 ~h:800 title
title flags
flags
in
info (fun m -> m "window initialized");
window
let event_loop window ~render = let event_loop window ~render =
let event = Sdl.Event.create () in let event = Sdl.Event.create () in