/usr/lib/ocaml/lablgtk2/ml_glib.h is in liblablgtk2-ocaml-dev 2.18.3+dfsg-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 | /**************************************************************************/
/* Lablgtk */
/* */
/* This program is free software; you can redistribute it */
/* and/or modify it under the terms of the GNU Library General */
/* Public License as published by the Free Software Foundation */
/* version 2, with the exception described in file COPYING which */
/* comes with the library. */
/* */
/* This program is distributed in the hope that it will be useful, */
/* but WITHOUT ANY WARRANTY; without even the implied warranty of */
/* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
/* GNU Library General Public License for more details. */
/* */
/* You should have received a copy of the GNU Library General */
/* Public License along with this program; if not, write to the */
/* Free Software Foundation, Inc., 59 Temple Place, Suite 330, */
/* Boston, MA 02111-1307 USA */
/* */
/* */
/**************************************************************************/
/* $Id$ */
CAMLexport value copy_string_g_free (char *str); /* for g_strings only */
typedef value (*value_in)(gpointer);
typedef gpointer (*value_out)(value); /* should not trigger GC */
CAMLexport value Val_GList (GList *list, value_in);
CAMLexport value Val_GList_free (GList *list, value_in);
CAMLexport GList *GList_val (value list, value_out);
CAMLexport value Val_GSList (GSList *list, value_in);
CAMLexport value Val_GSList_free (GSList *list, value_in);
CAMLexport GSList *GSList_val (value list, value_out);
CAMLexport void ml_register_exn_map (GQuark domain, char *caml_name);
CAMLexport void ml_raise_gerror(GError *) Noreturn;
|