Fix for gcc warning -Wunused-value without triggering -Wunused-parameter

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@13735 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2012-09-07 06:06:00 +00:00
commit 2c74c90430
12 changed files with 23 additions and 24 deletions

View file

@ -578,7 +578,7 @@ extern "C" {
}
}
static swig_module_info *SWIG_Ocaml_GetModule() {
static swig_module_info *SWIG_Ocaml_GetModule(void *SWIGUNUSEDPARM(clientdata)) {
CAML_VALUE pointer;
pointer = callback(*caml_named_value("swig_find_type_info"), caml_val_int(0));

View file

@ -108,7 +108,7 @@ CAMLextern int64 Int64_val(caml_value_t v);
#endif
#define SWIG_NewPointerObj(p,type,flags) caml_val_ptr(p,type)
#define SWIG_GetModule(clientdata) SWIG_Ocaml_GetModule()
#define SWIG_GetModule(clientdata) SWIG_Ocaml_GetModule(clientdata)
#define SWIG_SetModule(clientdata, pointer) SWIG_Ocaml_SetModule(pointer)
#define SWIG_contract_assert(expr, msg) if(!(expr)) {failwith(msg);} else