Changeset 86b2ec4 in git

Timestamp:

Sep 17, 2010, 4:32:02 PM (14 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38077648e7239f98078663eb941c3c979511150a')

Children:

8eaf9dae8ae7175a819429176f43be93c3d61017

Parents:

db71a2daf9759c0893a178e8e78e2b4779930cbc

Message:

fix format

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

File:

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

Singular/iparith.cc

@@ -3310 +3310 @@
 {
   res->data = omStrDup(slStatus((si_link) u->Data(), (char *) v->Data()));
+  return FALSE;
+}
+static BOOLEAN jjSTATUS2L(leftv res, leftv u, leftv v)
+{
+  res->data = (void *)(long)slStatusSsiL((lists) u->Data(), (int)(long) v->Data());
+  //return (res->data== (void*)(long)-2);
   return FALSE;
 }
@@ -3983 +3989 @@
 ,{jjRES,       RES_CMD,        RESOLUTION_CMD, MODUL_CMD,  INT_CMD, ALLOW_PLURAL |ALLOW_RING}
 ,{jjSTATUS2,   STATUS_CMD,     STRING_CMD,     LINK_CMD,   STRING_CMD, ALLOW_PLURAL |ALLOW_RING}
+,{jjSTATUS2L,  STATUS_CMD,     INT_CMD,        LIST_CMD,   INT_CMD, ALLOW_PLURAL |ALLOW_RING}
 ,{jjSIMPL_P,   SIMPLIFY_CMD,   POLY_CMD,       POLY_CMD,   INT_CMD, ALLOW_PLURAL |ALLOW_RING}
 ,{jjSIMPL_P,   SIMPLIFY_CMD,   VECTOR_CMD,     VECTOR_CMD, INT_CMD, ALLOW_PLURAL |ALLOW_RING}