From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Thu, 26 Feb 2004 16:29:38 +0000 (+0000)
Subject: Added () to MQInit.init.
X-Git-Tag: v0_0_4~67
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=694386f0213ea7c07afb173a378335e7030020f9;p=helm.git

Added () to MQInit.init.
---

diff --git a/helm/gTopLevel/testlibrary.ml b/helm/gTopLevel/testlibrary.ml
index 1b05e3c17..a60aada5d 100644
--- a/helm/gTopLevel/testlibrary.ml
+++ b/helm/gTopLevel/testlibrary.ml
@@ -3,7 +3,7 @@ open Printf
 
 let mqi_debug_fun = ignore
 let mqi_flags = []
-let mqi_handle = MQIConn.init mqi_flags mqi_debug_fun
+let mqi_handle = MQIConn.init ~flags:mqi_flags ~log:mqi_debug_fun ()
 
 let verbose = false