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 2007-01-26 15:50:48 +00:00
parent ba462f755e
commit c1825a6f6b
3 changed files with 11 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,5 +1,5 @@
/* /*
* $Id: awk.c,v 1.153 2007-01-25 14:14:56 bacon Exp $ * $Id: awk.c,v 1.154 2007-01-26 15:50:47 bacon Exp $
*/ */
#include <ase/awk/awk.h> #include <ase/awk/awk.h>
@ -25,12 +25,8 @@
#include <wchar.h> #include <wchar.h>
#include <wctype.h> #include <wctype.h>
#include <locale.h> #include <locale.h>
#include "../../etc/printf.c"
#include <xp/bas/stdio.h> #include "../../etc/main.c"
#include <xp/bas/stdlib.h>
#include <xp/bas/string.h>
#include <xp/bas/memory.h>
#include <xp/bas/sysapi.h>
#endif #endif
#if defined(_WIN32) && defined(_MSC_VER) && defined(_DEBUG) #if defined(_WIN32) && defined(_MSC_VER) && defined(_DEBUG)
@ -82,7 +78,7 @@ static int awk_sprintf (
#elif defined(ASE_CHAR_IS_MCHAR) #elif defined(ASE_CHAR_IS_MCHAR)
n = vsnprintf (buf, len, fmt, ap); n = vsnprintf (buf, len, fmt, ap);
#else #else
n = xp_vsprintf (buf, len, fmt, ap); n = ase_vsprintf (buf, len, fmt, ap);
#endif #endif
va_end (ap); va_end (ap);
return n; return n;
@ -111,7 +107,7 @@ static void awk_aprintf (const ase_char_t* fmt, ...)
#elif defined(ASE_CHAR_IS_MCHAR) #elif defined(ASE_CHAR_IS_MCHAR)
vprintf (fmt, ap); vprintf (fmt, ap);
#else #else
xp_vprintf (fmt, ap); ase_vprintf (fmt, ap);
#endif #endif
va_end (ap); va_end (ap);
} }
@ -126,7 +122,7 @@ static void awk_dprintf (const ase_char_t* fmt, ...)
#elif defined(ASE_CHAR_IS_MCHAR) #elif defined(ASE_CHAR_IS_MCHAR)
vfprintf (stderr, fmt, ap); vfprintf (stderr, fmt, ap);
#else #else
xp_vfprintf (stderr, fmt, ap); ase_vfprintf (stderr, fmt, ap);
#endif #endif
va_end (ap); va_end (ap);
@ -142,7 +138,7 @@ static void awk_printf (const ase_char_t* fmt, ...)
#elif defined(ASE_CHAR_IS_MCHAR) #elif defined(ASE_CHAR_IS_MCHAR)
vprintf (fmt, ap); vprintf (fmt, ap);
#else #else
xp_vprintf (fmt, ap); ase_vprintf (fmt, ap);
#endif #endif
va_end (ap); va_end (ap);
} }
@ -1116,7 +1112,7 @@ int _tmain (int argc, ase_char_t* argv[])
#elif defined(__MSDOS__) || defined(ASE_CHAR_IS_MCHAR) #elif defined(__MSDOS__) || defined(ASE_CHAR_IS_MCHAR)
int main (int argc, ase_char_t* argv[]) int main (int argc, ase_char_t* argv[])
#else #else
int xp_main (int argc, ase_char_t* argv[]) int ase_main (int argc, ase_char_t* argv[])
#endif #endif
{ {
int n; int n;
@ -1142,10 +1138,6 @@ int xp_main (int argc, ase_char_t* argv[])
} }
#endif #endif
#if defined(__unix)
setlocale (LC_ALL, "");
#endif
n = __main (argc, argv); n = __main (argc, argv);
#if defined(__linux) && defined(_DEBUG) #if defined(__linux) && defined(_DEBUG)

1
ase/test/awk/t1.awk
View File

@ -14,6 +14,7 @@ function sum(i, k, y)
BEGIN { BEGIN {
/*s = sum(10000000);*/ /*s = sum(10000000);*/
s = sum (100); s = sum (100);
print s;
return s; return s;
} }

9
ase/utl/main.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: main.c,v 1.1 2006-12-17 12:33:31 bacon Exp $ * $Id: main.c,v 1.2 2007-01-26 15:50:47 bacon Exp $
*/ */
#include <ase/types.h> #include <ase/types.h>
@ -59,13 +59,8 @@ int main (int argc, char* argv[]/*, char** envp*/)
if (n == len) v[i][len] = ASE_T('\0'); if (n == len) v[i][len] = ASE_T('\0');
} }
for (i = 0; i < argc; i++)
{
printf ("[%ls]\n", v[i]);
}
/* TODO: envp... */ /* TODO: envp... */
//ret = _tmain (argc, v, NULL); ret = ase_main (argc, v, NULL);
exit_main: exit_main:
for (i = 0; i < argc; i++) for (i = 0; i < argc; i++)