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

documented qse_awk_rtx_valtostr() and renamed qse_awk_rtx_valtostrdup()

Browse Source 
to qse_awk_rtx_valtocpldup()
This commit is contained in:
hyung-hwan
2009-03-02 03:58:19 +00:00
parent 0b89f7e322
commit 004ba389f2
16 changed files with 233 additions and 88 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
qse/lib/awk/fnc.c
View File

@ -1,5 +1,5 @@
/*
* $Id: fnc.c 89 2009-02-28 15:27:03Z hyunghwan.chung $
* $Id: fnc.c 90 2009-03-01 09:58:19Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -249,7 +249,7 @@ static int fnc_close (
}
else
{
name = qse_awk_rtx_valtostrdup (run, a0, &len);
name = qse_awk_rtx_valtocpldup (run, a0, &len);
if (name == QSE_NULL) return -1;
}
@ -362,7 +362,7 @@ static int fnc_fflush (
}
else
{
str0 = qse_awk_rtx_valtostrdup (run, a0, &len0);
str0 = qse_awk_rtx_valtocpldup (run, a0, &len0);
if (str0 == QSE_NULL) return -1;
}
@ -433,7 +433,7 @@ static int fnc_index (
}
else
{
str0 = qse_awk_rtx_valtostrdup (run, a0, &len0);
str0 = qse_awk_rtx_valtocpldup (run, a0, &len0);
if (str0 == QSE_NULL) return -1;
}
@ -444,7 +444,7 @@ static int fnc_index (
}
else
{
str1 = qse_awk_rtx_valtostrdup (run, a1, &len1);
str1 = qse_awk_rtx_valtocpldup (run, a1, &len1);
if (str1 == QSE_NULL)
{
if (a0->type != QSE_AWK_VAL_STR)
@ -488,7 +488,7 @@ static int fnc_length (
}
else
{
str = qse_awk_rtx_valtostrdup (run, v, &len);
str = qse_awk_rtx_valtocpldup (run, v, &len);
if (str == QSE_NULL) return -1;
QSE_AWK_FREE (run->awk, str);
}
@ -529,7 +529,7 @@ static int fnc_substr (
}
else
{
str = qse_awk_rtx_valtostrdup (run, a0, &len);
str = qse_awk_rtx_valtocpldup (run, a0, &len);
if (str == QSE_NULL) return -1;
}
@ -634,7 +634,7 @@ static int fnc_split (
}
else
{
str = qse_awk_rtx_valtostrdup (run, a0, &str_len);
str = qse_awk_rtx_valtocpldup (run, a0, &str_len);
if (str == QSE_NULL) return -1;
str_free = str;
}
@ -657,7 +657,7 @@ static int fnc_split (
}
else
{
fs_ptr = qse_awk_rtx_valtostrdup (run, t1, &fs_len);
fs_ptr = qse_awk_rtx_valtocpldup (run, t1, &fs_len);
if (fs_ptr == QSE_NULL)
{
if (str_free != QSE_NULL)
@ -683,7 +683,7 @@ static int fnc_split (
}
else
{
fs_ptr = qse_awk_rtx_valtostrdup (run, a2, &fs_len);
fs_ptr = qse_awk_rtx_valtocpldup (run, a2, &fs_len);
if (fs_ptr == QSE_NULL)
{
if (str_free != QSE_NULL)
@ -850,7 +850,7 @@ static int fnc_tolower (
}
else
{
str = qse_awk_rtx_valtostrdup (run, a0, &len);
str = qse_awk_rtx_valtocpldup (run, a0, &len);
if (str == QSE_NULL) return -1;
}
@ -889,7 +889,7 @@ static int fnc_toupper (
}
else
{
str = qse_awk_rtx_valtostrdup (run, a0, &len);
str = qse_awk_rtx_valtocpldup (run, a0, &len);
if (str == QSE_NULL) return -1;
}
@ -955,7 +955,7 @@ static int __substitute (qse_awk_rtx_t* run, qse_long_t max_count)
}
else
{
a0_ptr = qse_awk_rtx_valtostrdup (run, a0, &a0_len);
a0_ptr = qse_awk_rtx_valtocpldup (run, a0, &a0_len);
if (a0_ptr == QSE_NULL)
{
FREE_A_PTRS (run->awk);
@ -971,7 +971,7 @@ static int __substitute (qse_awk_rtx_t* run, qse_long_t max_count)
}
else
{
a1_ptr = qse_awk_rtx_valtostrdup (run, a1, &a1_len);
a1_ptr = qse_awk_rtx_valtocpldup (run, a1, &a1_len);
if (a1_ptr == QSE_NULL)
{
FREE_A_PTRS (run->awk);
@ -1026,7 +1026,7 @@ static int __substitute (qse_awk_rtx_t* run, qse_long_t max_count)
}
else
{
a2_ptr = qse_awk_rtx_valtostrdup (run, *a2_ref, &a2_len);
a2_ptr = qse_awk_rtx_valtocpldup (run, *a2_ref, &a2_len);
if (a2_ptr == QSE_NULL)
{
FREE_A_PTRS (run->awk);
@ -1234,7 +1234,7 @@ static int fnc_match (
}
else
{
str0 = qse_awk_rtx_valtostrdup (run, a0, &len0);
str0 = qse_awk_rtx_valtocpldup (run, a0, &len0);
if (str0 == QSE_NULL) return -1;
}
@ -1251,7 +1251,7 @@ static int fnc_match (
}
else
{
str1 = qse_awk_rtx_valtostrdup (run, a1, &len1);
str1 = qse_awk_rtx_valtocpldup (run, a1, &len1);
if (str1 == QSE_NULL)
{
if (a0->type != QSE_AWK_VAL_STR)
@ -1356,7 +1356,7 @@ static int fnc_sprintf (
}
else
{
cs0.ptr = qse_awk_rtx_valtostrdup (run, a0, &cs0.len);
cs0.ptr = qse_awk_rtx_valtocpldup (run, a0, &cs0.len);
if (cs0.ptr == QSE_NULL)
{
qse_str_fini (&fbu);