From dbcf65c8a50e1b6ecefdd4d5d31e602109f86e93 Mon Sep 17 00:00:00 2001 From: Michael Dales Date: Thu, 11 Sep 2025 08:37:40 +0100 Subject: [PATCH] Update for final Picture API in Claudius --- flying_camels/bin/main.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/flying_camels/bin/main.ml b/flying_camels/bin/main.ml index c8c53ad..6ac8cc7 100644 --- a/flying_camels/bin/main.ml +++ b/flying_camels/bin/main.ml @@ -31,8 +31,7 @@ let tick t s _f _e = let fb = Framebuffer.init (Screen.dimensions s) (fun _ _ -> 0) in let img = (Screen.pictures s).(0) in let w, h = Screen.dimensions s in - let img_w = Picture.original_width img - and img_h = Picture.original_height img in + let img_w, img_h = Picture.dimensions img in let points = generate_points (Screen.dimensions s) |> move_points t in