Changeset 261735d in git

Timestamp:

Jun 8, 2005, 3:51:13 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

a8bb72dd226250b4276aefb627165cae6b4f0ffb

Parents:

bfdab9335d35ef37b6b14b9aa9d1bcb7e08d20e4

Message:

*hannes: format


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

File:

• kernel/hutil.cc (modified) (10 diffs)

kernel/hutil.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: hutil.cc,v 1.6 2005-06-08 12:34:59 Singular Exp $ */
+/* $Id: hutil.cc,v 1.7 2005-06-08 13:51:13 Singular Exp $ */
 /*
 * ABSTRACT: Utilities for staircase operations
@@ -41 +41 @@
   if (hisModule < 0)
     hisModule = 0;
-  if (S)
+  if (S!=NULL)
   {
     si = S->m;
@@ -51 +51 @@
     sl = 0;
   }
-  if (Q)
+  if (Q!=NULL)
   {
     qi = Q->m;
@@ -61 +61 @@
     ql = 0;
   }
-  if (!(sl + ql))
+  if ((sl + ql) > 0)
   {
     *Nexist = 0;
@@ -67 +67 @@
   }
   ss = si;
-  for (i = sl; i; i--)
+  for (i = sl; i>0; i--)
   {
     if (*ss!=0)
@@ -74 +74 @@
   }
   ss = qi;
-  for (i = ql; i; i--)
+  for (i = ql; i>0; i--)
   {
     if (*ss!=0)
@@ -89 +89 @@
     if (*si!=NULL)
     {
-      *ek = (int*) omAlloc((pVariables+1)*sizeof(int));
+      *ek = (scmon) omAlloc((pVariables+1)*sizeof(int));
       pGetExpV(*si, *ek);
       ek++;
@@ -95 +95 @@
     si++;
   }
-  for (i = ql; i; i--)
+  for (i = ql; i>0; i--)
   {
     if (*qi!=NULL)
     {
-      *ek = (int*) omAlloc((pVariables+1)*sizeof(int));
+      *ek = (scmon) omAlloc((pVariables+1)*sizeof(int));
       pGetExpV(*qi, *ek);
       ek++;
@@ -121 +121 @@
     if (i == 0) return;
   }
-  for (i=pVariables; i; i--)
+  for (i=pVariables; i>0; i--)
   {
     x = pWeight(i);
@@ -178 +178 @@
     loop
     {
-      if (stc[j][i])
+      if (stc[j][i]>0)
       {
         i1++;