Up
module
Translclass
:
sig
#
val
transl_class :
Ident
.
t
list
->
Ident
.
t
->
string list
->
Typedtree
.
class_expr
->
Asttypes
.
virtual_flag
->
Lambda
.
lambda
#
type
error =
#
| Illegal_class_expr
#
| Tags
of
string * string
#
exception
Error
of
Location
.
t
*
error
#
val
report_error :
Format
.
formatter
->
error
->
unit
end