Project

General

Profile

« Previous | Next » 

Revision 7ee5f69e

Added by LĂ©lio Brun 9 months ago

corrections on loggers + spec in AST

View differences:

src/log.ml
15 15
    ~level:level p =
16 16
if !verbose_level >= level then
17 17
  if modulename="" then
18
    Format.eprintf "%t@?" p
18
    Format.eprintf "%t" p
19 19
  else
20
    Format.eprintf "[%s] @[%t@]@?" modulename p
20
    Format.eprintf "[%s] @[%t@]" modulename p
21 21

  
22 22
(* Local Variables: *)
23 23
(* compile-command:"make -C .." *)

Also available in: Unified diff