diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-11-23 17:29:04 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-11-23 17:29:04 -0200 |
| commit | 599f1742c628db70ef84794b3b8b25fdef9e5004 (patch) | |
| tree | 6221729270cb636861de393484c048b955a72726 | |
| parent | 73abfde2ef16223b12cf04800f6e53bfc68ad356 (diff) | |
| download | lua-599f1742c628db70ef84794b3b8b25fdef9e5004.tar.gz lua-599f1742c628db70ef84794b3b8b25fdef9e5004.tar.bz2 lua-599f1742c628db70ef84794b3b8b25fdef9e5004.zip | |
detail (typo in comments)
| -rw-r--r-- | lapi.c | 4 | ||||
| -rw-r--r-- | lcode.c | 4 | ||||
| -rw-r--r-- | ldebug.c | 4 | ||||
| -rw-r--r-- | lgc.c | 6 | ||||
| -rw-r--r-- | lobject.c | 4 | ||||
| -rw-r--r-- | lobject.h | 4 | ||||
| -rw-r--r-- | lstring.h | 4 | ||||
| -rw-r--r-- | lstrlib.c | 4 | ||||
| -rw-r--r-- | ltable.c | 4 |
9 files changed, 19 insertions, 19 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lapi.c,v 2.273 2017/11/02 11:28:56 roberto Exp $ | 2 | ** $Id: lapi.c,v 2.276 2017/11/07 13:25:26 roberto Exp roberto $ |
| 3 | ** Lua API | 3 | ** Lua API |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -205,7 +205,7 @@ LUA_API void lua_settop (lua_State *L, int idx) { | |||
| 205 | ** Reverse the stack segment from 'from' to 'to' | 205 | ** Reverse the stack segment from 'from' to 'to' |
| 206 | ** (auxiliary to 'lua_rotate') | 206 | ** (auxiliary to 'lua_rotate') |
| 207 | ** Note that we move(copy) only the value inside the stack. | 207 | ** Note that we move(copy) only the value inside the stack. |
| 208 | ** (We do not move addicional fields that may exist.) | 208 | ** (We do not move additional fields that may exist.) |
| 209 | */ | 209 | */ |
| 210 | static void reverse (lua_State *L, StkId from, StkId to) { | 210 | static void reverse (lua_State *L, StkId from, StkId to) { |
| 211 | for (; from < to; from++, to--) { | 211 | for (; from < to; from++, to--) { |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lcode.c,v 2.134 2017/11/22 18:41:20 roberto Exp roberto $ | 2 | ** $Id: lcode.c,v 2.135 2017/11/22 19:15:44 roberto Exp roberto $ |
| 3 | ** Code generator for Lua | 3 | ** Code generator for Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -1331,7 +1331,7 @@ static void codeeq (FuncState *fs, BinOpr opr, expdesc *e1, expdesc *e2) { | |||
| 1331 | 1331 | ||
| 1332 | 1332 | ||
| 1333 | /* | 1333 | /* |
| 1334 | ** Aplly prefix operation 'op' to expression 'e'. | 1334 | ** Apply prefix operation 'op' to expression 'e'. |
| 1335 | */ | 1335 | */ |
| 1336 | void luaK_prefix (FuncState *fs, UnOpr op, expdesc *e, int line) { | 1336 | void luaK_prefix (FuncState *fs, UnOpr op, expdesc *e, int line) { |
| 1337 | static const expdesc ef = {VKINT, {0}, NO_JUMP, NO_JUMP}; | 1337 | static const expdesc ef = {VKINT, {0}, NO_JUMP, NO_JUMP}; |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldebug.c,v 2.144 2017/11/13 15:36:52 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 2.145 2017/11/23 16:35:54 roberto Exp roberto $ |
| 3 | ** Debug Interface | 3 | ** Debug Interface |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -51,7 +51,7 @@ static int currentpc (CallInfo *ci) { | |||
| 51 | /* | 51 | /* |
| 52 | ** Get a "base line" to find the line corresponding to an instruction. | 52 | ** Get a "base line" to find the line corresponding to an instruction. |
| 53 | ** For that, search the array of absolute line info for the largest saved | 53 | ** For that, search the array of absolute line info for the largest saved |
| 54 | ** instruction smaller or equal to the wanted instrution. A special | 54 | ** instruction smaller or equal to the wanted instruction. A special |
| 55 | ** case is when there is no absolute info or the instruction is before | 55 | ** case is when there is no absolute info or the instruction is before |
| 56 | ** the first absolute one. | 56 | ** the first absolute one. |
| 57 | */ | 57 | */ |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 2.236 2017/10/31 15:29:28 roberto Exp $ | 2 | ** $Id: lgc.c,v 2.238 2017/11/07 13:25:26 roberto Exp roberto $ |
| 3 | ** Garbage Collector | 3 | ** Garbage Collector |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -507,7 +507,7 @@ static lu_mem traversetable (global_State *g, Table *h) { | |||
| 507 | ** mode, check the generational invariant. If the cache is old, | 507 | ** mode, check the generational invariant. If the cache is old, |
| 508 | ** everything is ok. If the prototype is 'old0', everything | 508 | ** everything is ok. If the prototype is 'old0', everything |
| 509 | ** is ok too. (It will naturally be visited again.) If the | 509 | ** is ok too. (It will naturally be visited again.) If the |
| 510 | ** prototype is older than 'old0', then its cache (whith is new) | 510 | ** prototype is older than 'old0', then its cache (which is new) |
| 511 | ** must be visited again in the next collection, so the prototype | 511 | ** must be visited again in the next collection, so the prototype |
| 512 | ** goes to the 'protogray' list. (If the prototype has a cache, | 512 | ** goes to the 'protogray' list. (If the prototype has a cache, |
| 513 | ** it is already immutable and does not need other barriers; | 513 | ** it is already immutable and does not need other barriers; |
| @@ -1195,7 +1195,7 @@ static void entergen (lua_State *L, global_State *g) { | |||
| 1195 | luaC_runtilstate(L, bitmask(GCSpause)); /* prepare to start a new cycle */ | 1195 | luaC_runtilstate(L, bitmask(GCSpause)); /* prepare to start a new cycle */ |
| 1196 | luaC_runtilstate(L, bitmask(GCSpropagate)); /* start new cycle */ | 1196 | luaC_runtilstate(L, bitmask(GCSpropagate)); /* start new cycle */ |
| 1197 | atomic(L); | 1197 | atomic(L); |
| 1198 | /* sweep all ellements making them old */ | 1198 | /* sweep all elements making them old */ |
| 1199 | sweep2old(L, &g->allgc); | 1199 | sweep2old(L, &g->allgc); |
| 1200 | /* everything alive now is old */ | 1200 | /* everything alive now is old */ |
| 1201 | g->reallyold = g->old = g->survival = g->allgc; | 1201 | g->reallyold = g->old = g->survival = g->allgc; |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lobject.c,v 2.119 2017/11/08 14:50:23 roberto Exp roberto $ | 2 | ** $Id: lobject.c,v 2.120 2017/11/16 13:19:06 roberto Exp roberto $ |
| 3 | ** Some generic functions over Lua objects | 3 | ** Some generic functions over Lua objects |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -272,7 +272,7 @@ static const char *l_str2dloc (const char *s, lua_Number *result, int mode) { | |||
| 272 | ** - 'n'/'N' means 'inf' or 'nan' (which should be rejected) | 272 | ** - 'n'/'N' means 'inf' or 'nan' (which should be rejected) |
| 273 | ** - '.' just optimizes the search for the common case (nothing special) | 273 | ** - '.' just optimizes the search for the common case (nothing special) |
| 274 | ** This function accepts both the current locale or a dot as the radix | 274 | ** This function accepts both the current locale or a dot as the radix |
| 275 | ** mark. If the convertion fails, it may mean number has a dot but | 275 | ** mark. If the conversion fails, it may mean number has a dot but |
| 276 | ** locale accepts something else. In that case, the code copies 's' | 276 | ** locale accepts something else. In that case, the code copies 's' |
| 277 | ** to a buffer (because 's' is read-only), changes the dot to the | 277 | ** to a buffer (because 's' is read-only), changes the dot to the |
| 278 | ** current locale radix mark, and tries to convert again. | 278 | ** current locale radix mark, and tries to convert again. |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lobject.h,v 2.125 2017/06/29 15:06:44 roberto Exp $ | 2 | ** $Id: lobject.h,v 2.130 2017/11/07 13:25:26 roberto Exp roberto $ |
| 3 | ** Type definitions for Lua objects | 3 | ** Type definitions for Lua objects |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -529,7 +529,7 @@ typedef union Closure { | |||
| 529 | 529 | ||
| 530 | /* | 530 | /* |
| 531 | ** Nodes for Hash tables. A pack of two TValue's (key-value pairs) | 531 | ** Nodes for Hash tables. A pack of two TValue's (key-value pairs) |
| 532 | ** plus a 'next' field to link colliding entries. The distribuition | 532 | ** plus a 'next' field to link colliding entries. The distribution |
| 533 | ** of the key's fields ('key_tt' and 'key_val') not forming a proper | 533 | ** of the key's fields ('key_tt' and 'key_val') not forming a proper |
| 534 | ** 'TValue' allows for a smaller size for 'Node' both in 4-byte | 534 | ** 'TValue' allows for a smaller size for 'Node' both in 4-byte |
| 535 | ** and 8-byte alignments. | 535 | ** and 8-byte alignments. |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstring.h,v 1.61 2015/11/03 15:36:01 roberto Exp roberto $ | 2 | ** $Id: lstring.h,v 1.62 2017/07/27 13:50:16 roberto Exp roberto $ |
| 3 | ** String table (keep all strings handled by Lua) | 3 | ** String table (keep all strings handled by Lua) |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -14,7 +14,7 @@ | |||
| 14 | 14 | ||
| 15 | /* | 15 | /* |
| 16 | ** Memory-allocation error message must be preallocated (it cannot | 16 | ** Memory-allocation error message must be preallocated (it cannot |
| 17 | ** be created after memory is exausted) | 17 | ** be created after memory is exhausted) |
| 18 | */ | 18 | */ |
| 19 | #define MEMERRMSG "not enough memory" | 19 | #define MEMERRMSG "not enough memory" |
| 20 | 20 | ||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstrlib.c,v 1.258 2017/11/08 14:50:23 roberto Exp roberto $ | 2 | ** $Id: lstrlib.c,v 1.259 2017/11/16 13:19:06 roberto Exp roberto $ |
| 3 | ** Standard library for string operations and pattern-matching | 3 | ** Standard library for string operations and pattern-matching |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -1117,7 +1117,7 @@ static void addliteral (lua_State *L, luaL_Buffer *b, int arg) { | |||
| 1117 | else { /* integers */ | 1117 | else { /* integers */ |
| 1118 | lua_Integer n = lua_tointeger(L, arg); | 1118 | lua_Integer n = lua_tointeger(L, arg); |
| 1119 | const char *format = (n == LUA_MININTEGER) /* corner case? */ | 1119 | const char *format = (n == LUA_MININTEGER) /* corner case? */ |
| 1120 | ? "0x%" LUA_INTEGER_FRMLEN "x" /* use hexa */ | 1120 | ? "0x%" LUA_INTEGER_FRMLEN "x" /* use hex */ |
| 1121 | : LUA_INTEGER_FMT; /* else use default format */ | 1121 | : LUA_INTEGER_FMT; /* else use default format */ |
| 1122 | nb = l_sprintf(buff, MAX_ITEM, format, (LUAI_UACINT)n); | 1122 | nb = l_sprintf(buff, MAX_ITEM, format, (LUAI_UACINT)n); |
| 1123 | } | 1123 | } |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltable.c,v 2.125 2017/06/29 15:06:44 roberto Exp roberto $ | 2 | ** $Id: ltable.c,v 2.126 2017/11/08 14:50:23 roberto Exp roberto $ |
| 3 | ** Lua tables (hash) | 3 | ** Lua tables (hash) |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -685,7 +685,7 @@ static lua_Unsigned hash_search (Table *t, lua_Unsigned j) { | |||
| 685 | ** First, try the array part: if there is an array part and its last | 685 | ** First, try the array part: if there is an array part and its last |
| 686 | ** element is nil, there must be a boundary there; a binary search | 686 | ** element is nil, there must be a boundary there; a binary search |
| 687 | ** finds that boundary. Otherwise, if the hash part is empty or does not | 687 | ** finds that boundary. Otherwise, if the hash part is empty or does not |
| 688 | ** contain 'j + 1', 'j' is a boundary. Othersize, call 'hash_search' | 688 | ** contain 'j + 1', 'j' is a boundary. Otherwize, call 'hash_search' |
| 689 | ** to find a boundary in the hash part. | 689 | ** to find a boundary in the hash part. |
| 690 | */ | 690 | */ |
| 691 | lua_Unsigned luaH_getn (Table *t) { | 691 | lua_Unsigned luaH_getn (Table *t) { |
