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-11-13 09:37:00 +00:00
parent 8ce65b8b55
commit 0f7efc6263
2 changed files with 24 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
ase/awk/func.c
View File

@ -1,5 +1,5 @@
/*
* $Id: func.c,v 1.72 2006-10-28 05:24:07 bacon Exp $
* $Id: func.c,v 1.73 2006-11-13 09:37:00 bacon Exp $
*/
#include <ase/awk/awk_i.h>
@ -15,26 +15,31 @@ static int __bfn_toupper (ase_awk_run_t* run);
static int __bfn_gsub (ase_awk_run_t* run);
static int __bfn_sub (ase_awk_run_t* run);
static int __bfn_match (ase_awk_run_t* run);
static int __bfn_sprintf (ase_awk_run_t* run);
#undef MAX
#define MAX ASE_TYPE_MAX(ase_size_t)
/* TODO: move it under the awk structure... */
static ase_awk_bfn_t __sys_bfn[] =
{
/* io functions */
{ASE_T("close"), 5, ASE_AWK_EXTIO, 1, 1, ASE_NULL, __bfn_close},
{ASE_T("fflush"), 6, ASE_AWK_EXTIO, 0, 1, ASE_NULL, __bfn_fflush},
{ASE_T("close"), 5, ASE_AWK_EXTIO, 1, 1, ASE_NULL, __bfn_close},
{ASE_T("fflush"), 6, ASE_AWK_EXTIO, 0, 1, ASE_NULL, __bfn_fflush},
/* string functions */
{ASE_T("index"), 5, 0, 2, 2, ASE_NULL, __bfn_index},
{ASE_T("substr"), 6, 0, 2, 3, ASE_NULL, __bfn_substr},
{ASE_T("length"), 6, 0, 1, 1, ASE_NULL, __bfn_length},
{ASE_T("split"), 5, 0, 2, 3, ASE_T("vrv"), __bfn_split},
{ASE_T("tolower"), 7, 0, 1, 1, ASE_NULL, __bfn_tolower},
{ASE_T("toupper"), 7, 0, 1, 1, ASE_NULL, __bfn_toupper},
{ASE_T("gsub"), 4, 0, 2, 3, ASE_T("xvr"), __bfn_gsub},
{ASE_T("sub"), 3, 0, 2, 3, ASE_T("xvr"), __bfn_sub},
{ASE_T("match"), 5, 0, 2, 2, ASE_T("vx"), __bfn_match},
{ASE_T("index"), 5, 0, 2, 2, ASE_NULL, __bfn_index},
{ASE_T("substr"), 6, 0, 2, 3, ASE_NULL, __bfn_substr},
{ASE_T("length"), 6, 0, 1, 1, ASE_NULL, __bfn_length},
{ASE_T("split"), 5, 0, 2, 3, ASE_T("vrv"), __bfn_split},
{ASE_T("tolower"), 7, 0, 1, 1, ASE_NULL, __bfn_tolower},
{ASE_T("toupper"), 7, 0, 1, 1, ASE_NULL, __bfn_toupper},
{ASE_T("gsub"), 4, 0, 2, 3, ASE_T("xvr"), __bfn_gsub},
{ASE_T("sub"), 3, 0, 2, 3, ASE_T("xvr"), __bfn_sub},
{ASE_T("match"), 5, 0, 2, 2, ASE_T("vx"), __bfn_match},
{ASE_T("sprintf"), 7, 0, 1, MAX, ASE_NULL, __bfn_sprintf},
{ASE_NULL, 0, 0, 0, 0, ASE_NULL, ASE_NULL}
{ASE_NULL, 0, 0, 0, 0, ASE_NULL, ASE_NULL}
};
ase_awk_bfn_t* ase_awk_addbfn (
@ -1237,6 +1242,11 @@ static int __bfn_match (ase_awk_run_t* run)
return 0;
}
static int __bfn_sprintf (ase_awk_run_t* run)
{
return -1;
}
#if 0
static int __bfn_system (ase_awk_run_t* run)
{

14
ase/awk/func.h
View File

@ -1,5 +1,5 @@
/*
* $Id: func.h,v 1.14 2006-10-24 04:10:12 bacon Exp $
* $Id: func.h,v 1.15 2006-11-13 09:37:00 bacon Exp $
*/
#ifndef _ASE_AWK_FUNC_H_
@ -25,18 +25,6 @@ struct ase_awk_bfn_t
ase_awk_bfn_t* next;
};
enum
{
/* ensure that this matches __sys_bfn in func.c */
ASE_AWK_BFN_CLOSE,
ASE_AWK_BFN_INDEX,
ASE_AWK_BFN_LENGTH,
ASE_AWK_BFN_SYSTEM,
ASE_AWK_BFN_SIN
};
#ifdef __cplusplus
extern "C" {
#endif