From a7016ade65b4870e6b270dee3affa640b72c8a29 Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Thu, 1 Jul 2010 10:44:27 -0700
Subject: Implement STMT_init_box in trans, clean up some of the semant
 table-accessors.

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

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

diff --git a/src/boot/me/layout.ml b/src/boot/me/layout.ml
index 208dc470..365acbf9 100644
--- a/src/boot/me/layout.ml
+++ b/src/boot/me/layout.ml
@@ -140,7 +140,7 @@ let layout_visitor
       (slots:node_id array)
       : unit =
     let accum (off,align) id : (size * size) =
-      let slot = referent_to_slot cx id in
+      let slot = get_slot cx id in
       let rt = slot_referent_type cx.ctxt_abi slot in
       let (elt_size, elt_align) = rty_layout rt in
         if vregs_ok
-- 
cgit v1.2.3