URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [objc.dg/] [private-1.m] - Rev 708
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test errors for accessing @private and @protected variables. */ /* Author: Nicola Pero <nicola@brainstorm.co.uk>. */ /* { dg-do compile } */ #include <objc/objc.h> @interface MySuperClass { @private int private; @protected int protected; @public int public; } - (void) test; @end @implementation MySuperClass - (void) test { private = 12; /* Ok */ protected = 12; /* Ok */ public = 12; /* Ok */ } @end @interface MyClass : MySuperClass @end @implementation MyClass - (void) test { /* Private variables simply don't exist in the subclass. */ private = 12; /* { dg-error "instance variable" } */ /* { dg-message "function it appears in" "" { target *-*-* } { 37 } } */ protected = 12; /* Ok */ public = 12; /* Ok */ } @end int main (void) { MyClass *m = nil; if (m != nil) { int access; access = m->private; /* { dg-warning "is @private" } */ access = m->protected; /* { dg-warning "is @protected" } */ access = m->public; /* Ok */ } return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log