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

* added qse_cptl_t/qse_xptl_t

Browse Source 
* deleted word substitution functions from awk
This commit is contained in:
hyung-hwan
2011-05-24 10:52:37 +00:00
parent 40711d3320
commit 7e6a4dc0d5
20 changed files with 289 additions and 550 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
qse/samples/awk/awk10.c
View File

@ -23,7 +23,7 @@
#include <qse/cmn/stdio.h>
static const qse_char_t* src = QSE_T(
"function dump(x) { for (k in x) print k \"=\" x[k]; x[\"f99\"]=\"os2\"; return x; }"
"function dump(x) { OFS=\"=\"; for (k in x) print k, x[k]; x[\"f99\"]=\"os2\"; return x; }"
);
int main ()
@ -145,7 +145,7 @@ int main ()
qse_xstr_t str;
str.ptr = qse_awk_rtx_valtocpldup (
rtx, QSE_AWK_VAL_MAP_ITR_VPTR(iptr), &str.len);
rtx, QSE_AWK_VAL_MAP_ITR_VAL(iptr), &str.len);
if (str.ptr == QSE_NULL)
{
qse_fprintf (QSE_STDERR, QSE_T("error: %s\n"),
@ -154,8 +154,8 @@ int main ()
}
qse_printf (QSE_T("ret [%.*s]=[%.*s]\n"),
(int)QSE_AWK_VAL_MAP_ITR_KLEN(iptr),
QSE_AWK_VAL_MAP_ITR_KPTR(iptr),
(int)QSE_AWK_VAL_MAP_ITR_KEY_LEN(iptr),
QSE_AWK_VAL_MAP_ITR_KEY_PTR(iptr),
(int)str.len, str.ptr
);
qse_awk_rtx_free (rtx, str.ptr);