===================================================================
RCS file: /home/cvs/OpenXM/src/ox_math/mlo.c,v
retrieving revision 1.16
retrieving revision 1.20
diff -u -p -r1.16 -r1.20
--- OpenXM/src/ox_math/mlo.c	2003/03/16 16:58:48	1.16
+++ OpenXM/src/ox_math/mlo.c	2005/07/19 10:42:53	1.20
@@ -1,5 +1,5 @@
 /* -*- mode: C -*- */
-/* $OpenXM: OpenXM/src/ox_math/mlo.c,v 1.15 2003/02/12 08:28:40 ohara Exp $ */
+/* $OpenXM: OpenXM/src/ox_math/mlo.c,v 1.19 2003/03/30 08:07:10 ohara Exp $ */
 
 /* 
    Copyright (C) Katsuyoshi OHARA, 2000.
@@ -381,6 +381,7 @@ int ml_read_packet()
         ox_printf("RESUMEPKT[]");
         break;
     default:
+        ;
     }
     ox_printf("\n");
     return pkt;
@@ -524,9 +525,8 @@ mlo *ml_return()
             ml_clear_interruption();
         }else {
             ml_clear_interruption();
-            ml_evaluateStringByLocalParser("0"); /* need for 4.x */
+            MLFlush(stdlink);                    /* need for 4.x */
             ob = ml_return0();                   /* ReturnPacket[$Aborted] */
-            ml_return0();                        /* need for 4.x */
         }
     }else {
         ob = ml_return0();