aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m')
-rw-r--r--gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m45
1 files changed, 45 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m b/gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m
new file mode 100644
index 000000000..f0b585387
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/objc/execute/formal_protocol-1.m
@@ -0,0 +1,45 @@
+/* Contributed by Nicola Pero - Fri Mar 9 21:35:47 CET 2001 */
+
+#include <stdlib.h>
+#include "../../objc-obj-c++-shared/TestsuiteObject.m"
+
+/* Tests defining a protocol and a class adopting it */
+
+@protocol Enabling
+- (BOOL) isEnabled;
+- (void) setEnabled: (BOOL)flag;
+@end
+
+@interface Feature : TestsuiteObject <Enabling>
+{
+ const char *name;
+ BOOL isEnabled;
+}
+@end
+
+@implementation Feature
+- (BOOL) isEnabled
+{
+ return isEnabled;
+}
+- (void) setEnabled: (BOOL)flag
+{
+ isEnabled = flag;
+}
+@end
+
+int main (void)
+{
+ Feature *object;
+
+ object = [Feature new];
+
+ [object setEnabled: YES];
+ if (![object isEnabled])
+ {
+ abort ();
+ }
+
+ return 0;
+}
+