module Syslog: sig
.. end
type
options =
| |
LOG_PID |
| |
LOG_CONS |
| |
LOG_NDELAY |
| |
LOG_ODELAY |
| |
LOG_NOWAIT |
type
facility =
| |
LOG_KERN |
| |
LOG_USER |
| |
LOG_MAIL |
| |
LOG_NEWS |
| |
LOG_UUCP |
| |
LOG_DAEMON |
| |
LOG_AUTH |
| |
LOG_CRON |
| |
LOG_LPR |
| |
LOG_LOCAL0 |
| |
LOG_LOCAL1 |
| |
LOG_LOCAL2 |
| |
LOG_LOCAL3 |
| |
LOG_LOCAL4 |
| |
LOG_LOCAL5 |
| |
LOG_LOCAL6 |
| |
LOG_LOCAL7 |
type
level =
| |
LOG_EMERG |
| |
LOG_ALERT |
| |
LOG_CRIT |
| |
LOG_ERR |
| |
LOG_WARNING |
| |
LOG_NOTICE |
| |
LOG_INFO |
| |
LOG_DEBUG |
val setlogmask : level list -> level list
val openlog : ?ident:string ->
options list ->
facility -> unit
val closelog : unit -> unit
val syslog : ?facility:facility ->
level ->
('a, unit, string, unit) Pervasives.format4 -> 'a
val log_upto : level -> level list