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

changed the order of STRIPRECSPC and SUBSEP. no functional impact

Browse Source
This commit is contained in:
hyung-hwan 2019-02-04 12:48:16 +00:00
parent 98f726e2cc
commit 6463fbec12
1 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
qse/lib/awk/run.c
View File

@ -657,21 +657,6 @@ static int set_global (
break; break;
} }
case QSE_AWK_GBL_SUBSEP:
{
qse_awk_rtx_valtostr_out_t out;
out.type = QSE_AWK_RTX_VALTOSTR_CPLDUP;
if (qse_awk_rtx_valtostr(rtx, val, &out) <= -1) return -1;
if (rtx->gbl.subsep.ptr)
QSE_AWK_FREE (rtx->awk, rtx->gbl.subsep.ptr);
rtx->gbl.subsep.ptr = out.u.cpldup.ptr;
rtx->gbl.subsep.len = out.u.cpldup.len;
break;
}
case QSE_AWK_GBL_STRIPRECSPC: case QSE_AWK_GBL_STRIPRECSPC:
{ {
qse_awk_int_t l; qse_awk_int_t l;
@ -687,6 +672,21 @@ static int set_global (
rtx->gbl.striprecspc = ((r > 0.0)? 1: (r < 0.0)? -1: 0); rtx->gbl.striprecspc = ((r > 0.0)? 1: (r < 0.0)? -1: 0);
break; break;
} }
case QSE_AWK_GBL_SUBSEP:
{
qse_awk_rtx_valtostr_out_t out;
out.type = QSE_AWK_RTX_VALTOSTR_CPLDUP;
if (qse_awk_rtx_valtostr(rtx, val, &out) <= -1) return -1;
if (rtx->gbl.subsep.ptr)
QSE_AWK_FREE (rtx->awk, rtx->gbl.subsep.ptr);
rtx->gbl.subsep.ptr = out.u.cpldup.ptr;
rtx->gbl.subsep.len = out.u.cpldup.len;
break;
}
} }
qse_awk_rtx_refdownval (rtx, old); qse_awk_rtx_refdownval (rtx, old);