Changeset af1bbd7 in git

Timestamp:

May 8, 2006, 5:00:38 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

71df1a733573e6e6ed4fa39b1aa70ca67b4e2945

Parents:

94d338aa149a7a6fa6d2930a62d22a4fd281c84b

Message:

*hannes: bug_41 again


git-svn-id: file:///usr/local/Singular/svn/trunk@9115 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.392 2006-05-08 14:43:02 Singular Exp $ */
+/* $Id: iparith.cc,v 1.393 2006-05-08 15:00:38 Singular Exp $ */
 
 /*
@@ -3425 +3425 @@
   if ((res->data!=NULL) && (v->rtyp==IDHDL))
   {
-    atSet((idhdl)(v->LData()),omStrDup("isHomog"),w,INTVEC_CMD);
+    char *isHomog=omStrDup("isHomog");
+    if (v->e==NULL)
+      atSet((idhdl)(v->data),isHomog,w,INTVEC_CMD);
+    else
+      atSet((idhdl)(v->LData()),isHomog,w,INTVEC_CMD);
   }
   else if (w!=NULL) delete w;