From d5dc5cfa2ce0c971640d1f00f7f422eb052bd2cb Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 24 Oct 2011 16:22:20 -0700
Subject: [PATCH] Fix 32bit platform bootstrap

---
 basis/cpu/x86/32/32.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/cpu/x86/32/32.factor b/basis/cpu/x86/32/32.factor
index b177a8ed31..d12d16181d 100755
--- a/basis/cpu/x86/32/32.factor
+++ b/basis/cpu/x86/32/32.factor
@@ -13,7 +13,7 @@ FROM: layouts => cell ;
 IN: cpu.x86.32
 
 : x86-float-regs ( -- seq )
-    "cpu.x86.sse" vocab
+    "cpu.x86.sse" lookup-vocab
     { XMM0 XMM1 XMM2 XMM3 XMM4 XMM5 XMM6 XMM7 }
     { ST0 ST1 ST2 ST3 ST4 ST5 ST6 }
     ? ;
@@ -67,7 +67,7 @@ M: x86.32 vm-stack-space 16 ;
     stack@ 0 MOV 0 rc-absolute-cell rel-vm ;
 
 M: x86.32 return-struct-in-registers? ( c-type -- ? )
-    c-type
+    lookup-c-type
     [ return-in-registers?>> ]
     [ heap-size { 1 2 4 8 } member? ] bi
     os { linux netbsd solaris } member? not