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-10-09 14:37:42 +00:00
parent 3a1861ad3b
commit c58af358c9
5 changed files with 53 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,9 +1,8 @@
/*
* $Id: awk.c,v 1.91 2006-09-25 06:17:19 bacon Exp $
* $Id: awk.c,v 1.92 2006-10-09 14:37:41 bacon Exp $
*/
#include <xp/awk/awk.h>
#include <xp/bas/stdio.h>
#include <stdio.h>
#include <string.h>
#include <signal.h>
@ -15,6 +14,7 @@
#ifndef __STAND_ALONE
#include <xp/bas/stdio.h>
#include <xp/bas/stdlib.h>
#include <xp/bas/string.h>
#include <xp/bas/memory.h>
#include <xp/bas/sysapi.h>
@ -27,6 +27,10 @@
#else
#define XP_PATH_MAX PATH_MAX
#endif
#ifdef _WIN32
#define xp_sprintf _sntprintf
#endif
#endif
#ifdef _WIN32

16
ase/test/awk/comp.awk
View File

@ -90,6 +90,22 @@ BEGIN {
print "10.0 > \"10\"", (10.0 > "10");
print "10.0 < \"10\"", (10.0 < "10");
print "--------------------------";
print "\"10\" == 10.0", ("10" == 10.0);
print "\"10\" != 10.0", ("10" != 10.0);
print "\"10\" >= 10.0", ("10" >= 10.0);
print "\"10\" <= 10.0", ("10" <= 10.0);
print "\"10\" > 10.0", ("10" > 10.0);
print "\"10\" < 10.0", ("10" < 10.0);
print "--------------------------";
print "\"10\" == 10.1", ("10" == 10.1);
print "\"10\" != 10.1", ("10" != 10.1);
print "\"10\" >= 10.1", ("10" >= 10.1);
print "\"10\" <= 10.1", ("10" <= 10.1);
print "\"10\" > 10.1", ("10" > 10.1);
print "\"10\" < 10.1", ("10" < 10.1);
#a[10] = 2;
#print a == 1;

3
ase/test/awk/makefile.tcc
View File

@ -6,12 +6,11 @@ LIBS = xpawk.lib
all: awk
awk: awk.obj
tcc $(LDFLAGS) -mh -eawk.exe awk.obj $(LIBS)
$(CC) $(LDFLAGS) -mh -eawk.exe awk.obj $(LIBS)
clean:
del $(OBJS) *.obj $(OUT)
.SUFFIXES: .c .obj
.c.obj:
$(CC) $(CFLAGS) -c $<