diff --git a/lbuiltin.c b/lbuiltin.c
index 98918b54..2ebdd66f 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lbuiltin.c,v 1.71 1999/11/10 15:41:11 roberto Exp roberto $
+** $Id: lbuiltin.c,v 1.72 1999/11/11 17:02:40 roberto Exp roberto $
 ** Built-in functions
 ** See Copyright Notice in lua.h
 */
@@ -369,16 +369,16 @@ static void luaB_tostring (void) {
       lua_pushobject(obj);
       return;
     case LUA_T_ARRAY:
-      sprintf(buff, "table: %p", (void *)o->value.a);
+      sprintf(buff, "table: %p", o->value.a);
       break;
     case LUA_T_CLOSURE:
-      sprintf(buff, "function: %p", (void *)o->value.cl);
+      sprintf(buff, "function: %p", o->value.cl);
       break;
     case LUA_T_PROTO:
-      sprintf(buff, "function: %p", (void *)o->value.tf);
+      sprintf(buff, "function: %p", o->value.tf);
       break;
     case LUA_T_CPROTO:
-      sprintf(buff, "function: %p", (void *)o->value.f);
+      sprintf(buff, "function: %p", o->value.f);
       break;
     case LUA_T_USERDATA:
       sprintf(buff, "userdata: %p", o->value.ts->u.d.value);
diff --git a/lua.c b/lua.c
index 040aa72f..ac7d05e2 100644
--- a/lua.c
+++ b/lua.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lua.c,v 1.24 1999/11/09 17:59:35 roberto Exp roberto $
+** $Id: lua.c,v 1.25 1999/11/12 13:54:44 roberto Exp roberto $
 ** Lua stand-alone interpreter
 ** See Copyright Notice in lua.h
 */
@@ -18,7 +18,7 @@
 #ifdef _POSIX_SOURCE
 #include <unistd.h>
 #else
-#define isatty(x)       (x==0)  /* assume stdin is a tty */
+static int isatty (int x) { return x==0; }  /* assume stdin is a tty */
 #endif