1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
|
(* elabcontrol.sig
*
* (C) SML Fellowship
*)
signature ELAB_CONTROL =
sig
val etdebugging : bool ref
(* ElabType *)
val esdebugging : bool ref
(* ElabSig *)
val insdebugging : bool ref
(* Instantiate *)
val smdebugging : bool ref
(* Sigmatch *)
val ecdebugging : bool ref
(* ElabCore *)
val emdebugging : bool ref
(* ElabMod *)
val tcdebugging : bool ref
(* Typecheck *)
val unidebugging : bool ref
(* Unify *)
val ovlddebugging : bool ref
(* Overload *)
val instantiateSigs : bool ref
(* ElabMod, Control_MC *)
val etopdebugging : bool ref
val internals : bool ref
val markabsyn : bool ref
(* ElabCore, ElabTop, ElabUtil, Control_MC *)
val boxedconstconreps : bool ref
(* ConRep *)
val multDefWarn : bool ref
(* Instantiate, Control_MC (TopLevel/main/control.sml) *)
val shareDefError : bool ref
(* Instantiate, Control_MC *)
val valueRestrictionLocalWarn : bool ref
val valueRestrictionTopWarn : bool ref
val showTypeErrorCulprits : bool ref
end (* signature ELAB_CONTROL *)
|