Class Sdebug.log

class ['a] log : 'a media -> object .. end

method level : int
method set_level : int -> unit
method media : 'a media
method print : ?level:int -> string -> unit