🚀 go-pugleaf

cc1plus does not allow destructors to be declared as friends.
It reports an error for the following code fragment:

1	class B {
2	public:
3		~B();
4	};
5
6	class A {
7		friend B::~B();
8	};

The error is

t.cc:7: class `B' already has destructor defined

The problem is a gratuitous check in grokdeclarator(), in cp-decl.c.
Removing the offending check solves the problem.  (A multiply-declared
destructor is detected elsewhere.)

Steve
-----
*** /tmp/,RCSt1a29274	Wed Aug 19 17:00:59 1992
--- cp-decl.c	Wed Aug 19 15:56:42 1992
***************
*** 7167,7174 ****
  			if (! member_function_or_else (ctype, current_class_type,
  						       "destructor for alien class `%s' cannot be a member"))
  			  return NULL_TREE;
- 			if (TYPE_HAS_DESTRUCTOR (ctype))
- 			  error_with_aggr_type (ctype, "class `%s' already has destructor defined");
  		      }
  		  }
  		else if (flags == WRAPPER_FLAG || flags == ANTI_WRAPPER_FLAG)
--- 7167,7172 ----