gcc/testsuite/objc.dg/try-catch-12.m

/* 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