(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* ml_decl -> 'status * std_ppcmds val pp_spec : (#status as 'status) -> ml_spec -> 'status * std_ppcmds val pp_open : (#status as 'status) -> string -> 'status * std_ppcmds