monor code touch-up
This commit is contained in:
parent
66be4b4d39
commit
19d480719e
@ -4199,7 +4199,7 @@ static moo_pfrc_t pf_strfmt (moo_t* moo, moo_mod_t* mod, moo_ooi_t nargs)
|
||||
|
||||
static moo_pfrc_t pf_strlen (moo_t* moo, moo_mod_t* mod, moo_ooi_t nargs)
|
||||
{
|
||||
moo_oop_t rcv, ret;
|
||||
moo_oop_t rcv, retv;
|
||||
moo_oow_t i, limit;
|
||||
moo_ooch_t* ptr;
|
||||
|
||||
@ -4216,10 +4216,10 @@ static moo_pfrc_t pf_strlen (moo_t* moo, moo_mod_t* mod, moo_ooi_t nargs)
|
||||
if (*ptr == '\0') break;
|
||||
ptr++;
|
||||
}
|
||||
ret = moo_oowtoint (moo, i);
|
||||
if (!ret) return MOO_PF_FAILURE;
|
||||
retv = moo_oowtoint(moo, i);
|
||||
if (!retv) return MOO_PF_FAILURE;
|
||||
|
||||
MOO_STACK_SETRET (moo, nargs, ret);
|
||||
MOO_STACK_SETRET (moo, nargs, retv);
|
||||
return MOO_PF_SUCCESS;
|
||||
}
|
||||
|
||||
|
@ -20,9 +20,10 @@ LIBSRCS := \
|
||||
dic.c \
|
||||
err.c \
|
||||
exec.c \
|
||||
fmt.c \
|
||||
gc.c \
|
||||
heap.c \
|
||||
logfmt.c \
|
||||
mb8.c \
|
||||
moo.c \
|
||||
number.c \
|
||||
obj.c \
|
||||
|
@ -291,7 +291,7 @@ enum moo_cmgr_id_t
|
||||
{
|
||||
MOO_CMGR_UTF8,
|
||||
MOO_CMGR_UTF16,
|
||||
MOO_CMGR_MB8,
|
||||
MOO_CMGR_MB8
|
||||
};
|
||||
typedef enum moo_cmgr_id_t moo_cmgr_id_t;
|
||||
|
||||
|
@ -101,7 +101,7 @@ enum moo_option_t
|
||||
MOO_OPTION_SYMTAB_SIZE, /* default system table size */
|
||||
MOO_OPTION_SYSDIC_SIZE, /* default system dictionary size */
|
||||
MOO_OPTION_PROCSTK_SIZE, /* default process stack size */
|
||||
MOO_OPTION_MOD_INCTX,
|
||||
MOO_OPTION_MOD_INCTX
|
||||
|
||||
/*
|
||||
MOO_OPTION_CMGR_FS,
|
||||
|
@ -743,7 +743,7 @@ done:
|
||||
else
|
||||
{
|
||||
moo_oop_t v;
|
||||
v = moo_oowtoint (moo, ssz);
|
||||
v = moo_oowtoint(moo, ssz);
|
||||
if (!v) MOO_PF_FAILURE;
|
||||
MOO_STACK_SETRET (moo, nargs, v);
|
||||
}
|
||||
@ -949,7 +949,7 @@ done:
|
||||
else
|
||||
{
|
||||
moo_oop_t v;
|
||||
v = moo_oowtoint (moo, ssz);
|
||||
v = moo_oowtoint(moo, ssz);
|
||||
if (!v) MOO_PF_FAILURE;
|
||||
MOO_STACK_SETRET (moo, nargs, v);
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user