1// { dg-do assemble  }
2// GROUPS passed operators
3// opr-del file
4// From: rollins@bart.ee.queensu.ca (Mark Rollins)
5// Date:     Thu, 3 Sep 1992 22:01:03 -0400 Fri, 4 Sep 1992 02:00:25 GMT
6// Subject:  delete [size] pointer; Problem
7// Message-ID: <92Sep3.220137edt.30@jarvis.csri.toronto.edu>
8
9#include <complex>
10typedef std::complex<double> Complex;
11#include <stdio.h>
12
13class Vector {
14  int           size;
15  Complex       *v;
16 public:
17  Vector(int s=1) { size = s; v = new Complex[size];};
18  ~Vector() { delete [size] v;}// { dg-error "" }  warning
19};
20
21void foo(int s)
22{
23  Vector junk(s);
24}
25
26int main()
27{
28  Vector* test;
29  for (int i=0;i<40;i++) // was 100000
30        foo(1000);
31  printf ("PASS\n");
32}
33