| /illumos-gate/usr/src/test/libc-tests/tests/ |
| H A D | wcslcat.c | 40 .wt_src = L"Hello, World!",
43 .wt_buf = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
44 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' },
45 .wt_res = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
46 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' }
49 .wt_src = L"光",
52 .wt_buf = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
53 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' },
54 .wt_res = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
55 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' }
[all …]
|
| H A D | wcslcpy.c | 42 .wt_src = L"Hello, World!",
45 .wt_res = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
46 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' }
49 .wt_src = L"光",
52 .wt_res = { L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-',
53 L'-', L'-', L'-', L'-', L'-', L'-', L'-', L'-' }
56 .wt_src = L"asdfasdfasdfasdfasdf",
59 .wt_res = { L'a', L's', L'd', L'f', L'a', L's', L'd', L'f',
60 L'a', L's', L'd', L'f', L'a', L's', L'd', L'\0' }
63 .wt_src = L"77777777777777777777777",
[all …]
|
| /illumos-gate/usr/src/lib/libc/amd64/gen/ |
| H A D | memset.S | 45 #define L(s) .memset##s macro
94 jne L(ck2)
97 L(ck2):
104 jge L(ck_align)
106 lea L(setPxQx)(%rip),%r11
114 L(setPxQx): .int L(P0Q0)-L(setPxQx)
115 .int L(P1Q0)-L(setPxQx)
116 .int L(P2Q0)-L(setPxQx)
117 .int L(P3Q0)-L(setPxQx)
118 .int L(P4Q0)-L(setPxQx)
[all …]
|
| H A D | memcpy.S | 47 #define L(s) .memcpy##s macro
103 jbe L(CopyForward) # then do copy forward
107 jb L(CopyBackwards) # then do copy backwards
108 jmp L(CopyForward)
111 L(CopyForward):
116 lea L(fwdPxQx)(%rip),%r11
118 jg L(ck_use_sse2)
127 L(ShrtAlignNew):
128 lea L(AliPxQx)(%rip),%r11
137 L(fwdPxQx): .int L(P0Q0)-L(fwdPxQx)
[all …]
|
| /illumos-gate/usr/src/uts/common/fs/zfs/lua/ |
| H A D | lapi.c | 48 #define api_checkvalidindex(L, o) api_check(L, isvalid(o), "invalid index") argument
50 #define api_checkstackindex(L, i, o) \ argument
51 api_check(L, isstackindex(i, o), "index not in the stack")
54 static TValue *index2addr (lua_State *L, int idx) { in index2addr() argument
55 CallInfo *ci = L->ci; in index2addr()
58 api_check(L, idx <= ci->top - (ci->func + 1), "unacceptable index"); in index2addr()
59 if (o >= L->top) return NONVALIDVALUE; in index2addr()
63 api_check(L, idx != 0 && -idx <= L->top - (ci->func + 1), "invalid index"); in index2addr()
64 return L->top + idx; in index2addr()
67 return &G(L)->l_registry; in index2addr()
[all …]
|
| H A D | ldo.c | 50 #define LUAI_THROW(L,c) longjmp(&(c)->b) argument
51 #define LUAI_TRY(L,c,a) if (setjmp(&(c)->b) == 0) { a } argument
56 #define LUAI_THROW(L,c) throw(c) argument
57 #define LUAI_TRY(L,c,a) \ argument
63 #define LUAI_THROW(L,c) _longjmp((c)->b, 1) argument
64 #define LUAI_TRY(L,c,a) if (_setjmp((c)->b) == 0) { a } argument
69 #define LUAI_THROW(L,c) longjmp((c)->b, 1) argument
70 #define LUAI_TRY(L,c,a) if (setjmp((c)->b) == 0) { a } argument
88 static void seterrorobj (lua_State *L, int errcode, StkId oldtop) { in seterrorobj() argument
91 setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */ in seterrorobj()
[all …]
|
| H A D | lauxlib.c | 38 static int findfield (lua_State *L, int objidx, int level) { in findfield() argument
39 if (level == 0 || !lua_istable(L, -1)) in findfield()
41 lua_pushnil(L); /* start 'next' loop */ in findfield()
42 while (lua_next(L, -2)) { /* for each pair in table */ in findfield()
43 if (lua_type(L, -2) == LUA_TSTRING) { /* ignore non-string keys */ in findfield()
44 if (lua_rawequal(L, objidx, -1)) { /* found object? */ in findfield()
45 lua_pop(L, 1); /* remove value (but keep name) */ in findfield()
48 else if (findfield(L, objidx, level - 1)) { /* try recursively */ in findfield()
49 lua_remove(L, -2); /* remove table (but keep name) */ in findfield()
50 lua_pushliteral(L, "."); in findfield()
[all …]
|
| H A D | ltablib.c | 19 #define aux_getn(L,n) (luaL_checktype(L, n, LUA_TTABLE), luaL_len(L, n)) argument
24 static int maxn (lua_State *L) { in maxn() argument
26 luaL_checktype(L, 1, LUA_TTABLE); in maxn()
27 lua_pushnil(L); /* first key */ in maxn()
28 while (lua_next(L, 1)) { in maxn()
29 lua_pop(L, 1); /* remove value */ in maxn()
30 if (lua_type(L, -1) == LUA_TNUMBER) { in maxn()
31 lua_Number v = lua_tonumber(L, -1); in maxn()
35 lua_pushnumber(L, max); in maxn()
41 static int tinsert (lua_State *L) { in tinsert() argument
[all …]
|
| H A D | lbaselib.c | 32 static int luaB_tonumber (lua_State *L) { in luaB_tonumber() argument
33 if (lua_isnoneornil(L, 2)) { /* standard conversion */ in luaB_tonumber()
35 lua_Number n = lua_tonumberx(L, 1, &isnum); in luaB_tonumber()
37 lua_pushnumber(L, n); in luaB_tonumber()
40 luaL_checkany(L, 1); in luaB_tonumber()
44 const char *s = luaL_checklstring(L, 1, &l); in luaB_tonumber()
46 int base = luaL_checkint(L, 2); in luaB_tonumber()
48 luaL_argcheck(L, 2 <= base && base <= 36, 2, "base out of range"); in luaB_tonumber()
63 lua_pushnumber(L, (neg) ? -n : n); in luaB_tonumber()
68 lua_pushnil(L); /* not a number */ in luaB_tonumber()
[all …]
|
| H A D | lua.h | 54 typedef int (*lua_CFunction) (lua_State *L);
60 typedef const char * (*lua_Reader) (lua_State *L, void *ud, size_t *sz);
62 typedef int (*lua_Writer) (lua_State *L, const void* p, size_t sz, void* ud);
131 LUA_API void (lua_close) (lua_State *L);
132 LUA_API lua_State *(lua_newthread) (lua_State *L);
134 LUA_API lua_CFunction (lua_atpanic) (lua_State *L, lua_CFunction panicf);
137 LUA_API const lua_Number *(lua_version) (lua_State *L);
143 LUA_API int (lua_absindex) (lua_State *L, int idx);
144 LUA_API int (lua_gettop) (lua_State *L);
145 LUA_API void (lua_settop) (lua_State *L, int idx);
[all …]
|
| H A D | lstate.c | 75 #define fromstate(L) (cast(LX *, cast(lu_byte *, (L)) - offsetof(LX, l))) argument
87 static unsigned int makeseed (lua_State *L) { in makeseed() argument
91 addbuff(buff, p, L); /* heap variable */ in makeseed()
110 CallInfo *luaE_extendCI (lua_State *L) { in luaE_extendCI() argument
111 CallInfo *ci = luaM_new(L, CallInfo); in luaE_extendCI()
112 lua_assert(L->ci->next == NULL); in luaE_extendCI()
113 L->ci->next = ci; in luaE_extendCI()
114 ci->previous = L->ci; in luaE_extendCI()
120 void luaE_freeCI (lua_State *L) { in luaE_freeCI() argument
121 CallInfo *ci = L->ci; in luaE_freeCI()
[all …]
|
| H A D | lcorolib.c | 19 static int auxresume (lua_State *L, lua_State *co, int narg) { in auxresume() argument
22 lua_pushliteral(L, "too many arguments to resume"); in auxresume()
26 lua_pushliteral(L, "cannot resume dead coroutine"); in auxresume()
29 lua_xmove(L, co, narg); in auxresume()
30 status = lua_resume(co, L, narg); in auxresume()
33 if (!lua_checkstack(L, nres + 1)) { in auxresume()
35 lua_pushliteral(L, "too many results to resume"); in auxresume()
38 lua_xmove(co, L, nres); /* move yielded values */ in auxresume()
42 lua_xmove(co, L, 1); /* move error message */ in auxresume()
48 static int luaB_coresume (lua_State *L) { in luaB_coresume() argument
[all …]
|
| H A D | lauxlib.h | 28 LUALIB_API void (luaL_checkversion_) (lua_State *L, lua_Number ver);
29 #define luaL_checkversion(L) luaL_checkversion_(L, LUA_VERSION_NUM) argument
31 LUALIB_API int (luaL_getmetafield) (lua_State *L, int obj, const char *e);
32 LUALIB_API int (luaL_callmeta) (lua_State *L, int obj, const char *e);
33 LUALIB_API const char *(luaL_tolstring) (lua_State *L, int idx, size_t *len);
34 LUALIB_API int (luaL_argerror) (lua_State *L, int numarg, const char *extramsg);
35 LUALIB_API const char *(luaL_checklstring) (lua_State *L, int numArg,
37 LUALIB_API const char *(luaL_optlstring) (lua_State *L, int numArg,
39 LUALIB_API lua_Number (luaL_checknumber) (lua_State *L, int numArg);
40 LUALIB_API lua_Number (luaL_optnumber) (lua_State *L, int nArg, lua_Number def);
[all …]
|
| H A D | lbitlib.c | 36 static b_uint andaux (lua_State *L) { in andaux() argument
37 int i, n = lua_gettop(L); in andaux()
40 r &= luaL_checkunsigned(L, i); in andaux()
45 static int b_and (lua_State *L) { in b_and() argument
46 b_uint r = andaux(L); in b_and()
47 lua_pushunsigned(L, r); in b_and()
52 static int b_test (lua_State *L) { in b_test() argument
53 b_uint r = andaux(L); in b_test()
54 lua_pushboolean(L, r != 0); in b_test()
59 static int b_or (lua_State *L) { in b_or() argument
[all …]
|
| H A D | lvm.c | 47 int luaV_tostring (lua_State *L, StkId obj) { in luaV_tostring() argument
54 setsvalue2s(L, obj, luaS_newlstr(L, s, l)); in luaV_tostring()
60 static void traceexec (lua_State *L) { in traceexec() argument
61 CallInfo *ci = L->ci; in traceexec()
62 lu_byte mask = L->hookmask; in traceexec()
63 int counthook = ((mask & LUA_MASKCOUNT) && L->hookcount == 0); in traceexec()
65 resethookcount(L); /* reset count */ in traceexec()
71 luaD_hook(L, LUA_HOOKCOUNT, -1); /* call count hook */ in traceexec()
77 ci->u.l.savedpc <= L->oldpc || /* when jump back (loop), or when */ in traceexec()
78 newline != getfuncline(p, pcRel(L->oldpc, p))) /* enter a new line */ in traceexec()
[all …]
|
| H A D | ldebug.c | 33 static const char *getfuncname (lua_State *L, CallInfo *ci, const char **name);
47 static void swapextra (lua_State *L) { in swapextra() argument
48 if (L->status == LUA_YIELD) { in swapextra()
49 CallInfo *ci = L->ci; /* get function that yielded */ in swapextra()
51 ci->func = restorestack(L, ci->extra); in swapextra()
52 ci->extra = savestack(L, temp); in swapextra()
60 LUA_API int lua_sethook (lua_State *L, lua_Hook func, int mask, int count) { in lua_sethook() argument
65 if (isLua(L->ci)) in lua_sethook()
66 L->oldpc = L->ci->u.l.savedpc; in lua_sethook()
67 L->hook = func; in lua_sethook()
[all …]
|
| H A D | lstrlib.c | 60 static int str_len (lua_State *L) { in str_len() argument
62 luaL_checklstring(L, 1, &l); in str_len()
63 lua_pushinteger(L, (lua_Integer)l); in str_len()
76 static int str_sub (lua_State *L) { in str_sub() argument
78 const char *s = luaL_checklstring(L, 1, &l); in str_sub()
79 size_t start = posrelat(luaL_checkinteger(L, 2), l); in str_sub()
80 size_t end = posrelat(luaL_optinteger(L, 3, -1), l); in str_sub()
84 lua_pushlstring(L, s + start - 1, end - start + 1); in str_sub()
85 else lua_pushliteral(L, ""); in str_sub()
90 static int str_reverse (lua_State *L) { in str_reverse() argument
[all …]
|
| H A D | ldo.h | 16 #define luaD_checkstack(L,n) if (L->stack_last - L->top <= (n)) \ argument
17 luaD_growstack(L, n); else condmovestack(L);
20 #define incr_top(L) {L->top++; luaD_checkstack(L,0);} argument
22 #define savestack(L,p) ((char *)(p) - (char *)L->stack) argument
23 #define restorestack(L,n) ((TValue *)((char *)L->stack + (n))) argument
27 typedef void (*Pfunc) (lua_State *L, void *ud);
29 LUAI_FUNC int luaD_protectedparser (lua_State *L, ZIO *z, const char *name,
31 LUAI_FUNC void luaD_hook (lua_State *L, int event, int line);
32 LUAI_FUNC int luaD_precall (lua_State *L, StkId func, int nresults);
33 LUAI_FUNC void luaD_call (lua_State *L, StkId func, int nResults,
[all …]
|
| /illumos-gate/usr/src/uts/intel/ml/ |
| H A D | copy.S | 283 #define L(s) .bcopy##s macro
292 leaq L(fwdPxQx)(%rip), %r10
300 L(fwdPxQx):
301 .int L(P0Q0)-L(fwdPxQx) /* 0 */
302 .int L(P1Q0)-L(fwdPxQx)
303 .int L(P2Q0)-L(fwdPxQx)
304 .int L(P3Q0)-L(fwdPxQx)
305 .int L(P4Q0)-L(fwdPxQx)
306 .int L(P5Q0)-L(fwdPxQx)
307 .int L(P6Q0)-L(fwdPxQx)
[all …]
|
| /illumos-gate/usr/src/lib/libxcurses2/src/libc/xcurses/ |
| H A D | wunctrl.c | 48 L"^?",
49 L"^@",
50 L"^A",
51 L"^B",
52 L"^C",
53 L"^D",
54 L"^E",
55 L"^F",
56 L"^G",
57 L"^H",
[all …]
|
| H A D | vid_puts.c | 113 p1, p2, p3, p4, p5, p6, 0L, 0L, 0L), in vid_puts()
149 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), in vid_puts()
154 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), in vid_puts()
158 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), in vid_puts()
164 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), in vid_puts()
168 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), in vid_puts()
|
| /illumos-gate/usr/src/boot/efi/include/Guid/ |
| H A D | GlobalVariable.h | 44 #define EFI_LANG_CODES_VARIABLE_NAME L"LangCodes"
49 #define EFI_LANG_VARIABLE_NAME L"Lang"
54 #define EFI_TIME_OUT_VARIABLE_NAME L"Timeout"
59 #define EFI_PLATFORM_LANG_CODES_VARIABLE_NAME L"PlatformLangCodes"
64 #define EFI_PLATFORM_LANG_VARIABLE_NAME L"PlatformLang"
69 #define EFI_CON_IN_VARIABLE_NAME L"ConIn"
70 #define EFI_CON_OUT_VARIABLE_NAME L"ConOut"
71 #define EFI_ERR_OUT_VARIABLE_NAME L"ErrOut"
76 #define EFI_CON_IN_DEV_VARIABLE_NAME L"ConInDev"
77 #define EFI_CON_OUT_DEV_VARIABLE_NAME L"ConOutDev"
[all …]
|
| /illumos-gate/usr/src/cmd/sort/ |
| H A D | fields.c | 112 #define W_IS_BLANK(x) (iswspace(x) && (x) != L'\n')
121 #define W_INTERFIELD_SEPARATOR L'\0'
363 field_boundary(field_t *F, line_rec_t *L, int is_end, int is_blanks) in field_boundary() argument
365 char *S = L->l_data.sp; in field_boundary()
367 char *eol = S + L->l_data_length; in field_boundary()
375 return (L->l_data_length); in field_boundary()
390 if ((ret = MAX(T - S, 0) + offset) >= L->l_data_length) in field_boundary()
391 return (L->l_data_length); in field_boundary()
397 field_delimit(field_t *F, line_rec_t *L, ssize_t *start, ssize_t *end) in field_delimit() argument
401 *start = field_boundary(F, L, 0, in field_delimit()
[all …]
|
| /illumos-gate/usr/src/lib/libxcurses/src/libc/xcurses/ |
| H A D | vid_puts.c | 110 0L, 0L, 0L in vid_puts()
147 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L in vid_puts()
155 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L in vid_puts()
163 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L in vid_puts()
172 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L in vid_puts()
180 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L in vid_puts()
|
| /illumos-gate/usr/src/cmd/sgs/yacc/common/ |
| H A D | y2.c | 335 (void) defin(0, L"$end"); in setup()
337 (void) defin(0, L"error"); in setup()
338 (void) defin(1, L"$accept"); in setup()
358 case L';': in setup()
423 case L',': in setup()
426 case L';': in setup()
473 case L',': in setup()
477 case L';': in setup()
636 if (t == L'|') { in setup()
700 if (t == L'=') { in setup()
[all …]
|