Changeset ea476c in git

Timestamp:

Feb 26, 1999, 3:29:01 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

f5cda4654265f877bba8ddba45e4486d7c18a16b

Parents:

c17b5f369243f602e00fde44f3104a5598691a18

Message:

hannes: fixed 'map f=..;f[i]=..'


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

File:

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

Singular/ipassign.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipassign.cc,v 1.43 1999-01-18 17:25:25 Singular Exp $ */
+/* $Id: ipassign.cc,v 1.44 1999-02-26 14:29:01 Singular Exp $ */
 
 /*
@@ -269 +269 @@
     {
       j=i; i=1;
-      // for ideal/module: check indices
-      if (res->rtyp!=MAP_CMD)
-      {
-        if (j>MATCOLS(m))
-        {
-          pEnlargeSet(&(m->m),MATCOLS(m),j-MATCOLS(m));
-          MATCOLS(m)=j;
-        }
-        else if (j<=0)
-        {
-          Werror("index[%d] must be positive",j/*e->start*/);
-          return TRUE;
-        }
+      // for all ideal like data types: check indices
+      if (j>MATCOLS(m))
+      {
+        pEnlargeSet(&(m->m),MATCOLS(m),j-MATCOLS(m));
+        MATCOLS(m)=j;
+      }
+      else if (j<=0)
+      {
+        Werror("index[%d] must be positive",j/*e->start*/);
+        return TRUE;
       }
     }