From 39180371de5805e1b0db23101f342f6109c65f20 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Wed, 11 Jun 2008 04:52:19 -0500
Subject: [PATCH] Fix compile errors

---
 core/cpu/x86/32/bootstrap.factor | 14 +++++++-------
 core/cpu/x86/64/bootstrap.factor | 14 +++++++-------
 core/cpu/x86/bootstrap.factor    |  2 +-
 3 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/core/cpu/x86/32/bootstrap.factor b/core/cpu/x86/32/bootstrap.factor
index 16083a8628..312b952b84 100755
--- a/core/cpu/x86/32/bootstrap.factor
+++ b/core/cpu/x86/32/bootstrap.factor
@@ -6,13 +6,13 @@ IN: bootstrap.x86
 
 4 \ cell set
 
-: arg0 EAX ;
-: arg1 EDX ;
-: temp-reg EBX ;
-: stack-reg ESP ;
-: ds-reg ESI ;
-: fixnum>slot@ arg0 1 SAR ;
-: rex-length 0 ;
+: arg0 ( -- reg ) EAX ;
+: arg1 ( -- reg ) EDX ;
+: temp-reg ( -- reg ) EBX ;
+: stack-reg ( -- reg ) ESP ;
+: ds-reg ( -- reg ) ESI ;
+: fixnum>slot@ ( -- ) arg0 1 SAR ;
+: rex-length ( -- n ) 0 ;
 
 << "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >>
 call
diff --git a/core/cpu/x86/64/bootstrap.factor b/core/cpu/x86/64/bootstrap.factor
index 93bf7cca17..d167c2882a 100755
--- a/core/cpu/x86/64/bootstrap.factor
+++ b/core/cpu/x86/64/bootstrap.factor
@@ -6,13 +6,13 @@ IN: bootstrap.x86
 
 8 \ cell set
 
-: arg0 RDI ;
-: arg1 RSI ;
-: temp-reg RBX ;
-: stack-reg RSP ;
-: ds-reg R14 ;
-: fixnum>slot@ ;
-: rex-length 1 ;
+: arg0 ( -- reg ) RDI ;
+: arg1 ( -- reg ) RSI ;
+: temp-reg ( -- reg ) RBX ;
+: stack-reg ( -- reg ) RSP ;
+: ds-reg ( -- reg ) R14 ;
+: fixnum>slot@ ( -- ) ;
+: rex-length ( -- n ) 1 ;
 
 << "resource:core/cpu/x86/bootstrap.factor" parse-file parsed >>
 call
diff --git a/core/cpu/x86/bootstrap.factor b/core/cpu/x86/bootstrap.factor
index bd1b0f2871..011c27112e 100755
--- a/core/cpu/x86/bootstrap.factor
+++ b/core/cpu/x86/bootstrap.factor
@@ -9,7 +9,7 @@ big-endian off
 
 1 jit-code-format set
 
-: stack-frame-size 4 bootstrap-cells ;
+: stack-frame-size ( -- n ) 4 bootstrap-cells ;
 
 [
     ! Load word