]> matita.cs.unibo.it Git - helm.git/blob - matita/matita/contribs/lambdadelta/bin/recomm/recommInput.ml
update in bin
[helm.git] / matita / matita / contribs / lambdadelta / bin / recomm / recommInput.ml
1 module EL = RecommLexer
2 module EP = RecommParser
3
4 let read_srcs file =
5   let ich = open_in file in
6   let lexbuf = Lexing.from_channel ich in
7   let srcs = EP.srcs EL.src_token lexbuf in
8   close_in ich;
9   srcs