60 lines
1.0 KiB
Objective-C
60 lines
1.0 KiB
Objective-C
/* 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 "undeclared" } */
|
|
/* { 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;
|
|
}
|