17 lines
473 B
Plaintext
17 lines
473 B
Plaintext
%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
|
|
%} |