X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_parser%2FdependenciesParser.ml;h=e07d4ec031e972e33a409f30fa73659638c03c1a;hb=4b18357deddbebc2fef6187b8810e7a343b9813b;hp=686caa5b108bbf9e0c971f19c1fecebbe3b8b2b8;hpb=f7f2a793b445a052138cd3df377a9e417f6e37c4;p=helm.git diff --git a/helm/software/components/grafite_parser/dependenciesParser.ml b/helm/software/components/grafite_parser/dependenciesParser.ml index 686caa5b1..e07d4ec03 100644 --- a/helm/software/components/grafite_parser/dependenciesParser.ml +++ b/helm/software/components/grafite_parser/dependenciesParser.ml @@ -55,7 +55,8 @@ let parse_dependencies lexbuf = | [< 'tok >] -> parse acc | [< >] -> acc) tok_stream with - Stream.Error _ -> parse acc + Stream.Error _ -> parse acc + | CicNotationLexer.Error _ -> parse acc in List.rev (parse []) @@ -86,4 +87,4 @@ let baseuri_of_script ~include_paths file = let uri = Http_getter_misc.strip_trailing_slash buri in if String.length uri < 5 || String.sub uri 0 5 <> "cic:/" then HLog.error (file ^ " sets an incorrect baseuri: " ^ buri); - uri + uri,file