diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-07-21 21:59:36 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-07-21 21:59:36 -0300 |
| commit | 45b173cbf89597123267a69bace778cf498d6c98 (patch) | |
| tree | 561573acd810544ba8c743df0335e5fbe64f302c /liolib.c | |
| parent | a94cba4b88a940cba7a35244b8a1b393f33a905c (diff) | |
| download | lua-45b173cbf89597123267a69bace778cf498d6c98.tar.gz lua-45b173cbf89597123267a69bace778cf498d6c98.tar.bz2 lua-45b173cbf89597123267a69bace778cf498d6c98.zip | |
warnings/details
Diffstat (limited to 'liolib.c')
| -rw-r--r-- | liolib.c | 12 |
1 files changed, 2 insertions, 10 deletions
| @@ -1,11 +1,10 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: liolib.c,v 1.119 2001/07/12 18:11:58 roberto Exp roberto $ | 2 | ** $Id: liolib.c,v 1.120 2001/07/16 18:48:31 roberto Exp roberto $ |
| 3 | ** Standard I/O (and system) library | 3 | ** Standard I/O (and system) library |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| 6 | 6 | ||
| 7 | 7 | ||
| 8 | #include <ctype.h> | ||
| 9 | #include <stdio.h> | 8 | #include <stdio.h> |
| 10 | #include <stdlib.h> | 9 | #include <stdlib.h> |
| 11 | #include <string.h> | 10 | #include <string.h> |
| @@ -25,13 +24,6 @@ | |||
| 25 | #endif | 24 | #endif |
| 26 | 25 | ||
| 27 | 26 | ||
| 28 | #ifndef l_realloc | ||
| 29 | #define l_malloc(s) malloc(s) | ||
| 30 | #define l_realloc(b,os,s) realloc(b, s) | ||
| 31 | #define l_free(b, os) free(b) | ||
| 32 | #endif | ||
| 33 | |||
| 34 | |||
| 35 | 27 | ||
| 36 | #ifdef POPEN | 28 | #ifdef POPEN |
| 37 | /* FILE *popen(); | 29 | /* FILE *popen(); |
| @@ -330,7 +322,7 @@ static int io_read (lua_State *L) { | |||
| 330 | success = 1; /* always success */ | 322 | success = 1; /* always success */ |
| 331 | break; | 323 | break; |
| 332 | case l_c('w'): /* word */ | 324 | case l_c('w'): /* word */ |
| 333 | lua_error(L, "option `*w' is deprecated"); | 325 | lua_error(L, l_s("option `*w' is deprecated")); |
| 334 | break; | 326 | break; |
| 335 | case l_c('u'): { /* read until */ | 327 | case l_c('u'): { /* read until */ |
| 336 | size_t pl = lua_strlen(L, n) - 2; | 328 | size_t pl = lua_strlen(L, n) - 2; |
