Re: [Caml-list] Returning printf from a function

["Richard W.M. Jones" <rich@annexia.org>]

Let's complicate this a bit further.  The nearly exact code we are
having problems with is (note that give_fn can return None in the real
code):

----------------------------------------------------------------------
open Printf

let debug fs =
  ksprintf print_endline fs

let give_fn () =
  Some debug

let () =
  let param = "x" in
  debug "single";
  debug "param: %s" param;
  (match give_fn () with
  | None -> ()
  | Some fn ->
    fn "fn";
    fn "fn param: %s" param
  );
  ()
----------------------------------------------------------------------

In this case there's no apparent way to add the extra parameter, I
don't think ...

Rich.