+/* Returns a new ident that represents first_scnd. */
+ident *mangle (ident *first, ident* scnd) {
+ char *cp;
+ int len;
+ ident *res;
+
+ xoprintf (&mangle_obst, "%I_%I", first, scnd);
+ len = obstack_object_size (&mangle_obst);
+ cp = obstack_finish (&mangle_obst);
+ res = id_from_str (cp, len);
+ obstack_free (&mangle_obst, cp);
+ return res;
+}