From 855f95d490119b3b3f1541dde2140ece691fab39 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Wed, 18 May 2005 16:05:34 +0000
Subject: [PATCH] *** empty log message ***

---
 ase/stx/makefile.bcc      | 21 +++++++++++++++++++++
 ase/stx/stx.c             | 10 +++++-----
 ase/test/stx/makefile.bcc | 20 ++++++++++++++++++++
 3 files changed, 46 insertions(+), 5 deletions(-)
 create mode 100644 ase/stx/makefile.bcc
 create mode 100644 ase/test/stx/makefile.bcc

diff --git a/ase/stx/makefile.bcc b/ase/stx/makefile.bcc
new file mode 100644
index 00000000..48082170
--- /dev/null
+++ b/ase/stx/makefile.bcc
@@ -0,0 +1,21 @@
+SRCS = \
+	stx.c memory.c object.c symbol.c hash.c misc.c context.c
+OBJS = $(SRCS:.c=.obj)
+OUT = xpstx.lib
+
+CC = bcc32
+CFLAGS = -O2 -WM -w -w-inl -w-sig -w-spa -w-hid -RT- -I../..
+
+all: $(OBJS)
+	tlib $(OUT) @&&!
++-$(**: = &^
++-)
+!
+
+clean:
+	del $(OBJS) $(OUT) *.obj
+
+.SUFFIXES: .c .obj
+.c.obj:
+	$(CC) $(CFLAGS) -c $<
+
diff --git a/ase/stx/stx.c b/ase/stx/stx.c
index 5ec36efd..20302d4d 100644
--- a/ase/stx/stx.c
+++ b/ase/stx/stx.c
@@ -1,5 +1,5 @@
 /*
- * $Id: stx.c,v 1.17 2005-05-18 04:12:15 bacon Exp $
+ * $Id: stx.c,v 1.18 2005-05-18 16:05:34 bacon Exp $
  */
 
 #include <xp/stx/stx.h>
@@ -53,7 +53,7 @@ void xp_stx_close (xp_stx_t* stx)
 
 int xp_stx_bootstrap (xp_stx_t* stx)
 {
-	xp_stx_word_t symbol_Smalltalk, symbol_nil, symbol_true, symbol_false;
+	xp_stx_word_t symbol_Smalltalk;
 	xp_stx_word_t class_Object, class_Class;
 	xp_stx_word_t tmp;
 
@@ -71,9 +71,9 @@ int xp_stx_bootstrap (xp_stx_t* stx)
 		symbol_Smalltalk, stx->smalltalk);	
 
 	/* more initialization for nil, true, false */
-	symbol_nil = xp_stx_new_symbol (stx, XP_STX_TEXT("nil"));
-	symbol_true = xp_stx_new_symbol (stx, XP_STX_TEXT("true"));
-	symbol_false = xp_stx_new_symbol (stx, XP_STX_TEXT("false"));
+	xp_stx_new_symbol (stx, XP_STX_TEXT("nil"));
+	xp_stx_new_symbol (stx, XP_STX_TEXT("true"));
+	xp_stx_new_symbol (stx, XP_STX_TEXT("false"));
 
 	XP_STX_CLASS(stx,stx->nil) =
 		xp_stx_new_class (stx, XP_STX_TEXT("UndefinedObject"));
diff --git a/ase/test/stx/makefile.bcc b/ase/test/stx/makefile.bcc
new file mode 100644
index 00000000..1e0b1c63
--- /dev/null
+++ b/ase/test/stx/makefile.bcc
@@ -0,0 +1,20 @@
+SRCS = stx.c
+OBJS = stx.obj
+OUT = stx.exe
+
+CC = bcc32
+CFLAGS = -I..\..\..
+LDFLAGS = -L..\..\..\xp\bas -L..\..\..\xp\stx
+LIBS = import32.lib cw32mt.lib xpbas.lib xpstx.lib
+STARTUP = c0x32w.obj
+
+all: $(OBJS)
+	ilink32 $(LDFLAGS) $(STARTUP) $(OBJS),$(OUT),,$(LIBS),,
+
+clean:
+	del $(OBJS) *.obj $(OUT)
+
+.SUFFIXES: .c .obj
+.c.obj:
+	$(CC) $(CFLAGS) -c $< 
+