Changeset 5a5c16 in git

Timestamp:

May 20, 1998, 3:14:57 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')

Children:

39d6b45f7817c4e903d19f930f30a29e0f49f8b3

Parents:

70babd0b1fd12bba67ad354dbf6b262e9ceda30a

Message:

* hannes: jjSTRING_PROC modified


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

File:

• Singular/iparith.cc (modified) (1 diff)

Singular/iparith.cc

@@ -2749 +2749 @@
 {
   procinfov pi = IDPROC((idhdl)v->data);
-  if(pi->language == LANG_SINGULAR) {
-    if(pi->data.s.body != NULL) res->data=mstrdup(pi->data.s.body);
-    else res->data=mstrdup("");
-  } else res->data=mstrdup("");
+  if((pi->language == LANG_SINGULAR) && (pi->data.s.body!=NULL))
+    res->data=mstrdup(pi->data.s.body);
+  else
+    res->data=mstrdup("");
   return FALSE;
 }