From 09b12d167fcdf6f122726bde977d3ce01d81e607 Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Thu, 14 Oct 2010 15:27:14 -0700
Subject: [PATCH] Fix typos in Type.friendly_stringify.

---
 src/boot/me/type.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/boot/me/type.ml b/src/boot/me/type.ml
index 648618e70ba..434bab7e104 100644
--- a/src/boot/me/type.ml
+++ b/src/boot/me/type.ml
@@ -46,11 +46,11 @@ let rec friendly_stringify cx fallback ty =
     String.concat " = " names
   else
     match ty with
-        Ast.TY_vec ty' -> "vec[" ^ (friendly_stringify cx fallback ty') ^ ")"
+        Ast.TY_vec ty' -> "vec[" ^ (friendly_stringify cx fallback ty') ^ "]"
       | Ast.TY_chan ty' ->
-          "chan[" ^ (friendly_stringify cx fallback ty') ^ ")"
+          "chan[" ^ (friendly_stringify cx fallback ty') ^ "]"
       | Ast.TY_port ty' ->
-          "port[" ^ (friendly_stringify cx fallback ty') ^ ")"
+          "port[" ^ (friendly_stringify cx fallback ty') ^ "]"
       | Ast.TY_box ty' -> "@" ^ (friendly_stringify cx fallback ty')
       | Ast.TY_mutable ty' ->
           "(mutable " ^ (friendly_stringify cx fallback ty') ^ ")"