lua

A copy of the Lua development repository
Log | Files | Refs | README

commit ff9ca88aa6cdc6e5409f2481f3d74a2436e81a7b
parent 463edee2fd6436d9ad6ae9f2f3d36b742416a479
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri, 24 Oct 2014 09:42:04 -0200

added some casts to avoid warnings in some compilers

Diffstat:
Mlobject.c | 6+++---
Mlstrlib.c | 6+++---
2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/lobject.c b/lobject.c @@ -1,5 +1,5 @@ /* -** $Id: lobject.c,v 2.92 2014/10/10 22:23:04 roberto Exp roberto $ +** $Id: lobject.c,v 2.93 2014/10/17 16:28:21 roberto Exp roberto $ ** Some generic functions over Lua objects ** See Copyright Notice in lua.h */ @@ -317,8 +317,8 @@ int luaO_utf8esc (char *buff, unsigned long x) { buff[UTF8BUFFSZ - 1] = cast(char, x); else { /* need continuation bytes */ unsigned int mfb = 0x3f; /* maximum that fits in first byte */ - do { - buff[UTF8BUFFSZ - (n++)] = 0x80 | (x & 0x3f); /* add continuation byte */ + do { /* add continuation bytes */ + buff[UTF8BUFFSZ - (n++)] = cast(char, 0x80 | (x & 0x3f)); x >>= 6; /* remove added bits */ mfb >>= 1; /* now there is one less bit available in first byte */ } while (x > mfb); /* still needs continuation byte? */ diff --git a/lstrlib.c b/lstrlib.c @@ -1,5 +1,5 @@ /* -** $Id: lstrlib.c,v 1.204 2014/10/17 16:28:21 roberto Exp roberto $ +** $Id: lstrlib.c,v 1.205 2014/10/20 16:44:54 roberto Exp roberto $ ** Standard library for string operations and pattern-matching ** See Copyright Notice in lua.h */ @@ -1136,10 +1136,10 @@ static void packint (luaL_Buffer *b, lua_Unsigned n, char *buff = luaL_prepbuffsize(b, size); int i; for (i = 0; i < size - 1; i++) { - buff[islittle ? i : size - 1 - i] = (n & MC); + buff[islittle ? i : size - 1 - i] = (char)(n & MC); n = (n >> NB) | mask; } - buff[islittle ? i : size - 1 - i] = (n & MC); + buff[islittle ? i : size - 1 - i] = (char)(n & MC); luaL_addsize(b, size); /* add result to buffer */ }