hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan 2006-01-30 17:50:38 +00:00
parent d1990ba8c7
commit af6626d66a
3 changed files with 13 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ase/awk/makefile.in
View File

@ -1,4 +1,4 @@
SRCS = awk.c tree.c parse.c run.c sa.c SRCS = awk.c tree.c tab.c hash.c parse.c run.c sa.c
OBJS = $(SRCS:.c=.o) OBJS = $(SRCS:.c=.o)
OUT = libxpawk.a OUT = libxpawk.a

29
ase/awk/prog.h
View File

@ -1,29 +0,0 @@
/*
* $Id: prog.h,v 1.1 2005-12-28 15:57:27 bacon Exp $
*/
#ifndef _XP_AWK_PROG_H_
#define _XP_AWK_PROG_H_
struct
{
/* line number */
xp_size_t linenum;
union
{
const xp_char_t* func_name;
} ptn;
union
{
struct
{
unsigned short nargs;
xp_awk_body_t body;
} func;
} act;
};
#endif

12
ase/test/awk/awk.c
View File

@ -48,10 +48,18 @@ static xp_ssize_t process_source (int cmd, void* arg, xp_char_t* data, xp_size_t
} }
#endif #endif
#ifdef __linux
#include <mcheck.h>
#endif
int xp_main (int argc, xp_char_t* argv[]) int xp_main (int argc, xp_char_t* argv[])
{ {
xp_awk_t awk; xp_awk_t awk;
#ifdef __linux
mtrace ();
#endif
#if 0 #if 0
if (argc != 2) { if (argc != 2) {
xp_printf (XP_TEXT("Usage: %s file\n"), argv[0]); xp_printf (XP_TEXT("Usage: %s file\n"), argv[0]);
@ -77,5 +85,9 @@ int xp_main (int argc, xp_char_t* argv[])
} }
xp_awk_close (&awk); xp_awk_close (&awk);
#ifdef __linux
muntrace ();
#endif
return 0; return 0;
} }