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-07-02 12:16:24 +00:00
parent 638d7ebd15
commit 14969ae0c9
4 changed files with 117 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,5 +1,5 @@
/*
* $Id: awk.c,v 1.50 2006-06-30 06:16:57 bacon Exp $
* $Id: awk.c,v 1.51 2006-07-02 12:16:24 bacon Exp $
*/
#include <xp/awk/awk.h>
@ -24,6 +24,7 @@
#endif
#ifdef _WIN32
#include <windows.h>
#include <tchar.h>
#pragma warning (disable: 4996)
#endif
@ -391,6 +392,7 @@ xp_printf (XP_TEXT("closing [%s] of type %d (console)\n"), epa->name, epa->type
/* TODO: how to return error or 0 */
fputs_t (data, /*size,*/ (FILE*)epa->handle);
/*fputs_t (data, stdout);*/
MessageBox (NULL, data, data, MB_OK);
return size;
}

2
ase/test/awk/makefile.cl
View File

@ -2,7 +2,7 @@ CC = cl
#CFLAGS = /nologo /MT /W3 /GR- /D_WIN32_WINNT=0x0400 -I..\..\..
CFLAGS = /nologo /MT /W3 /GR- /D_WIN32_WINNT=0x0400 -I..\..\.. -D__STAND_ALONE
LDFLAGS = /libpath:..\..\bas /libpath:..\..\awk
LIBS = xpawk.lib
LIBS = xpawk.lib user32.lib
all: awk

10
ase/test/awk/t15.awk Normal file
View File

@ -0,0 +1,10 @@
BEGIN
{
print ("\x5C");
print ("\x5C6_ABCDEGH");
print ("\xZZ5C6_ABCDEGH");
print ("\xZZ5C6_AB\u7658&&");
print "\uC720\uB2C8\uCF54\uB4DC \uD14C\uC2A4\uD2B8";
print "\UC720\UB2C8\UCF54\UB4DC \UD14C\UC2A4\UD2B8";
}