aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-02-12 17:23:02 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-02-12 17:23:02 -0200
commitbf6d2ccf92768be938aaac0a0bfc87833b793e8f (patch)
tree0d1455129fd35ea93d46a583ba814716e66fd79f
parentb82ff713e321f4b65b2dc41fc1fe97633f7b197d (diff)
downloadlua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.tar.gz
lua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.tar.bz2
lua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.zip
details
-rw-r--r--lapi.c7
-rw-r--r--lbuiltin.c4
-rw-r--r--ldo.c4
-rw-r--r--lobject.c4
-rw-r--r--lstrlib.c6
-rw-r--r--manual.tex16
6 files changed, 19 insertions, 22 deletions
diff --git a/lapi.c b/lapi.c
index d75a824d..ae09baf4 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 1.34 1999/02/04 17:47:59 roberto Exp roberto $ 2** $Id: lapi.c,v 1.35 1999/02/08 17:07:59 roberto Exp roberto $
3** Lua API 3** Lua API
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -467,11 +467,6 @@ int lua_setdebug (int debug) {
467*/ 467*/
468 468
469 469
470/* Hooks */
471lua_CHFunction lua_callhook = NULL;
472lua_LHFunction lua_linehook = NULL;
473
474
475lua_Function lua_stackedfunction (int level) 470lua_Function lua_stackedfunction (int level)
476{ 471{
477 StkId i; 472 StkId i;
diff --git a/lbuiltin.c b/lbuiltin.c
index 024734fd..6c13ad32 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbuiltin.c,v 1.49 1999/02/04 19:12:35 roberto Exp roberto $ 2** $Id: lbuiltin.c,v 1.50 1999/02/08 16:29:35 roberto Exp roberto $
3** Built-in functions 3** Built-in functions
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -29,7 +29,7 @@
29 29
30/* 30/*
31** {====================================================== 31** {======================================================
32** Auxliliar functions 32** Auxiliary functions
33** ======================================================= 33** =======================================================
34*/ 34*/
35 35
diff --git a/ldo.c b/ldo.c
index 16f79c51..9787e76f 100644
--- a/ldo.c
+++ b/ldo.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ldo.c,v 1.30 1999/01/15 11:38:33 roberto Exp roberto $ 2** $Id: ldo.c,v 1.31 1999/02/04 17:47:59 roberto Exp roberto $
3** Stack and Call structure of Lua 3** Stack and Call structure of Lua
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -136,7 +136,7 @@ static StkId callC (lua_CFunction f, StkId base)
136 if (L->callhook) 136 if (L->callhook)
137 luaD_callHook(base, NULL, 0); 137 luaD_callHook(base, NULL, 0);
138 (*f)(); /* do the actual call */ 138 (*f)(); /* do the actual call */
139 if (L->callhook) /* func may have changed lua_callhook */ 139 if (L->callhook) /* func may have changed callhook */
140 luaD_callHook(base, NULL, 1); 140 luaD_callHook(base, NULL, 1);
141 firstResult = CS->base; 141 firstResult = CS->base;
142 *CS = oldCLS; 142 *CS = oldCLS;
diff --git a/lobject.c b/lobject.c
index b68f7e98..45682c50 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lobject.c,v 1.15 1999/01/04 13:37:07 roberto Exp roberto $ 2** $Id: lobject.c,v 1.16 1999/01/13 19:08:37 roberto Exp roberto $
3** Some generic functions over Lua objects 3** Some generic functions over Lua objects
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -112,7 +112,7 @@ double luaO_str2d (char *s) { /* LUA_NUMBER */
112 s++; 112 s++;
113 sig = -1; 113 sig = -1;
114 } 114 }
115 if (!isdigit((unsigned char)*s)) return -1; /* no digit in expoent part? */ 115 if (!isdigit((unsigned char)*s)) return -1; /* no digit in the exponent? */
116 do { 116 do {
117 e = 10*e + (*(s++)-'0'); 117 e = 10*e + (*(s++)-'0');
118 } while (isdigit((unsigned char)*s)); 118 } 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 @@
1/* 1/*
2** $Id: lstrlib.c,v 1.24 1999/02/04 19:29:51 roberto Exp roberto $ 2** $Id: lstrlib.c,v 1.25 1999/02/05 11:22:58 roberto Exp roberto $
3** Standard library for strings and pattern-matching 3** Standard library for strings and pattern-matching
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -471,7 +471,7 @@ static void str_format (void) {
471 else { /* format item */ 471 else { /* format item */
472 struct Capture cap; 472 struct Capture cap;
473 char form[MAX_FORMAT]; /* to store the format ('%...') */ 473 char form[MAX_FORMAT]; /* to store the format ('%...') */
474 char *buff; /* to store the formated item */ 474 char *buff; /* to store the formatted item */
475 char *initf = strfrmt; 475 char *initf = strfrmt;
476 form[0] = '%'; 476 form[0] = '%';
477 if (isdigit((unsigned char)*initf) && *(initf+1) == '$') { 477 if (isdigit((unsigned char)*initf) && *(initf+1) == '$') {
@@ -505,7 +505,7 @@ static void str_format (void) {
505 long l; 505 long l;
506 char *s = luaL_check_lstr(arg, &l); 506 char *s = luaL_check_lstr(arg, &l);
507 if (cap.capture[1].len == 0 && l >= 100) { 507 if (cap.capture[1].len == 0 && l >= 100) {
508 /* no precision and string is too big to be formated; 508 /* no precision and string is too big to be formatted;
509 keep original string */ 509 keep original string */
510 addnchar(s, l); 510 addnchar(s, l);
511 continue; /* skip the "addsize" at the end */ 511 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 @@
1% $Id: manual.tex,v 1.21 1998/11/20 15:41:43 roberto Exp roberto $ 1% $Id: manual.tex,v 1.22 1999/02/05 12:15:07 roberto Exp roberto $
2 2
3\documentclass[11pt]{article} 3\documentclass[11pt]{article}
4\usepackage{fullpage,bnf} 4\usepackage{fullpage,bnf}
@@ -41,7 +41,7 @@ Waldemar Celes
41\tecgraf\ --- Computer Science Department --- PUC-Rio 41\tecgraf\ --- Computer Science Department --- PUC-Rio
42} 42}
43 43
44%\date{\small \verb$Date: 1998/11/20 15:41:43 $} 44%\date{\small \verb$Date: 1999/02/05 12:15:07 $}
45 45
46\maketitle 46\maketitle
47 47
@@ -91,7 +91,7 @@ a intera\c{c}\~ao entre programas Lua e programas C hospedeiros.
91\begin{quotation} 91\begin{quotation}
92\noindent 92\noindent
93\footnotesize 93\footnotesize
94Copyright \copyright\ 1994--1998 TeCGraf, PUC-Rio. All rights reserved. 94Copyright \copyright\ 1994--1999 TeCGraf, PUC-Rio. All rights reserved.
95 95
96\noindent 96\noindent
97Permission is hereby granted, without written agreement and without license 97Permission is hereby granted, without written agreement and without license
@@ -697,10 +697,11 @@ An absent else-part is equivalent to \verb|else nil|.
697 697
698\subsubsection{Assignment Expressions} 698\subsubsection{Assignment Expressions}
699\begin{Produc} 699\begin{Produc}
700\produc{exp}{\ter{(} var \ter{=} exp1 \ter{)}} 700\produc{exp}{\ter{(} varlist1 \ter{=} explist1 \ter{)}}
701\end{Produc}% 701\end{Produc}%
702An \Index{assignment expression} executes a regular assignment, 702An \Index{assignment expression} executes a multiple assignment,
703and results in the final value of its right hand expression. 703and results in the final value of its first right hand expression
704(that is, the value assigned to the first variable in the variable list).
704 705
705\subsubsection{Table Constructors} \label{tableconstructor} 706\subsubsection{Table Constructors} \label{tableconstructor}
706Table \Index{constructors} are expressions that create tables; 707Table \Index{constructors} are expressions that create tables;
@@ -2752,7 +2753,8 @@ plus a string describing the error.
2752 2753
2753\subsubsection*{\ff \T{seek (filehandle [, whence] [, offset])}}\Deffunc{seek} 2754\subsubsection*{\ff \T{seek (filehandle [, whence] [, offset])}}\Deffunc{seek}
2754 2755
2755Sets the file position, measured in bytes from the beginning of the file, 2756Sets and gets the file position,
2757measured in bytes from the beginning of the file,
2756to the position given by \verb|offset| plus a base 2758to the position given by \verb|offset| plus a base
2757specified by the string \verb|whence|, as follows: 2759specified by the string \verb|whence|, as follows:
2758\begin{description} 2760\begin{description}