Function luaB_range

src/lbaselib.cpp:791–812

static int luaB_range (lua_State *L) {
  lua_Integer start, end, step;
  if (!lua_isnoneornil(L, 2)) {
    start = luaL_checkinteger(L, 1);
    end = luaL_checkinteger(L, 2);
    step = luaL_optinteger(L, 3, 1);
  }
  else {
    start = 1;
    end = luaL_checkinteger(L, 1);
    step = 1;
  }

  lua_createtable(L, cast(int, end - start), 0);
  lua_Integer idx = 1;
  for (lua_Integer i = start; i <= end; i += step, ++idx) {
    lua_pushinteger(L, i);
    lua_rawseti(L, -2, idx);
    L->checkEtl();
  }
  return 1;
}


static int luaB_sdiv (lua_State *L) {