Changeset 814f03 in git

Timestamp:

Mar 11, 2009, 4:26:00 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')

Children:

8ee3f2d6e66a708230a1e7f07ce23dfef50f141d

Parents:

eee873799255b9786c3fa719d4fc2fdeb05bc1f7

Message:

*hannes: monitor


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

File:

• Singular/iparith.cc (modified) (2 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.500 2009-03-11 09:43:29 Singular Exp $ */
+/* $Id: iparith.cc,v 1.501 2009-03-11 15:26:00 Singular Exp $ */
 
 /*
@@ -2523 +2523 @@
   SI_LINK_SET_CLOSE_P(l); // febase handles the FILE*
   char *opt;
-  if (v==NULL) opt="i";
-  else         opt=(char *)v->Data();
   int mode=0;
-  while(*opt!='\0')
-  {
-    if (*opt=='i') mode |= PROT_I;
-    else if (*opt=='o') mode |= PROT_O;
-    opt++;
+  if ( l->name[0]!='\0')
+  {
+    if (v==NULL) opt="i";
+    else         opt=(char *)v->Data();
+    while(*opt!='\0')
+    {
+      if (*opt=='i') mode |= PROT_I;
+      else if (*opt=='o') mode |= PROT_O;
+      opt++;
+    }
   }
   if (((FILE*)l->data) == stdin) monitor(NULL,0);