rust-lang/rust
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Added forgotten handling for alt_type_else, and also for stmt_note

Browse Source
This commit is contained in:
Tohava
2010-08-06 17:15:55 +03:00
parent 4bc173fd3c
commit 7d38caf9c3
1 changed files with 26 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
src/boot/fe/ast.ml
View File

@@ -254,7 +254,14 @@ and stmt_alt_type =
{ {
alt_type_lval: lval; alt_type_lval: lval;
alt_type_arms: type_arm array; alt_type_arms: type_arm array;
alt_type_else: stmt option; alt_type_else: block option;
}
and stmt_alt_port =
{
(* else lval is a timeout value. *)
alt_port_arms: (lval * lval) array;
alt_port_else: (lval * block) option;
} }
and block' = stmt array and block' = stmt array
@@ -264,12 +271,6 @@ and stmt_decl =
DECL_mod_item of (ident * mod_item) DECL_mod_item of (ident * mod_item)
| DECL_slot of (slot_key * (slot identified)) | DECL_slot of (slot_key * (slot identified))
and stmt_alt_port =
{
(* else lval is a timeout value. *)
alt_port_arms: (lval * lval) array;
alt_port_else: (lval * stmt) option;
}
and stmt_while = and stmt_while =
{ {
@@ -1233,10 +1234,25 @@ and fmt_stmt_body (ff:Format.formatter) (s:stmt) : unit =
fmt ff ") "; fmt ff ") ";
fmt_obr ff; fmt_obr ff;
Array.iter (fmt_type_arm ff) at.alt_type_arms; Array.iter (fmt_type_arm ff) at.alt_type_arms;
begin
match at.alt_type_else with
None -> ()
| Some block ->
fmt ff "@\n";
fmt_obox ff;
fmt ff "case (_) ";
fmt_obr ff;
fmt_stmts ff block.node;
fmt_cbb ff;
end;
fmt_cbb ff; fmt_cbb ff;
| STMT_alt_port _ -> fmt ff "?stmt_alt_port?" | STMT_alt_port _ -> fmt ff "?stmt_alt_port?"
| STMT_note _ -> fmt ff "?stmt_note?" | STMT_note at ->
begin
fmt ff "note ";
fmt_atom ff at;
fmt ff ";"
end
| STMT_slice (dst, src, slice) -> | STMT_slice (dst, src, slice) ->
fmt_lval ff dst; fmt_lval ff dst;
fmt ff " = "; fmt ff " = ";