Function _string_split

sqstdlib/sqstdstring.cpp:249–286

}

static SQInteger _string_split(HSQUIRRELVM v)
{
    const SQChar *str,*seps;
    SQInteger sepsize;
    SQBool skipempty = SQFalse;
    sq_getstring(v,2,&str);
    sq_getstringandsize(v,3,&seps,&sepsize);
    if(sepsize == 0) return sq_throwerror(v,_SC("empty separators string"));
    if(sq_gettop(v)>3) {
        sq_getbool(v,4,&skipempty);
    }
    const SQChar *start = str;
    const SQChar *end = str;
    sq_newarray(v,0);
    while(*end != '\0')
    {
        SQChar cur = *end;
        for(SQInteger i = 0; i < sepsize; i++)
        {
            if(cur == seps[i])
            {
                if(!skipempty || (end != start)) {
                    sq_pushstring(v,start,end-start);
                    sq_arrayappend(v,-2);
                }
                start = end + 1;
                break;
            }
        }
        end++;
    }
    if(end != start)
    {
        sq_pushstring(v,start,end-start);
        sq_arrayappend(v,-2);
    }
    return 1;
}

static SQInteger _string_escape(HSQUIRRELVM v)
{