From e4e5aa85a24bba6c243aeeaedc66ec712856c6db Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Thu, 16 Nov 2017 11:19:06 -0200 Subject: [PATCH] detail ('signal' -> 'sign' in comments) --- lbaselib.c | 4 ++-- lbitlib.c | 4 ++-- liolib.c | 6 +++--- lobject.c | 8 ++++---- lstrlib.c | 4 ++-- 5 files changed, 13 insertions(+), 13 deletions(-) diff --git a/lbaselib.c b/lbaselib.c index 87b0ce83..00452f2d 100644 --- a/lbaselib.c +++ b/lbaselib.c @@ -1,5 +1,5 @@ /* -** $Id: lbaselib.c,v 1.316 2017/05/26 19:14:29 roberto Exp roberto $ +** $Id: lbaselib.c,v 1.317 2017/06/27 18:32:49 roberto Exp roberto $ ** Basic library ** See Copyright Notice in lua.h */ @@ -49,7 +49,7 @@ static const char *b_str2int (const char *s, int base, lua_Integer *pn) { lua_Unsigned n = 0; int neg = 0; s += strspn(s, SPACECHARS); /* skip initial spaces */ - if (*s == '-') { s++; neg = 1; } /* handle signal */ + if (*s == '-') { s++; neg = 1; } /* handle sign */ else if (*s == '+') s++; if (!isalnum((unsigned char)*s)) /* no digit? */ return NULL; diff --git a/lbitlib.c b/lbitlib.c index 02483d69..63dbbe1d 100644 --- a/lbitlib.c +++ b/lbitlib.c @@ -1,5 +1,5 @@ /* -** $Id: lbitlib.c,v 1.29 2015/10/08 15:55:35 roberto Exp roberto $ +** $Id: lbitlib.c,v 1.30 2015/11/11 19:08:09 roberto Exp roberto $ ** Standard library for bitwise operations ** See Copyright Notice in lua.h */ @@ -131,7 +131,7 @@ static int b_arshift (lua_State *L) { else { /* arithmetic shift for 'negative' number */ if (i >= LUA_NBITS) r = ALLONES; else - r = trim((r >> i) | ~(trim(~(lua_Unsigned)0) >> i)); /* add signal bit */ + r = trim((r >> i) | ~(trim(~(lua_Unsigned)0) >> i)); /* add sign bit */ pushunsigned(L, r); return 1; } diff --git a/liolib.c b/liolib.c index 3fa87461..19068f87 100644 --- a/liolib.c +++ b/liolib.c @@ -1,5 +1,5 @@ /* -** $Id: liolib.c,v 2.151 2016/12/20 18:37:00 roberto Exp roberto $ +** $Id: liolib.c,v 2.152 2017/02/09 14:50:05 roberto Exp roberto $ ** Standard I/O (and system) library ** See Copyright Notice in lua.h */ @@ -447,7 +447,7 @@ static int read_number (lua_State *L, FILE *f) { decp[1] = '.'; /* always accept a dot */ l_lockfile(rn.f); do { rn.c = l_getc(rn.f); } while (isspace(rn.c)); /* skip spaces */ - test2(&rn, "-+"); /* optional signal */ + test2(&rn, "-+"); /* optional sign */ if (test2(&rn, "00")) { if (test2(&rn, "xX")) hex = 1; /* numeral is hexadecimal */ else count = 1; /* count initial '0' as a valid digit */ @@ -456,7 +456,7 @@ static int read_number (lua_State *L, FILE *f) { if (test2(&rn, decp)) /* decimal point? */ count += readdigits(&rn, hex); /* fractional part */ if (count > 0 && test2(&rn, (hex ? "pP" : "eE"))) { /* exponent mark? */ - test2(&rn, "-+"); /* exponent signal */ + test2(&rn, "-+"); /* exponent sign */ readdigits(&rn, 0); /* exponent digits */ } ungetc(rn.c, rn.f); /* unread look-ahead char */ diff --git a/lobject.c b/lobject.c index 32cdc4b0..fb2c172c 100644 --- a/lobject.c +++ b/lobject.c @@ -1,5 +1,5 @@ /* -** $Id: lobject.c,v 2.118 2017/10/10 20:05:40 roberto Exp roberto $ +** $Id: lobject.c,v 2.119 2017/11/08 14:50:23 roberto Exp roberto $ ** Some generic functions over Lua objects ** See Copyright Notice in lua.h */ @@ -206,7 +206,7 @@ static lua_Number lua_strx2number (const char *s, char **endptr) { int hasdot = 0; /* true after seen a dot */ *endptr = cast(char *, s); /* nothing is valid yet */ while (lisspace(cast_uchar(*s))) s++; /* skip initial spaces */ - neg = isneg(&s); /* check signal */ + neg = isneg(&s); /* check sign */ if (!(*s == '0' && (*(s + 1) == 'x' || *(s + 1) == 'X'))) /* check '0x' */ return 0.0; /* invalid format (no '0x') */ for (s += 2; ; s++) { /* skip '0x' and read numeral */ @@ -230,9 +230,9 @@ static lua_Number lua_strx2number (const char *s, char **endptr) { e *= 4; /* each digit multiplies/divides value by 2^4 */ if (*s == 'p' || *s == 'P') { /* exponent part? */ int exp1 = 0; /* exponent value */ - int neg1; /* exponent signal */ + int neg1; /* exponent sign */ s++; /* skip 'p' */ - neg1 = isneg(&s); /* signal */ + neg1 = isneg(&s); /* sign */ if (!lisdigit(cast_uchar(*s))) return 0.0; /* invalid; must have at least one digit */ while (lisdigit(cast_uchar(*s))) /* read exponent */ diff --git a/lstrlib.c b/lstrlib.c index 626c9159..9a4cf90d 100644 --- a/lstrlib.c +++ b/lstrlib.c @@ -1,5 +1,5 @@ /* -** $Id: lstrlib.c,v 1.257 2017/07/07 16:34:32 roberto Exp roberto $ +** $Id: lstrlib.c,v 1.258 2017/11/08 14:50:23 roberto Exp roberto $ ** Standard library for string operations and pattern-matching ** See Copyright Notice in lua.h */ @@ -994,7 +994,7 @@ static int num2straux (char *buff, int sz, lua_Number x) { lua_Number m = l_mathop(frexp)(x, &e); /* 'x' fraction and exponent */ int n = 0; /* character count */ if (m < 0) { /* is number negative? */ - buff[n++] = '-'; /* add signal */ + buff[n++] = '-'; /* add sign */ m = -m; /* make it positive */ } buff[n++] = '0'; buff[n++] = 'x'; /* add "0x" */