conservatory
/
elk
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* include/extern.h: 

+ Export P_Pow to applications.


git-svn-id: svn://svn.zoy.org/elk/trunk@248 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
sam 2004-01-19 19:29:59 +00:00
parent 8c1b24cb3a
commit dc2d4e6819
4 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
AUTHORS
View File

@ -29,6 +29,7 @@ Dave Richards, Robert Sanders, Supreet Singh, Martin Stut, Brian Taylor,
Scott Watson, and Mike Wray. Oliver apologizes for any omissions from
this--necessarily incomplete--list.
Sam would like to thank James Bostock, Sven Hartrumpf, Mark Sapa and
Phillip Rulon for their useful bug reports and patches on the road to Elk 4.0.
Sam would like to thank James Bostock, Sven Hartrumpf, Mark Sapa, Phillip
Rulon and Martin Rumori for their useful bug reports and patches on the road
to Elk 4.0.

1
include/extern.h
View File

@ -298,6 +298,7 @@ extern Object P_Truncate P_((Object));
extern Object P_Round P_((Object));
extern Object P_Sqrt P_((Object));
extern Object P_Exp P_((Object));
extern Object P_Pow P_((Object, Object));
extern Object P_Log P_((Object));
extern Object P_Sin P_((Object));
extern Object P_Cos P_((Object));

2
src/math.c
View File

@ -1100,6 +1100,8 @@ Object P_Sqrt (Object x) { return General_Function (x, Null, sqrt); }
Object P_Exp (Object x) { return General_Function (x, Null, exp); }
Object P_Pow (Object x, Object y) { return General_Function (x, y, pow); }
Object P_Log (Object x) { return General_Function (x, Null, log); }
Object P_Sin (Object x) { return General_Function (x, Null, sin); }

1
src/prim.c
View File

@ -269,6 +269,7 @@ struct Prim_Init {
{ P_Round, "round", 1, 1, EVAL },
{ P_Sqrt, "sqrt", 1, 1, EVAL },
{ P_Exp, "exp", 1, 1, EVAL },
{ P_Pow, "pow", 2, 2, EVAL },
{ P_Log, "log", 1, 1, EVAL },
{ P_Sin, "sin", 1, 1, EVAL },
{ P_Cos, "cos", 1, 1, EVAL },