createstrobj
s = createstrobj(L, str, l, LUA_TSHRSTR, h, list);
return createstrobj(L, str, l, LUA_TLNGSTR, G(L)->seed, NULL);