diff --git a/graphics/ocaml-lablgl/files/patch-Togl_src_Togl_togl.c b/graphics/ocaml-lablgl/files/patch-Togl_src_Togl_togl.c
new file mode 100644
index 000000000000..6830d96579fc
--- /dev/null
+++ b/graphics/ocaml-lablgl/files/patch-Togl_src_Togl_togl.c
@@ -0,0 +1,11 @@
+--- Togl/src/Togl/togl.c.orig	2013-09-20 10:50:36 UTC
++++ Togl/src/Togl/togl.c
+@@ -96,7 +96,7 @@ static void (*SetClassProcsPtr)
+ /* pointer to Tk_SetClassProcs function in the stub table */
+ 
+ static void (*SetClassProcsPtr)
+-        _ANSI_ARGS_((Tk_Window, Tk_ClassProcs *, ClientData));
++        _ANSI_ARGS_((Tk_Window, const Tk_ClassProcs *, ClientData));
+ #endif
+ 
+ /*