Lines Matching refs:let
7 let binop_precedence:(char, int) Hashtbl.t = Hashtbl.create 10
10 let precedence c = try Hashtbl.find binop_precedence c with Not_found -> -1
18 let rec parse_primary = parser
29 let rec parse_args accumulator = parser
37 let rec parse_ident id = parser
67 let step =
91 let token_prec = precedence c in
100 let rhs = parse_primary stream in
103 let rhs =
107 * rhs, let the pending operator take rhs as its lhs. *)
108 let next_prec = precedence c2 in
116 let lhs = Ast.Binary (c, lhs, rhs) in
128 let parse_prototype =
129 let rec parse_args accumulator = parser
146 let parse_definition = parser
151 let parse_toplevel = parser
157 let parse_extern = parser
