Bindings for the Apple System Log API
Module Asl
type level = [
| `Emerg(*

most severe, highest level

| `Alert
| `Crit
| `Err
| `Warning
| `Notice
| `Info
| `Debug(*

least severe, lowest level


Every message has an associated level, which is usually used for filtering.

module Client : sig ... end
module Message : sig ... end
val log : ?client:Client.t -> Message.t -> level -> string -> unit

Send a string to the logger with the given message context and level.

Creating a client is optional. If none is provided then a default thread-safe client is used. Note the internal locks can cause extra contention between threads. Note also the only way to have logs printed to stderr is to construct and use a Client.t.