From 9df2a671b48c8224913f3aa4df2f943d7252ea87 Mon Sep 17 00:00:00 2001 From: hyung-hwan Date: Thu, 12 May 2005 15:51:20 +0000 Subject: [PATCH] *** empty log message *** --- ase/stx/hash.c | 3 +-- ase/stx/parser.c | 27 +++++++++++++++++++++++++++ ase/stx/parser.h | 19 +++++++++++++++++++ 3 files changed, 47 insertions(+), 2 deletions(-) create mode 100644 ase/stx/parser.c create mode 100644 ase/stx/parser.h diff --git a/ase/stx/hash.c b/ase/stx/hash.c index 5eb045af..557c57cf 100644 --- a/ase/stx/hash.c +++ b/ase/stx/hash.c @@ -1,5 +1,5 @@ /* - * $Id: hash.c,v 1.7 2005-05-12 15:25:06 bacon Exp $ + * $Id: hash.c,v 1.8 2005-05-12 15:51:20 bacon Exp $ */ #include @@ -85,7 +85,6 @@ void xp_stx_hash_traverse ( link = XP_STX_AT(stx,table,size); while (link != stx->nil) { - xp_stx_word_t key = XP_STX_AT(stx,link,1); func (stx,link); link = XP_STX_AT(stx,link,0); } diff --git a/ase/stx/parser.c b/ase/stx/parser.c new file mode 100644 index 00000000..88c333a2 --- /dev/null +++ b/ase/stx/parser.c @@ -0,0 +1,27 @@ +/* + * $Id: parser.c,v 1.1 2005-05-12 15:49:07 bacon Exp $ + */ + +#include + +static void __emit_code ( + xp_stx_t* stx, xp_stx_word_t method, int value) +{ +} + +static void __emit_instruction ( + xp_stx_t* stx, xp_stx_word_t method, int high, int low) +{ + if (low >= 16) { + __emit_instruction (stx, method, Extended, high); + __emit_code (low); + } + else __emit_code (high * 16 + low); +} + +int xp_stx_parse ( + xp_stx_t* stx, xp_stx_word_t method, const xp_char_t* text) +{ + return 0; +} + diff --git a/ase/stx/parser.h b/ase/stx/parser.h new file mode 100644 index 00000000..39174e85 --- /dev/null +++ b/ase/stx/parser.h @@ -0,0 +1,19 @@ +/* + * $Id: parser.h,v 1.1 2005-05-12 15:49:07 bacon Exp $ + */ + +#ifndef _XP_STX_PARSER_H_ +#define _XP_STX_PARSER_H_ + +#ifdef __cplusplus +extern "C" { +#endif + +int xp_stx_parse ( + xp_stx_t* stx, xp_stx_word_t method, const xp_char_t* text); + +#ifdef __cplusplus +} +#endif + +#endif