C++ push_onecapture函数代码示例

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› C++›C++教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了C++中push_onecapture函数的典型用法代码示例。如果您正苦于以下问题：C++ push_onecapture函数的具体用法？C++ push_onecapture怎么用？C++ push_onecapture使用的例子？那么恭喜您, 这里精选的函数代码示例或许可以为您提供帮助。

在下文中一共展示了push_onecapture函数的10个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的C++代码示例。

示例1: add_value

static void add_value (MatchState *ms, luaL_Buffer *b, const char *s,
                                                       const char *e) {
  lua_State *L = ms->L;
  switch (lua_type(L, 3)) {
    case LUA_TNUMBER:
    case LUA_TSTRING: {
      add_s(ms, b, s, e);
      return;
    }
    case LUA_TFUNCTION: {
      int n;
      lua_pushvalue(L, 3);
      n = push_captures(ms, s, e);
      lua_call(L, n, 1);
      break;
    }
    case LUA_TTABLE: {
      push_onecapture(ms, 0, s, e);
      lua_gettable(L, 3);
      break;
    }
    default: {
      luaL_argerror(L, 3, "string/function/table expected"); 
      return;
    }
  }
  if (!lua_toboolean(L, -1)) {  /* nil or false? */
    lua_pop(L, 1);
    lua_pushlstring(L, s, e - s);  /* keep original text */
  }
  else if (!lua_isstring(L, -1))
    luaL_error(L, "invalid replacement value (a %s)", luaL_typename(L, -1)); 
  luaL_addvalue(b);  /* add result to accumulator */
}

开发者ID:aronarts，项目名称:FireNET，代码行数:34，代码来源:lstrlib.c

示例2: add_s

static void add_s (MatchState *ms, luaL_Buffer *b,
                   const lua_WChar *s, const lua_WChar *e) {
  lua_State *L = ms->L;
  if (lua_iswstring(L, 3)) {
    const lua_WChar *news = lua_towstring(L, 3);
    size_t l = lua_strlen(L, 3);
    size_t i;
    for (i=0; i<l; i++) {
      if (news[i] != ESC)
        luaL_putwchar(b, news[i]);
      else {
        i++;  /* skip ESC */
        if (!iswdigit(news[i]))
          luaL_putwchar(b, news[i]);
        else {
          int level = check_capture(ms, news[i]);
          push_onecapture(ms, level);
          luaL_addvalue(b);  /* add capture to accumulated result */
        }
      }
    }
  }
  else {  /* is a function */
    int n;
    lua_pushvalue(L, 3);
    n = push_captures(ms, s, e);
    lua_call(L, n, 1);
    if (lua_iswstring(L, -1))
      luaL_addvalue(b);  /* add return to accumulated result */
    else
      lua_pop(L, 1);  /* function result is not a string: pop it */
  }
}

开发者ID:anissen，项目名称:WikiAdventure，代码行数:33，代码来源:lwstrlib.c

示例3: add_s

static void add_s (MatchState *ms, luaL_Buffer *b, const char *s,
                                                   const char *e) {
  size_t l, i;
  lua_State *L = ms->L;
  const char *news = lua_tolstring(L, 3, &l);
  for (i = 0; i < l; i++) {
    if (news[i] != L_ESC)
      luaL_addchar(b, news[i]);
    else {
      i++;  /* skip ESC */
      if (!isdigit(uchar(news[i]))) {
        if (news[i] != L_ESC)
          luaL_error(L, "invalid use of '%c' in replacement string", L_ESC);
        luaL_addchar(b, news[i]);
      }
      else if (news[i] == '0')
          luaL_addlstring(b, s, e - s);
      else {
        push_onecapture(ms, news[i] - '1', s, e);
        luaL_tolstring(L, -1, NULL);  /* if number, convert it to string */
        lua_remove(L, -2);  /* remove original value */
        luaL_addvalue(b);  /* add capture to accumulated result */
      }
    }
  }
}

开发者ID:guodawei，项目名称:lua，代码行数:26，代码来源:lstrlib.c

示例4: add_value

static void add_value (MatchState *ms, luaL_Buffer *b, const char *s,
                       const char *e, int tr, int table) {
  lua_State *L = ms->L;
  switch (tr) {
    case LUA_TFUNCTION: {
      int n;
      lua_pushvalue(L, 3);
      if (table) n = build_result_table(ms, s, e);  /* EXT */
      else n = push_captures(ms, s, e);
      lua_call(L, n, 1);
      break;
    }
    case LUA_TTABLE: {
      push_onecapture(ms, 0, s, e);
      lua_gettable(L, 3);
      break;
    }
    default: {  /* LUA_TNUMBER or LUA_TSTRING */
      add_s(ms, b, s, e);
      return;
    }
  }
  if (!lua_toboolean(L, -1)) {  /* nil or false? */
    lua_pop(L, 1);
    lua_pushlstring(L, s, e - s);  /* keep original text */
  }
  else if (!lua_isstring(L, -1))
    luaL_error(L, "invalid replacement value (a %s)", luaL_typename(L, -1));
  luaL_addvalue(b);  /* add result to accumulator */
}

开发者ID:jcgoble3，项目名称:lua-matchext，代码行数:30，代码来源:matchext.c

示例5: build_result_table

/* EXT - entirely new function */
static int build_result_table(MatchState *ms, const char *s, const char *e) {
  lua_State *L = ms->L;
  int i;
  lua_newtable(L);  /* actual results table; stack -3 (-4 with value) */
  lua_newtable(L);  /* match/capture starts; stack -2 (-3 with value) */
  lua_newtable(L);  /* match/capture ends; stack -1 (-2 with value) */
  lua_pushlstring(L, s, e - s);
  lua_rawseti(L, -4, 0);
  lua_pushinteger(L, s - ms->src_init + 1);
  lua_rawseti(L, -3, 0);
  lua_pushinteger(L, e - ms->src_init);
  lua_rawseti(L, -2, 0);
  for (i = 1; i <= ms->level; i++) {
    ptrdiff_t cap_start = ms->capture[i-1].init - ms->src_init;
    push_onecapture(ms, i - 1, s, e);
    lua_rawseti(L, -4, i);
    lua_pushinteger(L, cap_start + 1);
    lua_rawseti(L, -3, i);
    if (ms->capture[i-1].len == CAP_POSITION)
      lua_pushinteger(L, cap_start + 1);
    else lua_pushinteger(L, cap_start + ms->capture[i-1].len);
    lua_rawseti(L, -2, i);
  }
  lua_setfield(L, -3, "endpos");
  lua_setfield(L, -2, "startpos");
  lua_pushlstring(L, ms->p_init, ms->p_end - ms->p_init);
  lua_setfield(L, -2, "pattern");
  lua_pushlstring(L, ms->src_init, ms->src_end - ms->src_init);
  lua_setfield(L, -2, "source");
  luaL_getmetatable(L, MATCHOBJNAME);
  lua_setmetatable(L, -2);
  return 1;
}

开发者ID:jcgoble3，项目名称:lua-matchext，代码行数:34，代码来源:matchext.c

示例6: push_captures

static int push_captures (MatchState *ms, const char *s, const char *e) {
  int i;
  int nlevels = (ms->level == 0 && s) ? 1 : ms->level;
  luaL_checkstack(ms->L, nlevels, "too many captures");
  for (i = 0; i < nlevels; i++)
    push_onecapture(ms, i, s, e);
  return nlevels;  /* number of strings pushed */
}

开发者ID:aronarts，项目名称:FireNET，代码行数:8，代码来源:lstrlib.c

示例7: push_captures

static int push_captures (MatchState *ms, const lua_WChar *s, const lua_WChar *e) {
  int i;
  luaL_checkstack(ms->L, ms->level, "too many captures");
  if (ms->level == 0 && s) {  /* no explicit captures? */
    lua_pushlwstring(ms->L, s, e-s);  /* return whole match */
    return 1;
  }
  else {  /* return all captures */
    for (i=0; i<ms->level; i++)
      push_onecapture(ms, i);
    return ms->level;  /* number of strings pushed */
  }
}

开发者ID:anissen，项目名称:WikiAdventure，代码行数:13，代码来源:lwstrlib.c

示例8: push_captures

static int
push_captures(struct match_state *ms, const char *s, const char *e,
    struct str_find *sm, size_t nsm)
{
	int i;
	int nlevels = (ms->level <= 0 && s) ? 1 : ms->level;

	if (nlevels > (int)nsm)
		nlevels = (int)nsm;
	for (i = 0; i < nlevels; i++)
		if (push_onecapture(ms, i, s, e, sm + i) == -1)
			break;

	/* number of strings pushed */
	return (nlevels);
}

开发者ID:Frankie-666，项目名称:lwan，代码行数:16，代码来源:patterns.c

示例9: add_s

static void add_s (MatchState *ms, const char *s, const char *e, const char *news, size_t l) {
  size_t i;
  for (i = 0; i < l; i++) {
	if (news[i] != L_ESC) {
	  buffer_addchar(ms->buff, news[i]);
	} else {
      i++;  /* skip ESC */
	  if (!isdigit(uchar(news[i]))) {
        buffer_addchar(ms->buff, news[i]);
	  } else if (news[i] == '0') {
        buffer_addstring(ms->buff, s, e - s);
	  } else {
        push_onecapture(ms, news[i] - '1', s, e);
//        luaL_addvalue(b);  /* add capture to accumulated result */
      }
    }
  }
}

开发者ID:alenl，项目名称:jamplus，代码行数:18，代码来源:luagsub.c

示例10: add_s

static void add_s (MatchState *ms, luaL_Buffer *b, const char *s,
                                                   const char *e) {
  size_t l, i;
  const char *news = lua_tolstring(ms->L, 3, &l);
  for (i = 0; i < l; i++) {
    if (news[i] != L_ESC)
      luaL_addchar(b, news[i]);
    else {
      i++;  /* skip ESC */
      if (!isdigit(uchar(news[i])))
        luaL_addchar(b, news[i]);
      else if (news[i] == '0')
          luaL_addlstring(b, s, e - s);
      else {
        push_onecapture(ms, news[i] - '1', s, e);
        luaL_addvalue(b);  /* add capture to accumulated result */
      }
    }
  }
}

开发者ID:aronarts，项目名称:FireNET，代码行数:20，代码来源:lstrlib.c

注：本文中的push_onecapture函数示例由纯净天空整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。