From 1e37891c2df6e1e64068f7e6328e69a278795f8e Mon Sep 17 00:00:00 2001
From: ricroc <ricroc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Tue, 31 May 2005 00:23:47 +0000
Subject: [PATCH] remove abort_yapor function

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1306 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/c_interface.c | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/C/c_interface.c b/C/c_interface.c
index 5ef185adc..450c529b3 100644
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -10,8 +10,11 @@
 * File:		c_interface.c						 *
 * comments:	c_interface primitives definition 			 *
 *									 *
-* Last rev:	$Date: 2005-04-10 04:35:19 $,$Author: vsc $						 *
+* Last rev:	$Date: 2005-05-31 00:23:47 $,$Author: ricroc $						 *
 * $Log: not supported by cvs2svn $
+* Revision 1.67  2005/04/10 04:35:19  vsc
+* AllocMemoryFromYap should now handle large requests the right way.
+*
 * Revision 1.66  2005/04/10 04:01:10  vsc
 * bug fixes, I hope!
 *
@@ -1175,7 +1178,7 @@ YAP_Init(YAP_init_args *yap_init)
     CurrentModule = USER_MODULE;
     P = GETWORK_FIRST_TIME;
     Yap_exec_absmi(FALSE);
-    abort_yapor("abstract machine unexpected exit");
+    Yap_Error(INTERNAL_ERROR, TermNil, "abstract machine unexpected exit (YAP_Init)");
   }
 #endif /* YAPOR */
 #endif /* YAPOR || TABLING */