Changeset 00845b in git

Timestamp:

May 3, 2005, 6:12:03 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')

Children:

18eb05804bfc4b9f19878fa204323b1e0408b478

Parents:

762bfd45c4210aff6f5f912140dfdf36131213c9

Message:

*hannes: fixed error checks


git-svn-id: file:///usr/local/Singular/svn/trunk@8023 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.73 2005-05-03 15:41:50 Singular Exp $ */
+/* $Id: ipassign.cc,v 1.74 2005-05-03 16:12:03 Singular Exp $ */
 
 /*
@@ -1542 +1542 @@
   {
     //check for existence
-    if (IDPACKAGE(h)==basePack)
-    {
-      PrintS("source and destination packages are identical");
+    if (((package)(u->Data()))==basePack)
+    {
+      WarnS("source and destination packages are identical");
       return FALSE;
     }