]> matita.cs.unibo.it Git - helm.git/commitdiff
(dummy) porting to universes
authorStefano Zacchiroli <zack@upsilon.cc>
Thu, 9 Dec 2004 20:29:44 +0000 (20:29 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Thu, 9 Dec 2004 20:29:44 +0000 (20:29 +0000)
helm/proofChecker/proofChecker.ml

index e4f00fe3acf86c989b4e250af89000fda4942206..7659e57dd2a6553128909b21689ad59082547d7e 100644 (file)
@@ -107,7 +107,8 @@ let callback (req : Http_types.request) outchan' =
           fprintf outchan' "%s" (html_preamble uri);
           flush outchan';
           (try
-            ignore (CicTypeChecker.typecheck (UriManager.uri_of_string uri));
+            ignore (CicTypeChecker.typecheck (UriManager.uri_of_string uri)
+              CicUniv.empty_ugraph);
            with e ->
             fprintf outchan' "%s\n" (Printexc.to_string e);
             flush outchan');