user0/rust
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Wrap long lines.

Browse source
This commit is contained in:
Graydon Hoare 2010-09-20 20:46:44 -07:00
parent c17964c06d
commit acdec30149
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/boot/fe/pexp.ml
View file

@ -559,13 +559,15 @@ and parse_bottom_pexp (ps:pstate) : Ast.pexp =
(Some COMMA) parse_ty) ps
in
let bpos = lexpos ps in
span ps apos bpos (Ast.PEXP_lval (Ast.PLVAL_base (Ast.BASE_app (i, tys))))
span ps apos bpos
(Ast.PEXP_lval (Ast.PLVAL_base (Ast.BASE_app (i, tys))))
end
| _ ->
begin
let bpos = lexpos ps in
span ps apos bpos (Ast.PEXP_lval (Ast.PLVAL_base (Ast.BASE_ident i)))
span ps apos bpos
(Ast.PEXP_lval (Ast.PLVAL_base (Ast.BASE_ident i)))
end
end