X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fgrafite_parser%2FdependenciesParser.ml;fp=components%2Fgrafite_parser%2FdependenciesParser.ml;h=2f7c5ec0cffbfdd2138bba285c6bfa3646ca896a;hb=718eb06483ac76c4eb3160277c02598f298d0968;hp=360cdb14d0998b98c83be19c18565f8d7ce6e5b2;hpb=f06968e452cca8782e822d98bec9007404abcbbe;p=helm.git diff --git a/components/grafite_parser/dependenciesParser.ml b/components/grafite_parser/dependenciesParser.ml index 360cdb14d..2f7c5ec0c 100644 --- a/components/grafite_parser/dependenciesParser.ml +++ b/components/grafite_parser/dependenciesParser.ml @@ -53,6 +53,8 @@ let parse_dependencies lexbuf = parse (UriDep (UriManager.uri_of_string u) :: acc) | [< '("IDENT", "include"); '("QSTRING", fname) >] -> parse (IncludeDep fname :: acc) + | [< '("IDENT", "include'"); '("QSTRING", fname) >] -> + parse (IncludeDep fname :: acc) | [< '("EOI", _) >] -> acc | [< 'tok >] -> parse acc | [< >] -> acc) tok_stream