From 9fb3e128da674b9ed70f5590e084abbe9a68fb05 Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Wed, 30 Jun 2010 14:51:03 -0700
Subject: [PATCH] Fix formatting string.

---
 src/boot/me/type.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/boot/me/type.ml b/src/boot/me/type.ml
index 4969d86e88b..69010fdf7a2 100644
--- a/src/boot/me/type.ml
+++ b/src/boot/me/type.ml
@@ -107,7 +107,7 @@ let rec tyspec_to_str (ts:tyspec) : string =
           fmt_tyspec ff (!tv)
 
       | TYSPEC_exterior tv ->
-          fmt ff "@";
+          fmt ff "@@";
           fmt_tyspec ff (!tv)
 
       | TYSPEC_callable (out, ins) ->