From 1a229b9d411c88a32d15122c1258951266d10284 Mon Sep 17 00:00:00 2001
From: hyung-hwan <hyunghwan.chung@gmail.com>
Date: Thu, 11 Aug 2005 11:18:30 +0000
Subject: [PATCH] *** empty log message ***

---
 ase/stx/parser.c     | 16 +++++++++++++++-
 ase/test/stx/test.st | 26 +++-----------------------
 2 files changed, 18 insertions(+), 24 deletions(-)

diff --git a/ase/stx/parser.c b/ase/stx/parser.c
index fa24b5a4..2a256ee3 100644
--- a/ase/stx/parser.c
+++ b/ase/stx/parser.c
@@ -1,5 +1,5 @@
 /*
- * $Id: parser.c,v 1.65 2005-07-19 12:08:04 bacon Exp $
+ * $Id: parser.c,v 1.66 2005-08-11 11:18:30 bacon Exp $
  */
 
 #include <xp/stx/parser.h>
@@ -984,6 +984,20 @@ static int __parse_primary_ident (xp_stx_parser_t* parser, const xp_char_t* iden
 	xp_word_t i;
 	xp_stx_t* stx = parser->stx;
 
+/*
+	if (xp_strcmp(token->name.buffer, XP_TEXT("self")) == 0) {
+		EMIT_PUSH_LITERAL (parser, i);
+	}
+	else if (xp_strcmp(token->name.buffer, XP_TEXT("super")) == 0) {
+	}
+	else if (xp_strcmp(token->name.buffer, XP_TEXT("nil")) == 0) {
+	}
+	else if (xp_strcmp(token->name.buffer, XP_TEXT("true")) == 0) {
+	}
+	else if (xp_strcmp(token->name.buffer, XP_TEXT("false")) == 0) {
+	}
+*/
+
 	/* Refer to __parse_assignment for identifier lookup */
 
 	for (i = 0; i < parser->temporary_count; i++) {
diff --git a/ase/test/stx/test.st b/ase/test/stx/test.st
index f2dcec0d..9253128e 100644
--- a/ase/test/stx/test.st
+++ b/ase/test/stx/test.st
@@ -1,24 +1,4 @@
-"isNil" "test if self is nil"
-perform: method with: x with: y with: z with: a1 with: b2 with: c2
-
-	| a b c d e f g |
-
+main
 	< primitive: 16 >
-"
-	a := 'this is ''good'.
-	a := #xxx niceMethod.
-"
-	b := 12345 xxx nil this.
-	b := 30 + 20.
-	b := 'zzzzzz' xxx: 'cccccc' xy zzzz: 30 ccc:10 ccc: 'cccccc'.
-	$3 asString.
-	$4 asString.
-	$4 asString.
-	$5 asString.
-	$5 asString.
-
-	selector := 20.
-"
-	(jjj xxx: 10 xy) zzz: (10 fuck: 20 you: 40) yyy:  kkk.
-	[ spec plus:  20].
-	^10."
+	^nil.
+