--- lua-5.1.4.orig/src/liolib.c	2008/01/18 17:47:43	2.73.1.3
+++ lua-5.1.4.orig/src/liolib.c	2010/05/14 15:29:29
@@ -276,7 +276,10 @@
     lua_pushnumber(L, d);
     return 1;
   }
-  else return 0;  /* read fails */
+  else {
+    lua_pushnil(L);  /* "result" to be removed */
+    return 0;  /* read fails */
+  }
 }