Subversion Repositories openrisc

/* This program tests use of property provided setter/getter functions. */

/* { dg-options "-std=c99" } */

/* { dg-do run } */

/* { dg-xfail-run-if "Needs OBJC2 ABI" { *-*-darwin* && { lp64 && { ! objc2 } } } { "-fnext-runtime" } { "" } } */

#import "../../objc-obj-c++-shared/TestsuiteObject.m"

@interface Bar : TestsuiteObject

{

  int iVar;

}

@property (setter=MySetter:) int FooBar;

@end

@implementation Bar

@synthesize FooBar=iVar;

- (void) MySetter : (int) value { iVar = value; }

@end

int main(int argc, char *argv[]) {

    Bar *f = [Bar new];

    f.FooBar = 1;

    f.FooBar += 3;

    f.FooBar -= 4;

    return f.FooBar;

}