===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/io/bload.c,v
retrieving revision 1.10
retrieving revision 1.12
diff -u -p -r1.10 -r1.12
--- OpenXM_contrib2/asir2000/io/bload.c	2001/10/09 01:36:20	1.10
+++ OpenXM_contrib2/asir2000/io/bload.c	2003/02/14 22:29:15	1.12
@@ -44,12 +44,12 @@
  * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
- * $OpenXM: OpenXM_contrib2/asir2000/io/bload.c,v 1.9 2001/09/03 07:01:08 noro Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/io/bload.c,v 1.11 2002/01/08 04:14:38 kondoh Exp $ 
 */
 #include "ca.h"
 #include "parse.h"
 #include "com.h"
-#if PARI
+#if defined(PARI)
 #include "genpari.h"
 int get_lg(GEN);
 #endif
@@ -120,7 +120,7 @@ void loadreal(FILE *s,Real *p)
 
 void loadbf(FILE *s,BF *p)
 {
-#if PARI
+#if defined(PARI)
 	GEN z;
 	unsigned int uexpo,lexpo;
 	char dmy;
@@ -172,13 +172,13 @@ void loaditv(FILE *s,Itv *p)
 	*p = q;
 }
 
-void loaditvd(FILE *s,ItvD *p)
+void loaditvd(FILE *s,IntervalDouble *p)
 {
-	ItvD q;
+	IntervalDouble q;
 	char dmy;
 
 	read_char(s,&dmy);
-	NEWItvD(q);
+	NEWIntervalDouble(q);
 	read_double(s,&INF(q));
 	read_double(s,&SUP(q));
 	*p = q;