diff options
| author | Graydon Hoare <[email protected]> | 2010-06-25 23:02:19 -0700 |
|---|---|---|
| committer | Graydon Hoare <[email protected]> | 2010-06-25 23:02:19 -0700 |
| commit | 49ac5e631224da77568e685571af5d08ab407060 (patch) | |
| tree | 4b9719937bbc51c40d620eab3e9ec59b92771740 | |
| parent | Add sever-glue, for missing first stage of sweep. (diff) | |
| download | rust-49ac5e631224da77568e685571af5d08ab407060.tar.xz rust-49ac5e631224da77568e685571af5d08ab407060.zip | |
Fix copy-paste error in logging function.
| -rw-r--r-- | src/boot/me/trans.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml index 911c2acd..182f4f5e 100644 --- a/src/boot/me/trans.ml +++ b/src/boot/me/trans.ml @@ -2891,8 +2891,8 @@ let trans_visitor match slot_mem_ctrl slot with MEM_gc -> "MEM_gc" | MEM_rc_struct -> "MEM_rc_struct" - | MEM_rc_opaque -> "MEM_rc_struct" - | MEM_interior -> "MEM_rc_struct" + | MEM_rc_opaque -> "MEM_rc_opaque" + | MEM_interior -> "MEM_interior" in let slotstr = Fmt.fmt_to_str Ast.fmt_slot slot in let str = step ^ " " ^ mctrl_str ^ " " ^ slotstr in |