78fef8466a
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5202 626c5289-ae23-0410-ae9c-e8d60b6d4f22
21 lines
No EOL
511 B
Text
21 lines
No EOL
511 B
Text
%insert(mli) %{
|
|
type c_obj = c_enum_tag c_obj_t
|
|
|
|
exception BadArgs of string
|
|
exception BadMethodName of c_obj * string * string
|
|
exception NotObject of c_obj
|
|
exception NotEnumType of c_obj
|
|
exception LabelNotFromThisEnum of c_obj
|
|
|
|
val invoke : c_obj -> (string -> c_obj -> c_obj)
|
|
%}
|
|
|
|
%insert(ml) %{
|
|
type c_obj = c_enum_tag c_obj_t
|
|
|
|
exception BadArgs of string
|
|
exception BadMethodName of c_obj * string * string
|
|
exception NotObject of c_obj
|
|
exception NotEnumType of c_obj
|
|
exception LabelNotFromThisEnum of c_obj
|
|
%} |