17 lines
473 B
Text
17 lines
473 B
Text
|
%insert(mli) %{
|
||
|
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
|
||
|
exception InvalidDirectorCall of c_obj
|
||
|
%}
|
||
|
|
||
|
%insert(ml) %{
|
||
|
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
|
||
|
exception InvalidDirectorCall of c_obj
|
||
|
%}
|