X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fhbugs%2Fclient%2Fmain.ml;h=e694613c596df7daecd044bac09db495cd5af62b;hb=f41a5585a648d57e4d8a24d664b0a5ce5d591148;hp=cfb4f8ba1c676b4d33c02fe5654a96ac736ec5e8;hpb=9aacfb2ddb32a1481ff42c51279ced80cc59a16e;p=helm.git diff --git a/helm/hbugs/client/main.ml b/helm/hbugs/client/main.ml index cfb4f8ba1..e694613c5 100644 --- a/helm/hbugs/client/main.ml +++ b/helm/hbugs/client/main.ml @@ -31,7 +31,7 @@ open Printf;; let client = new Hbugs_client.hbugsClient - ~on_use_hint: + ~use_hint_callback: (fun hint -> prerr_endline (sprintf "Using hint: %s" (string_of_hint hint))) ()