===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/builtin/dp.c,v
retrieving revision 1.5
retrieving revision 1.7
diff -u -p -r1.5 -r1.7
--- OpenXM_contrib2/asir2000/builtin/dp.c	2000/08/21 08:31:19	1.5
+++ OpenXM_contrib2/asir2000/builtin/dp.c	2000/12/05 01:24:50	1.7
@@ -23,7 +23,7 @@
  * shall be made on your publication or presentation in any form of the
  * results obtained by use of the SOFTWARE.
  * (4) In the event that you modify the SOFTWARE, you shall notify FLL by
- * e-mail at risa-admin@flab.fujitsu.co.jp of the detailed specification
+ * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification
  * for such modification or the source code of the modified part of the
  * SOFTWARE.
  * 
@@ -45,7 +45,7 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/builtin/dp.c,v 1.4 2000/07/14 08:26:39 noro Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/builtin/dp.c,v 1.6 2000/08/22 05:03:57 noro Exp $ 
 */
 #include "ca.h"
 #include "base.h"
@@ -292,11 +292,9 @@ NODE arg;
 DP *rp;
 {
 	asir_assert(ARG0(arg),O_DP,"dp_ptozp");
-#if INET
 	if ( Dist )
 		dp_ptozp_d(BDY(Dist),length(BDY(Dist)),(DP)ARG0(arg),rp);
 	else
-#endif
 		dp_ptozp((DP)ARG0(arg),rp);
 }
 	
@@ -310,11 +308,9 @@ LIST *rp;
 	p0 = (DP)ARG0(arg); p1 = (DP)ARG1(arg);
 	asir_assert(p0,O_DP,"dp_ptozp2");
 	asir_assert(p1,O_DP,"dp_ptozp2");
-#if INET
 	if ( Dist )
 		dp_ptozp2_d(BDY(Dist),length(BDY(Dist)),p0,p1,&h,&r);
 	else
-#endif
 		dp_ptozp2(p0,p1,&h,&r);
 	NEWNODE(n0); BDY(n0) = (pointer)h;
 	NEWNODE(NEXT(n0)); BDY(NEXT(n0)) = (pointer)r;