From 3e513008b1b1aeab915a8bb2d236d51f85469dbe Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Sat, 9 Oct 2010 00:31:26 -0700
Subject: More type-fold caches, shave another second off compile time.

---
 src/boot/me/trans.ml | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'src/boot/me/trans.ml')

diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml
index d84c87a4..20bc1d7a 100644
--- a/src/boot/me/trans.ml
+++ b/src/boot/me/trans.ml
@@ -373,9 +373,7 @@ let trans_visitor
   in
 
   let get_element_ptr =
-    Session.time_inner "trans GEP" cx.ctxt_sess
-      (fun _ ->
-         Il.get_element_ptr word_bits abi.Abi.abi_str_of_hardreg)
+    Il.get_element_ptr word_bits abi.Abi.abi_str_of_hardreg
   in
 
   let get_variant_ptr (mem_cell:Il.cell) (i:int) : Il.cell =
-- 
cgit v1.2.3