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
Diffstat (limited to '')
| -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} |
