diff options
| author | Michel Mauny <Michel.Mauny@ensta.fr> | 2004-11-17 09:07:56 +0000 |
|---|---|---|
| committer | Michel Mauny <Michel.Mauny@ensta.fr> | 2004-11-17 09:07:56 +0000 |
| commit | 22c16bdda1f86b4fd431b81b6384f07fe1a82d4a (patch) | |
| tree | a42de5a71f08f3c0378ba0b6a4254d2def7b7827 /camlp4/etc/pa_ru.ml | |
| parent | ad6b860a9f82fbd4729345ca7933a8157b757fe0 (diff) | |
| download | ocaml-22c16bdda1f86b4fd431b81b6384f07fe1a82d4a.tar.gz | |
Global renaming of "loc" into "_loc" and get rid of some unused variables
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6682 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'camlp4/etc/pa_ru.ml')
| -rw-r--r-- | camlp4/etc/pa_ru.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/camlp4/etc/pa_ru.ml b/camlp4/etc/pa_ru.ml index d3060c88c5..13b4ac96a6 100644 --- a/camlp4/etc/pa_ru.ml +++ b/camlp4/etc/pa_ru.ml @@ -38,7 +38,7 @@ EXTEND in [<:expr< let $opt:o2b o$ $list:l$ in $e$ >>] | e = expr; ";"; el = SELF -> - let e = let loc = MLast.loc_of_expr e in <:expr< ($e$ : unit) >> in + let e = let _loc = MLast.loc_of_expr e in <:expr< ($e$ : unit) >> in [e :: el] | e = expr; ";" -> [e] | e = expr -> [e] ] ] |