aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/walk.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-06-28 09:39:43 -0700
committerGraydon Hoare <[email protected]>2010-06-28 09:39:43 -0700
commitd608c091680989e331b849fac8936a6e493bed43 (patch)
tree194928a43764fecce4f753533775994b13b98534 /src/boot/me/walk.ml
parentOnce more with feeling. Closes #13. (diff)
downloadrust-d608c091680989e331b849fac8936a6e493bed43.tar.xz
rust-d608c091680989e331b849fac8936a6e493bed43.zip
Some fixme-to-issue housekeeping.
Diffstat (limited to 'src/boot/me/walk.ml')
-rw-r--r--src/boot/me/walk.ml14
1 files changed, 8 insertions, 6 deletions
diff --git a/src/boot/me/walk.ml b/src/boot/me/walk.ml
index 57864f99..203acfce 100644
--- a/src/boot/me/walk.ml
+++ b/src/boot/me/walk.ml
@@ -524,7 +524,9 @@ and walk_stmt
walk_lval v lv;
Array.iter (walk_atom v) ats
- (* FIXME: this should have a param array, and invoke the visitors. *)
+ (* FIXME (issue #86): this should have a param array, and invoke the
+ * visitors.
+ *)
| Ast.STMT_decl (Ast.DECL_mod_item (id, mi)) ->
walk_mod_item v id mi
@@ -568,11 +570,11 @@ and walk_stmt
| Ast.STMT_alt_tag
{ Ast.alt_tag_lval = lval; Ast.alt_tag_arms = arms } ->
walk_lval v lval;
- let walk_arm { node = (pat, block) } =
- walk_pat v pat;
- walk_block v block
- in
- Array.iter walk_arm arms
+ let walk_arm { node = (pat, block) } =
+ walk_pat v pat;
+ walk_block v block
+ in
+ Array.iter walk_arm arms
(* FIXME (issue #20): finish this as needed. *)
| Ast.STMT_slice _