/[gcl]/gcl/o/num_sfun.c
ViewVC logotype

Diff of /gcl/o/num_sfun.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6.6.2 by camm, Thu Nov 6 16:16:52 2003 UTC revision 1.6.6.2.10.1 by camm, Mon Jul 18 17:07:24 2005 UTC
# Line 43  fixnum_expt(int x, int y) Line 43  fixnum_expt(int x, int y)
43          return(z);          return(z);
44  }  }
45    
46    static object number_sin(object);
47    static object number_cos(object);
48    static object number_exp(object);
49    static object number_nlog(object);
50    static object number_atan2(object,object);
51    
52    
53  static object  static object
54  number_exp(object x)  number_exp(object x)
55  {  {
# Line 64  number_exp(object x) Line 71  number_exp(object x)
71          case t_complex:          case t_complex:
72          {          {
73                  object y, y1;                  object y, y1;
                 static object number_sin(object x), number_cos(object x);  
74                  vs_mark;                  vs_mark;
75                    
76                  y = x->cmp.cmp_imag;                  y = x->cmp.cmp_imag;
# Line 93  number_expt(object x, object y) Line 99  number_expt(object x, object y)
99  {  {
100          enum type tx, ty;          enum type tx, ty;
101          object z;          object z;
         static object number_nlog(object x);  
102          vs_mark;          vs_mark;
103    
104          tx = type_of(x);          tx = type_of(x);
# Line 177  number_nlog(object x) Line 182  number_nlog(object x)
182  {  {
183          double log(double);          double log(double);
184          object r=Cnil, i=Cnil, a, p;          object r=Cnil, i=Cnil, a, p;
         static object number_sqrt(object x), number_atan2(object y, object x);  
185          vs_mark;          vs_mark;
186    
187          if (type_of(x) == t_complex) {          if (type_of(x) == t_complex) {

Legend:
Removed from v.1.6.6.2  
changed lines
  Added in v.1.6.6.2.10.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26