open Swig open Extend_special_variables let f = new_ForExtensionNewName '() let s = f -> "extended_renamed" () as string let s2 = f -> "extended_renamed" (10) as string let _ = assert (s = "name:extended symname:extended_renamed wrapname: overname:__SWIG_0 decl:ForExtension::extended() fulldecl:char const * ForExtension::extended() parentclasssymname:ForExtensionNewName parentclassname:ForExtension") assert (s2 = "name:extended symname:extended_renamed wrapname: overname:__SWIG_1 decl:ForExtension::extended(int) fulldecl:char const * ForExtension::extended(int) parentclasssymname:ForExtensionNewName parentclassname:ForExtension") ;; let e = new_ExtendTemplateInt '() let _ = e -> "extending" ()