Changeset 97545c in git

Timestamp:

Apr 25, 2020, 8:52:29 PM (3 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')

Children:

e1ef7b116283b782bdf06753542a2e15e181852b

Parents:

34ac5c4176020d530d61125750c8457430cd7f22

Message:

fix: iiAssignCR

File:

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

Singular/ipshell.cc

@@ -1630 +1630 @@
 idhdl rFindHdl(ring r, idhdl n)
 {
+  if  ((r==NULL)||(r->VarOffset==NULL))
+    return NULL;
   idhdl h=rSimpleFindHdl(r,IDROOT,n);
   if (h!=NULL)  return h;
@@ -6540 +6542 @@
     memset(&tmp,0,sizeof(tmp));
     tmp.rtyp=IDHDL;
-    tmp.data=(char*)rDefault(ring_name);
-    if (tmp.data!=NULL)
-    {
+    idhdl h=rDefault(ring_name);
+    tmp.data=(char*)h;
+    if (h!=NULL)
+    {
+      tmp.name=h->id;
       BOOLEAN b=iiAssign(&tmp,arg);
       if (b) return TRUE;