diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-02-12 17:23:02 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-02-12 17:23:02 -0200 |
commit | bf6d2ccf92768be938aaac0a0bfc87833b793e8f (patch) | |
tree | 0d1455129fd35ea93d46a583ba814716e66fd79f | |
parent | b82ff713e321f4b65b2dc41fc1fe97633f7b197d (diff) | |
download | lua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.tar.gz lua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.tar.bz2 lua-bf6d2ccf92768be938aaac0a0bfc87833b793e8f.zip |
details
-rw-r--r-- | lapi.c | 7 | ||||
-rw-r--r-- | lbuiltin.c | 4 | ||||
-rw-r--r-- | ldo.c | 4 | ||||
-rw-r--r-- | lobject.c | 4 | ||||
-rw-r--r-- | lstrlib.c | 6 | ||||
-rw-r--r-- | manual.tex | 16 |
6 files changed, 19 insertions, 22 deletions
@@ -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 */ | ||
471 | lua_CHFunction lua_callhook = NULL; | ||
472 | lua_LHFunction lua_linehook = NULL; | ||
473 | |||
474 | |||
475 | lua_Function lua_stackedfunction (int level) | 470 | lua_Function lua_stackedfunction (int level) |
476 | { | 471 | { |
477 | StkId i; | 472 | StkId i; |
@@ -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 | ||
@@ -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; |
@@ -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)); |
@@ -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 */ |
@@ -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 |
94 | Copyright \copyright\ 1994--1998 TeCGraf, PUC-Rio. All rights reserved. | 94 | Copyright \copyright\ 1994--1999 TeCGraf, PUC-Rio. All rights reserved. |
95 | 95 | ||
96 | \noindent | 96 | \noindent |
97 | Permission is hereby granted, without written agreement and without license | 97 | Permission 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}% |
702 | An \Index{assignment expression} executes a regular assignment, | 702 | An \Index{assignment expression} executes a multiple assignment, |
703 | and results in the final value of its right hand expression. | 703 | and 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} |
706 | Table \Index{constructors} are expressions that create tables; | 707 | Table \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 | ||
2755 | Sets the file position, measured in bytes from the beginning of the file, | 2756 | Sets and gets the file position, |
2757 | measured in bytes from the beginning of the file, | ||
2756 | to the position given by \verb|offset| plus a base | 2758 | to the position given by \verb|offset| plus a base |
2757 | specified by the string \verb|whence|, as follows: | 2759 | specified by the string \verb|whence|, as follows: |
2758 | \begin{description} | 2760 | \begin{description} |