Subversion Repositories openrisc

/* Ensure that variables declared volatile by the user (as opposed to

   synthesized by the EH-volatization machinery) _do_ trigger

   "discards qualifiers from target pointer type" warnings.  */

/* { dg-options "-fobjc-exceptions" } */

/* { dg-do compile } */

@interface TestMyTests

- (void) testSpoon;

@end

extern void some_func (int *);

@implementation TestMyTests

- (void) testSpoon {

  volatile int i = 5;

  int q = 99;

  do {

    @try {

      typeof(i) j = 6;

      typeof(q) k = 66;

      some_func (&j); /* { dg-warning "discards .volatile. qualifier from pointer target type" } */

      /* { dg-message "but argument is of type" "" { target *-*-* } 12 } */

      some_func (&k);

    }

    @catch (id exc) {

      @throw;

    }

  } while(0);

  do {

    @try {

      typeof(i) j = 7;

      typeof(q) k = 77;

      some_func (&k);

      some_func (&j); /* { dg-warning "discards .volatile. qualifier from pointer target type" } */

      /* The following is disabled as it is already checked above and the testsuites seems

         to count multiple different identical errors on the same line only once */

      /* dg-message "but argument is of type" "" { target *-*-* } 12 */

    }

    @catch (id exc) {

      @throw;

    }

  } while(0);

  do {

    @try {

      typeof(q) k = 88;

      typeof(i) j = 8;

      some_func (&j); /* { dg-warning "discards .volatile. qualifier from pointer target type" } */

      /* The following is disabled as it is already checked above and the testsuites seems

         to count multiple different identical errors on the same line only once */

      /* dg-message "but argument is of type" "" { target *-*-* } 12 */

      some_func (&k);

    }

    @catch (id exc) {

      @throw;

    }

  } while(0);

}

@end