Changeset 8de3388 in git for kernel/misc.cc

Timestamp:

Jul 15, 2010, 4:49:04 PM (14 years ago)

Author:

Andreas Steenpaß <steenpas@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

1dba075fdedd6b7fdac018f3b79cfab9ba2a2e52

Parents:

6263f270b03890e5e7d11a4d6e8a10544a454c92

Message:

M    kernel/misc.cc
M    Singular/misc_ip.cc
automatically closes all links on exit


git-svn-id: file:///usr/local/Singular/svn/trunk@13019 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• kernel/misc.cc (modified) (1 diff)

kernel/misc.cc

@@ -49 +49 @@
 
 /*0 implementation*/
-
-/*2
-* the global exit routine of Singular
-*/
-#ifdef HAVE_MPSR
-void (*MP_Exit_Env_Ptr)()=NULL;
-#endif
-extern "C" {
-
-void m2_end(int i)
-{
-  fe_reset_input_mode();
-  #ifdef PAGE_TEST
-  mmEndStat();
-  #endif
-  #ifdef HAVE_TCL
-  if (tclmode)
-  {
-    PrintTCL('Q',0,NULL);
-  }
-  #endif
-  fe_reset_input_mode();
-  if (i<=0)
-  {
-    #ifdef HAVE_TCL
-    if (!tclmode)
-    #endif
-      if (TEST_V_QUIET)
-      {
-        if (i==0)
-          printf("Auf Wiedersehen.\n");
-        else
-          printf("\n$Bye.\n");
-      }
-    //#ifdef sun
-    //  #ifndef __svr4__
-    //    _cleanup();
-    //    _exit(0);
-    //  #endif
-    //#endif
-    exit(0);
-  }
-  else
-  {
-    #ifdef HAVE_TCL
-    if (!tclmode)
-    #endif
-      printf("\nhalt %d\n",i);
-  }
-  #ifdef HAVE_MPSR
-  if (MP_Exit_Env_Ptr!=NULL) (*MP_Exit_Env_Ptr)();
-  #endif
-  exit(i);
-}
-}
 
 /*2