rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

"dofile" now accepts NULL as parameter, to run stdin.

This commit is contained in:
Roberto Ierusalimschy 1995-10-23 11:54:11 -02:00
parent b5745d11cd
commit fa71304e54
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
inout.c
View File

@ -5,7 +5,7 @@
** Also provides some predefined lua functions. ** Also provides some predefined lua functions.
*/ */
char *rcs_inout="$Id: inout.c,v 2.22 1995/10/09 13:06:20 roberto Exp roberto $"; char *rcs_inout="$Id: inout.c,v 2.23 1995/10/17 11:58:41 roberto Exp roberto $";
#include <stdio.h> #include <stdio.h>
#include <stdlib.h> #include <stdlib.h>
@ -60,7 +60,13 @@ static int stringinput (void)
char *lua_openfile (char *fn) char *lua_openfile (char *fn)
{ {
lua_setinput (fileinput); lua_setinput (fileinput);
fp = fopen (fn, "r"); if (fn == NULL)
{
fp = stdin;
fn = "(stdin)";
}
else
fp = fopen (fn, "r");
if (fp == NULL) if (fp == NULL)
{ {
static char buff[255]; static char buff[255];
@ -77,7 +83,7 @@ char *lua_openfile (char *fn)
*/ */
void lua_closefile (void) void lua_closefile (void)
{ {
if (fp != NULL) if (fp != NULL && fp != stdin)
{ {
fclose (fp); fclose (fp);
fp = NULL; fp = NULL;