From f2d35bdc7831dce6b1e9fcd639510bdc91488bc2 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Wed, 10 Mar 1999 11:19:41 -0300 Subject: format for file source is independent of "ldo". --- lauxlib.c | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'lauxlib.c') diff --git a/lauxlib.c b/lauxlib.c index 090ded3c..a46591a1 100644 --- a/lauxlib.c +++ b/lauxlib.c @@ -1,5 +1,5 @@ /* -** $Id: lauxlib.c,v 1.14 1999/02/25 19:13:56 roberto Exp roberto $ +** $Id: lauxlib.c,v 1.15 1999/03/04 21:17:26 roberto Exp roberto $ ** Auxiliary functions for building Lua libraries ** See Copyright Notice in lua.h */ @@ -126,3 +126,10 @@ void luaL_chunkid (char *out, char *source, int len) { } } + +void luaL_filesource (char *out, char *filename, int len) { + if (filename == NULL) + strcpy(out, "@(stdin)"); + else + sprintf(out, "@%.*s", len-2, filename); /* -2 for '@' and '\0' */ +} -- cgit v1.2.3-55-g6feb