jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix #1505591 Throwing exceptions in extended directors

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9361 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2006-09-25 21:47:08 +00:00
commit da079c2d2b
4 changed files with 16 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Source/Modules/ocaml.cxx
View file

@ -295,7 +295,6 @@ public:
if( directorsEnabled() ) {
Printf( f_runtime, "#define SWIG_DIRECTORS\n");
Swig_insert_file("director.swg", f_directors_h);
}
/* Produce the enum_to_int and int_to_enum functions */
@ -347,6 +346,11 @@ public:
Printf( f_enumtypes_value, "]\n\n"
"type c_obj = c_enum_value c_obj_t\n" );
if (directorsEnabled()) {
// Insert director runtime into the f_runtime file (make it occur before %header section)
Swig_insert_file("director.swg", f_runtime);
}
SwigType_emit_type_table (f_runtime, f_wrappers);
/* Close all of the files */
Dump(f_directors_h,f_header);