Lines Matching full:stream
6 let rec main_loop stream =
7 match Stream.peek stream with
12 Stream.junk stream;
13 main_loop stream
19 ignore(Parser.parse_definition stream);
22 ignore(Parser.parse_extern stream);
26 ignore(Parser.parse_toplevel stream);
28 with Stream.Error s ->
30 Stream.junk stream;
34 main_loop stream
