+ Acknowledge_information inf;
+ inf.function_ = ptr;
+
+ string interface_name (func_name);
+
+ interface_name = replace_all (interface_name, '_', '-');
+ interface_name += "-interface";
+
+ inf.symbol_ = scm_gc_protect_object (ly_symbol2scm (interface_name.c_str ()));
+ ack_array->push_back (inf);