Home | History | Annotate | Download | only in Chapter7

Lines Matching full:accumulator

30       let rec parse_args accumulator = parser
33 | [< 'Token.Kwd ','; e=parse_args (e :: accumulator) >] -> e
34 | [< >] -> e :: accumulator
36 | [< >] -> accumulator
151 and parse_var_names accumulator = parser
155 e=parse_var_names ((id, init) :: accumulator) >] -> e
156 | [< >] -> accumulator
168 let rec parse_args accumulator = parser
169 | [< 'Token.Ident id; e=parse_args (id::accumulator) >] -> e
170 | [< >] -> accumulator