[Scipy-svn] r3010 - in trunk/Lib/special: cephes tests

[scipy-svn at scipy.org]

Author: cookedm
Date: 2007-05-16 12:12:16 -0500 (Wed, 16 May 2007)
New Revision: 3010

Modified:
   trunk/Lib/special/cephes/polmisc.c
   trunk/Lib/special/cephes/polyn.c
   trunk/Lib/special/tests/test_basic.py
Log:
Revert extra accidental commits in r3009

Modified: trunk/Lib/special/cephes/polmisc.c
===================================================================
--- trunk/Lib/special/cephes/polmisc.c	2007-05-16 17:05:50 UTC (rev 3009)
+++ trunk/Lib/special/cephes/polmisc.c	2007-05-16 17:12:16 UTC (rev 3010)
@@ -4,7 +4,9 @@
  */
 
 #include <stdio.h>
-#include <stdlib.h>
+#ifndef __APPLE__
+#include <malloc.h>
+#endif
 #include "mconf.h"
 #ifndef ANSIPROT
 double atan2(), sqrt(), fabs(), sin(), cos();

Modified: trunk/Lib/special/cephes/polyn.c
===================================================================
--- trunk/Lib/special/cephes/polyn.c	2007-05-16 17:05:50 UTC (rev 3009)
+++ trunk/Lib/special/cephes/polyn.c	2007-05-16 17:12:16 UTC (rev 3010)
@@ -60,8 +60,14 @@
  */
 
 #include <stdio.h>
-#include <stdlib.h>
+void exit(int);
+#ifndef NULL
+#define NULL 0
+#endif
 #include "mconf.h"
+#ifndef __APPLE__
+#include <malloc.h>
+#endif
 
 /* near pointer version of malloc() */
 /*

Modified: trunk/Lib/special/tests/test_basic.py
===================================================================
--- trunk/Lib/special/tests/test_basic.py	2007-05-16 17:05:50 UTC (rev 3009)
+++ trunk/Lib/special/tests/test_basic.py	2007-05-16 17:12:16 UTC (rev 3010)
@@ -193,8 +193,7 @@
         cephes.hankel2e(1,1)
 
     def check_hyp1f1(self):
-        assert_approx_equal(cephes.hyp1f1(1,1,1), exp(1.0))
-        assert_approx_equal(cephes.hyp1f1(3,4,-6), 0.026056422099537251095)
+        cephes.hyp1f1(1,1,1)
     def check_hyp1f2(self):
         cephes.hyp1f2(1,1,1,1)
     def check_hyp2f0(self):