Lines Matching full:stream
29 | [< 'Token.Ident id; stream >] ->
31 | [< e=parse_expr; stream >] ->
35 end stream
48 parse_ident id stream
61 stream >] ->
67 stream >] ->
72 end stream
78 raise (Stream.Error "expected 'in' after for")
79 end stream
81 raise (Stream.Error "expected '=' after for")
82 end stream
97 | [< >] -> raise (Stream.Error "unknown token when expecting an expression.")
108 | [< stream >] -> parse_primary stream
112 and parse_bin_rhs expr_prec lhs stream =
113 match Stream.peek stream with
122 Stream.junk stream;
125 let rhs = parse_unary stream in
129 match Stream.peek stream with
135 then parse_bin_rhs (token_prec + 1) rhs stream
142 parse_bin_rhs expr_prec lhs stream
161 | [< lhs=parse_unary; stream >] -> parse_bin_rhs 0 lhs stream
199 then raise (Stream.Error "invalid number of operands for operator")
206 raise (Stream.Error "expected function name in prototype")
