diff --git a/lapi.c b/lapi.c index d75a824d..ae09baf4 100644 --- a/lapi.c +++ b/lapi.c @@ -1,5 +1,5 @@ /* -** $Id: lapi.c,v 1.34 1999/02/04 17:47:59 roberto Exp roberto $ +** $Id: lapi.c,v 1.35 1999/02/08 17:07:59 roberto Exp roberto $ ** Lua API ** See Copyright Notice in lua.h */ @@ -467,11 +467,6 @@ int lua_setdebug (int debug) { */ -/* Hooks */ -lua_CHFunction lua_callhook = NULL; -lua_LHFunction lua_linehook = NULL; - - lua_Function lua_stackedfunction (int level) { StkId i; diff --git a/lbuiltin.c b/lbuiltin.c index 024734fd..6c13ad32 100644 --- a/lbuiltin.c +++ b/lbuiltin.c @@ -1,5 +1,5 @@ /* -** $Id: lbuiltin.c,v 1.49 1999/02/04 19:12:35 roberto Exp roberto $ +** $Id: lbuiltin.c,v 1.50 1999/02/08 16:29:35 roberto Exp roberto $ ** Built-in functions ** See Copyright Notice in lua.h */ @@ -29,7 +29,7 @@ /* ** {====================================================== -** Auxliliar functions +** Auxiliary functions ** ======================================================= */ diff --git a/ldo.c b/ldo.c index 16f79c51..9787e76f 100644 --- a/ldo.c +++ b/ldo.c @@ -1,5 +1,5 @@ /* -** $Id: ldo.c,v 1.30 1999/01/15 11:38:33 roberto Exp roberto $ +** $Id: ldo.c,v 1.31 1999/02/04 17:47:59 roberto Exp roberto $ ** Stack and Call structure of Lua ** See Copyright Notice in lua.h */ @@ -136,7 +136,7 @@ static StkId callC (lua_CFunction f, StkId base) if (L->callhook) luaD_callHook(base, NULL, 0); (*f)(); /* do the actual call */ - if (L->callhook) /* func may have changed lua_callhook */ + if (L->callhook) /* func may have changed callhook */ luaD_callHook(base, NULL, 1); firstResult = CS->base; *CS = oldCLS; diff --git a/lobject.c b/lobject.c index b68f7e98..45682c50 100644 --- a/lobject.c +++ b/lobject.c @@ -1,5 +1,5 @@ /* -** $Id: lobject.c,v 1.15 1999/01/04 13:37:07 roberto Exp roberto $ +** $Id: lobject.c,v 1.16 1999/01/13 19:08:37 roberto Exp roberto $ ** Some generic functions over Lua objects ** See Copyright Notice in lua.h */ @@ -112,7 +112,7 @@ double luaO_str2d (char *s) { /* LUA_NUMBER */ s++; sig = -1; } - if (!isdigit((unsigned char)*s)) return -1; /* no digit in expoent part? */ + if (!isdigit((unsigned char)*s)) return -1; /* no digit in the exponent? */ do { e = 10*e + (*(s++)-'0'); } while (isdigit((unsigned char)*s)); diff --git a/lstrlib.c b/lstrlib.c index 87d5ac47..eec14d34 100644 --- a/lstrlib.c +++ b/lstrlib.c @@ -1,5 +1,5 @@ /* -** $Id: lstrlib.c,v 1.24 1999/02/04 19:29:51 roberto Exp roberto $ +** $Id: lstrlib.c,v 1.25 1999/02/05 11:22:58 roberto Exp roberto $ ** Standard library for strings and pattern-matching ** See Copyright Notice in lua.h */ @@ -471,7 +471,7 @@ static void str_format (void) { else { /* format item */ struct Capture cap; char form[MAX_FORMAT]; /* to store the format ('%...') */ - char *buff; /* to store the formated item */ + char *buff; /* to store the formatted item */ char *initf = strfrmt; form[0] = '%'; if (isdigit((unsigned char)*initf) && *(initf+1) == '$') { @@ -505,7 +505,7 @@ static void str_format (void) { long l; char *s = luaL_check_lstr(arg, &l); if (cap.capture[1].len == 0 && l >= 100) { - /* no precision and string is too big to be formated; + /* no precision and string is too big to be formatted; keep original string */ addnchar(s, l); continue; /* skip the "addsize" at the end */ diff --git a/manual.tex b/manual.tex index 20420570..be5672d5 100644 --- a/manual.tex +++ b/manual.tex @@ -1,4 +1,4 @@ -% $Id: manual.tex,v 1.21 1998/11/20 15:41:43 roberto Exp roberto $ +% $Id: manual.tex,v 1.22 1999/02/05 12:15:07 roberto Exp roberto $ \documentclass[11pt]{article} \usepackage{fullpage,bnf} @@ -41,7 +41,7 @@ Waldemar Celes \tecgraf\ --- Computer Science Department --- PUC-Rio } -%\date{\small \verb$Date: 1998/11/20 15:41:43 $} +%\date{\small \verb$Date: 1999/02/05 12:15:07 $} \maketitle @@ -91,7 +91,7 @@ a intera\c{c}\~ao entre programas Lua e programas C hospedeiros. \begin{quotation} \noindent \footnotesize -Copyright \copyright\ 1994--1998 TeCGraf, PUC-Rio. All rights reserved. +Copyright \copyright\ 1994--1999 TeCGraf, PUC-Rio. All rights reserved. \noindent Permission is hereby granted, without written agreement and without license @@ -697,10 +697,11 @@ An absent else-part is equivalent to \verb|else nil|. \subsubsection{Assignment Expressions} \begin{Produc} -\produc{exp}{\ter{(} var \ter{=} exp1 \ter{)}} +\produc{exp}{\ter{(} varlist1 \ter{=} explist1 \ter{)}} \end{Produc}% -An \Index{assignment expression} executes a regular assignment, -and results in the final value of its right hand expression. +An \Index{assignment expression} executes a multiple assignment, +and results in the final value of its first right hand expression +(that is, the value assigned to the first variable in the variable list). \subsubsection{Table Constructors} \label{tableconstructor} Table \Index{constructors} are expressions that create tables; @@ -2752,7 +2753,8 @@ plus a string describing the error. \subsubsection*{\ff \T{seek (filehandle [, whence] [, offset])}}\Deffunc{seek} -Sets the file position, measured in bytes from the beginning of the file, +Sets and gets the file position, +measured in bytes from the beginning of the file, to the position given by \verb|offset| plus a base specified by the string \verb|whence|, as follows: \begin{description}