File: plugin_log.ml

package info (click to toggle)
frama-c 20161101%2Bsilicon%2Bdfsg-5
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 42,324 kB
  • ctags: 35,695
  • sloc: ml: 200,142; ansic: 31,465; makefile: 2,334; sh: 1,643; lisp: 259; python: 85; asm: 26
file content (15 lines) | stat: -rw-r--r-- 368 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
open Kernel

let main () =
  let dkey = register_category "foo-category" in
  result ~dkey "result with dkey";
  result "result";
  feedback ~dkey "feedback with dkey";
  feedback "feedback";
  debug ~level:0 ~dkey "debug (level 0) with dkey";
  debug ~level:0 "debug (level 0)";
  warning "warning";
  error "error";
  failure "failure"

let () = Db.Main.extend main