From d321ce33e6071a25e055b83c9d18c7d7b577fb34 Mon Sep 17 00:00:00 2001 From: Keryan Didier <keryan.didier@ocamlpro.com> Date: Thu, 13 Jun 2024 18:04:50 +0200 Subject: [PATCH] backward compatibility --- examples/suncities.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/examples/suncities.ml b/examples/suncities.ml index fd49f5a..73e3e13 100644 --- a/examples/suncities.ml +++ b/examples/suncities.ml @@ -404,7 +404,7 @@ let scene = sun_angle_z; blocks; shadows = []; - projection = fun Coord.{x;y;_} -> (x,y); + projection = fun ({x;y;_} : Coord.t) -> (x,y); } in let shadows = shadow_plane scene in