Changeset 1a2bd8 in git

Timestamp:

Apr 16, 1998, 1:45:39 PM (26 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')

Children:

5821c1b832ca2803db683e6554957c7aac511380

Parents:

faab653b4c23775f89f602ab5991b6d059807c12

Message:

*** empty log message ***


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

File:

• Singular/extra.cc (modified) (7 diffs)

Singular/extra.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR      *
 *****************************************/
-/* $Id: extra.cc,v 1.35 1998-04-14 07:06:26 Singular Exp $ */
+/* $Id: extra.cc,v 1.36 1998-04-16 11:45:39 Singular Exp $ */
 /*
 * ABSTRACT: general interface to internals of Singular ("system" command)
@@ -284 +284 @@
     if(strcmp((char*)(h->Data()),"LaScala")==0)
     {
-      if ((h->next!=NULL) 
+      if ((h->next!=NULL)
       &&((h->next->Typ()==IDEAL_CMD)||(h->next->Typ()==MODUL_CMD)))
       {
@@ -561 +561 @@
          WerrorS("ideal expected");
     }
-    else  
-#endif
-#ifdef HAVE_FACTORY      
+    else
+#endif
+#ifdef HAVE_FACTORY
 /*==================== fastcomb =============================*/
     if(strcmp((char*)(h->Data()),"fastcomb")==0)
@@ -607 +607 @@
     else
 #endif
-/*==================== divcount & mcount =============================*/      
+/*==================== divcount & mcount =============================*/
 #ifdef MONOM_COUNT
     if (strcmp((char*)(h->Data()),"mcount")==0)
@@ -622 +622 @@
     }
     else
-#endif      
+#endif
 #ifdef DIV_COUNT
     if (strcmp((char*)(h->Data()),"dcount")==0)
@@ -637 +637 @@
     }
     else
-#endif      
+#endif
 /*==================== barstep =============================*/
     if(strcmp((char*)(h->Data()),"barstep")==0)
@@ -663 +663 @@
         WerrorS("matrix expected");
     }
+    else
+/*============================================================*/
+      WerrorS( feNotImplemented );
   }
-  
-/*============================================================*/
-  WerrorS("not implemented\n");
   return TRUE;
 }