new functions "frexp" and "ldexp"

This commit is contained in:
Roberto Ierusalimschy 1998-05-27 16:09:39 -03:00
parent 7e59a8901d
commit 74719afc33
2 changed files with 20 additions and 6 deletions

View File

@ -1,5 +1,5 @@
/*
** $Id: lmathlib.c,v 1.7 1997/12/09 13:35:19 roberto Exp roberto $
** $Id: lmathlib.c,v 1.8 1997/12/26 18:36:31 roberto Exp roberto $
** Lua standard mathematical library
** See Copyright Notice in lua.h
*/
@ -115,6 +115,16 @@ static void math_rad (void)
lua_pushnumber(luaL_check_number(1)*(PI/180.0));
}
static void math_frexp (void) {
int e;
lua_pushnumber(frexp(luaL_check_number(1), &e));
lua_pushnumber(e);
}
static void math_ldexp (void) {
lua_pushnumber(ldexp(luaL_check_number(1), luaL_check_number(2)));
}
static void math_min (void)
@ -170,10 +180,12 @@ static struct luaL_reg mathlib[] = {
{"asin", math_asin},
{"acos", math_acos},
{"atan", math_atan},
{"atan2", math_atan2},
{"atan2", math_atan2},
{"ceil", math_ceil},
{"floor", math_floor},
{"mod", math_mod},
{"frexp", math_frexp},
{"ldexp", math_ldexp},
{"sqrt", math_sqrt},
{"min", math_min},
{"max", math_max},

View File

@ -1,4 +1,4 @@
% $Id: manual.tex,v 1.9 1998/05/18 22:26:03 roberto Exp roberto $
% $Id: manual.tex,v 1.10 1998/05/20 22:21:35 roberto Exp roberto $
\documentstyle[fullpage,11pt,bnf]{article}
@ -38,7 +38,7 @@ Waldemar Celes
\tecgraf\ --- Computer Science Department --- PUC-Rio
}
\date{\small \verb$Date: 1998/05/18 22:26:03 $}
\date{\small \verb$Date: 1998/05/20 22:21:35 $}
\maketitle
@ -2398,10 +2398,12 @@ The library provides the following functions:
\Deffunc{atan2}\Deffunc{ceil}\Deffunc{cos}\Deffunc{floor}
\Deffunc{log}\Deffunc{log10}\Deffunc{max}\Deffunc{min}
\Deffunc{mod}\Deffunc{sin}\Deffunc{sqrt}\Deffunc{tan}
\Deffunc{frexp}\Deffunc{ldexp}
\Deffunc{random}\Deffunc{randomseed}
\begin{verbatim}
abs acos asin atan atan2 ceil cos deg floor log log10
max min mod rad sin sqrt tan random randomseed
abs acos asin atan atan2 ceil cos deg floor log log10
max min mod rad sin sqrt tan frexp ldexp
random randomseed
\end{verbatim}
plus a global variable \IndexVerb{PI}.
Most of them