From: "Richard W.M. Jones" <rich@annexia.org>
To: "Soegtrop, Michael" <michael.soegtrop@intel.com>
Cc: "caml-list@inria.fr" <caml-list@inria.fr>
Subject: Re: [Caml-list] Question on Printf wrappers
Date: Sun, 14 Aug 2016 10:17:19 +0100 [thread overview]
Message-ID: <20160814091719.GE27249@annexia.org> (raw)
In-Reply-To: <0F7D3B1B3C4B894D824F5B822E3E5A172CF39E46@IRSMSX102.ger.corp.intel.com>
On Fri, Aug 12, 2016 at 12:44:51PM +0000, Soegtrop, Michael wrote:
> Dear Ocaml Users,
>
> it is quite common to have wrappers for printf to e.g. print errors or warnings with some context. Prefixing is easy to do in OCaml (honestly it took me a short while to figure it out):
>
> let prefixprintf (oc : out_channel) (fmt : ('a, out_channel, unit) format) : 'a =
> Printf.fprintf oc "Prefix: ";
> Printf.fprintf oc fmt
> ;;
As Kakadu said, you should look into the ksprintf function.
There are several real world examples of useful warning/error/debug/
message functions, if you start at this link and search down the file
for 'ksprintf':
https://github.com/libguestfs/libguestfs/blob/master/mllib/common_utils.ml#L355
The functions display ANSI colours and do line wrapping.
The corresponding type signatures can be found in:
https://github.com/libguestfs/libguestfs/blob/master/mllib/common_utils.mli
Rich.
prev parent reply other threads:[~2016-08-14 9:17 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-08-12 12:44 Soegtrop, Michael
2016-08-12 12:51 ` Kakadu
2016-08-12 12:55 ` Edouard Evangelisti
2016-08-12 14:01 ` Soegtrop, Michael
2016-08-12 12:53 ` Gabriel Scherer
2016-08-14 9:17 ` Richard W.M. Jones [this message]
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20160814091719.GE27249@annexia.org \
--to=rich@annexia.org \
--cc=caml-list@inria.fr \
--cc=michael.soegtrop@intel.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).