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

fixed a bug of hanlding an empty string properly in str::isxxx functions

Browse Source
This commit is contained in:
hyung-hwan 2014-01-10 09:11:10 +00:00
parent 876c411559
commit 8d8ac30f08
1 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
qse/lib/awk/mod-str.c
View File

@ -183,7 +183,7 @@ static int is_class (qse_awk_rtx_t* rtx, qse_ctype_t ctype)
qse_awk_val_t* a0; qse_awk_val_t* a0;
qse_char_t* str0; qse_char_t* str0;
qse_size_t len0; qse_size_t len0;
int tmp = 1; int tmp;
a0 = qse_awk_rtx_getarg (rtx, 0); a0 = qse_awk_rtx_getarg (rtx, 0);
@ -198,17 +198,22 @@ static int is_class (qse_awk_rtx_t* rtx, qse_ctype_t ctype)
if (str0 == QSE_NULL) return -1; if (str0 == QSE_NULL) return -1;
} }
if (len0 <= 0) tmp = 0;
else
while (len0 > 0)
{ {
if (!qse_isctype(str0[--len0], ctype)) tmp = 1;
do
{ {
tmp = 0; len0--;
break; if (!qse_isctype(str0[len0], ctype))
{
tmp = 0;
break;
}
} }
while (len0 > 0);
if (a0->type != QSE_AWK_VAL_STR) qse_awk_rtx_freemem (rtx, str0);
} }
if (a0->type != QSE_AWK_VAL_STR) qse_awk_rtx_freemem (rtx, str0);
a0 = qse_awk_rtx_makeintval (rtx, tmp); a0 = qse_awk_rtx_makeintval (rtx, tmp);
if (a0 == QSE_NULL) return -1; if (a0 == QSE_NULL) return -1;