record_name
record_name(new->id.mon_id.mon_name, 1);
record_name(mon_name, 0);
record_name(nl->id.mon_id.mon_name, 0);
extern void record_name(char *name, int op);