Subversion Repositories openrisc

// { dg-do assemble }

// { dg-xfail-if "" { arm-*-pe } { "*" } { "" } }

// { dg-options "-fexceptions" }

int atoi(const char *);

struct ios {

 virtual ~ios();

};

class fstreambase : virtual public ios {

};

class ifstream : public fstreambase {

};

class ofstream : public fstreambase {

};

extern const short O;

extern const short D;

const short O=  0;

const short D= -3;

short glc(const char* const * const l,

          short& n,short& x,short& y,

          ifstream* i,ofstream* o)

{

  n=atoi(l[1]);

  x=atoi(l[2]);

  y=atoi(l[3]);

  if((x < 0)||(y <0))

    {

     return D;

    }

  i = new ifstream[n];

  o = new ofstream[2];

  return O;

}