Changeset db7f1f in git for Singular/dyn_modules/syzextra/mod_main.cc

Timestamp:

Nov 30, 2022, 2:47:34 PM (17 months ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

0f9b034e4375576eb669e2c023d31263b050fee3

Parents:

d64b95c40e04b29c0132dc440dd6bf287f1eccfc

Message:

simplify syzextra

File:

• Singular/dyn_modules/syzextra/mod_main.cc (modified) (2 diffs)

Singular/dyn_modules/syzextra/mod_main.cc

@@ -211 +211 @@
 
 
-
-/// wrapper around p_Tail and id_Tail
-static BOOLEAN Tail(leftv res, leftv h)
-{
-  NoReturn(res);
-
-  if( h == NULL )
-  {
-    WarnS("Tail needs a poly/vector/ideal/module argument...");
-    return TRUE;
-  }
-
-  assume( h != NULL );
-
-  const ring r =  currRing;
-
-  if( h->Typ() == POLY_CMD || h->Typ() == VECTOR_CMD)
-  {
-    res->data = p_Tail( (const poly)h->Data(), r );
-    res->rtyp = h->Typ();
-
-    h = h->Next(); assume (h == NULL);
-
-    return FALSE;
-  }
-
-  if( h->Typ() == IDEAL_CMD || h->Typ() == MODUL_CMD)
-  {
-    res->data = id_Tail( (const ideal)h->Data(), r );
-    res->rtyp = h->Typ();
-
-    h = h->Next(); assume (h == NULL);
-
-    return FALSE;
-  }
-
-  WarnS("Tail needs a single poly/vector/ideal/module argument...");
-  return TRUE;
-}
 
 /// Get leading component
@@ -522 +483 @@
   ADD("idPrepare", FALSE, idPrepare);
 
-  ADD("Tail", FALSE, Tail);
-
 #undef ADD
   return MAX_TOK;