Commit 6f721a9f authored by Pietro Abate's avatar Pietro Abate

[r2003-06-03 20:36:11 by cvscast] Empty log message

Original author: cvscast
Date: 2003-06-03 20:36:11+00:00
parent 82653996
......@@ -5,7 +5,7 @@
/* LICENCE for details. */
/***********************************************************************/
/* $Id: expat_stubs.c,v 1.1 2003/05/31 10:32:42 cvscast Exp $ */
/* $Id: expat_stubs.c,v 1.2 2003/06/03 20:36:11 cvscast Exp $ */
/* Stub code to interface Ocaml with Expat */
......@@ -106,6 +106,7 @@ create_ocaml_expat_parser(XML_Parser xml_parser)
* handlers and register it as global root.
*/
handlers = stat_alloc(sizeof *handlers);
*handlers = Val_unit;
register_global_root(handlers);
*handlers = alloc_tuple(NUM_HANDLERS);
for(i = 0; i < NUM_HANDLERS; i++) {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment