From 5cf3909277c1d813bc1d7571f866efc9d7b2699d Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Thu, 28 Dec 2017 19:01:47 +0100 Subject: [PATCH] strange bug-fix to allow compilation on recent ocaml+camlp5o --- helm/software/components/metadata/metadataDeps.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/helm/software/components/metadata/metadataDeps.ml b/helm/software/components/metadata/metadataDeps.ml index e949984e4..e6fcab592 100644 --- a/helm/software/components/metadata/metadataDeps.ml +++ b/helm/software/components/metadata/metadataDeps.ml @@ -169,7 +169,7 @@ struct neighborhood UriTbl.t * UriManager.uri * (UriManager.uri -> UriManager.uri list) * bool - let dummy = + let dummy : t = UriTbl.create 0, UriManager.uri_of_string "cic:/a.con", (fun _ -> []), false -- 2.39.2