Merge pull request #156 from petitchevalroux/fix-ocaml

Fix ocaml 4.04 compatibility
facebookarchive · Feb 8, 2017 · ec21095 · ec21095
2 parents 65e4790 + 10a3991
commit ec21095
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/external/ocamlgtk/src/ml_glib.c b/external/ocamlgtk/src/ml_glib.c
@@ -162,7 +162,7 @@ static value *lookup_exn_map (GQuark domain)
 static void ml_raise_gerror_exn(GError *, value *) Noreturn;
 static void ml_raise_gerror_exn(GError *err, value *exn)
 {
-  CAMLlocal2(b, msg);
+  value b, msg;
   g_assert (err && exn);
   msg = copy_string(err->message);
   b = alloc_small (3, 0);