Changeset 057e93c in git for Singular/misc.cc

Timestamp:

Feb 27, 1998, 3:06:27 PM (26 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '2a584933abf2a2d3082034c7586d38bb6de1a30a')

Children:

a18fae54e4f760ce0cd7832679f5171a88c3fde7

Parents:

1c31dc7f319d025944d44dcc090983f7cb03be12

Message:

* Fri Feb 27 15:02:10 MET 1998 hannes
  new input scheme: many modifications to febase.h, febase.inc,
      febase.cc, scanner.l, grammar.y, iplib.cc, ipshell.{h,cc}


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

File:

• Singular/misc.cc (modified) (5 diffs)

Singular/misc.cc

@@ -73 +73 @@
 #endif
 /*4 private data of other modules*/
-  I_FEbase();
   memset(&sLastPrinted,0,sizeof(sleftv));
   sLastPrinted.rtyp=NONE;
@@ -227 +226 @@
         && *fgets(buffer, BUF_LEN, help) != EOF
         && buffer[0] != FIN_INDEX)
-  { (void)printf("%s", buffer);
+  {
+    printf("%s", buffer);
     if(lines++> MAX_LINES)
-    { printf(
+    {
 #ifdef macintosh
-      "\n Press <RETURN> to continue or x and <RETURN> to exit help.\n");
+      printf("\n Press <RETURN> to continue or x and <RETURN> to exit help.\n");
 #else
-      "\n Press <RETURN> to continue or x to exit help.\n");
+      printf("\n Press <RETURN> to continue or x to exit help.\n");
 #endif
       fflush(stdout);
@@ -247 +247 @@
   if(*close!='x')
   {
-    printf(
 #ifdef macintosh
-      "\nEnd of part. Press <RETURN> to continue or x and <RETURN> to exit help.\n");
+    printf("\nEnd of part. Press <RETURN> to continue or x and <RETURN> to exit help.\n");
 #else
-      "\nEnd of part. Press <RETURN> to continue or x to exit help.\n");
+    printf("\nEnd of part. Press <RETURN> to continue or x to exit help.\n");
 #endif
     fflush(stdout);
@@ -341 +340 @@
       Print("from lib %s\n",lib);
       s=iiGetLibProcBuffer(IDPROC(h), example ? 2 : 0);
-      if (!example) {
-        PrintS(s);
-        FreeL((ADDRESS)s);
-      }
-      else {
-        if (s!=NULL) {
-          if (strlen(s)>5) iiEStart(s); /*newBuffer(s,BT_execute);*/
-          else FreeL((ADDRESS)s);
-        }
+      if (!example)
+      {
+        PrintS(s);
+        FreeL((ADDRESS)s);
+      }
+      else
+      {
+        if (s!=NULL)
+        {
+          if (strlen(s)>5) iiEStart(s,IDPROC(h));
+          else FreeL((ADDRESS)s);
+        }
       }
     }
@@ -438 +440 @@
   {"interrupt",    Sy_bit(OPT_INTERRUPT),      ~Sy_bit(OPT_INTERRUPT)   },
   {"sugarCrit",    Sy_bit(OPT_SUGARCRIT),      ~Sy_bit(OPT_SUGARCRIT)   },
-  {"teach",     Sy_bit(OPT_DEBUG),          ~Sy_bit(OPT_DEBUG)  }, 
+  {"teach",     Sy_bit(OPT_DEBUG),          ~Sy_bit(OPT_DEBUG)  },
   /* 7 cancel unit */
   {"morePairs",    Sy_bit(OPT_MOREPAIRS),      ~Sy_bit(OPT_MOREPAIRS)   },