X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FDEVEL%2Fpxp%2Fnetstring%2Fnetstring_mt.ml;fp=helm%2FDEVEL%2Fpxp%2Fnetstring%2Fnetstring_mt.ml;h=0000000000000000000000000000000000000000;hb=e108abe5c0b4eb841c4ad332229a6c0e57e70079;hp=96576f1efcc03b3d937debf5e010240d153193a7;hpb=1456c337a60f6677ee742ff7891d43fc382359a9;p=helm.git diff --git a/helm/DEVEL/pxp/netstring/netstring_mt.ml b/helm/DEVEL/pxp/netstring/netstring_mt.ml deleted file mode 100644 index 96576f1ef..000000000 --- a/helm/DEVEL/pxp/netstring/netstring_mt.ml +++ /dev/null @@ -1,37 +0,0 @@ -(* $Id$ - * ---------------------------------------------------------------------- - * - *) - -(* Initialize multi-threading mode: *) - -let str_mutex = Mutex.create();; -let cgi_mutex = Mutex.create();; -let mappings_mutex = Mutex.create();; - -Netstring_str.init_mt - (fun () -> Mutex.lock str_mutex) - (fun () -> Mutex.unlock str_mutex); -Cgi.init_mt - (fun () -> Mutex.lock cgi_mutex) - (fun () -> Mutex.unlock cgi_mutex); -Netmappings.init_mt - (fun () -> Mutex.lock mappings_mutex) - (fun () -> Mutex.unlock mappings_mutex) -;; - -(* ====================================================================== - * History: - * - * $Log$ - * Revision 1.1 2000/11/17 09:57:28 lpadovan - * Initial revision - * - * Revision 1.2 2000/08/29 00:45:42 gerd - * Initializing Netmappings, too - * - * Revision 1.1 2000/06/25 21:15:27 gerd - * Initial revision - * - * - *)