add more introspection stuff (and half-written Introspection test)

1 files changed, 23 insertions, 0 deletions

diff --git a/tests/Introspection.m b/tests/Introspection.m
new file mode 100644
index 0000000..d54cc0f
--- /dev/null
+++ b/tests/Introspection.m
@@ -0,0 +1,23 @@
+#include <Paradox/Core.h>
+#include <stdio.h>
+
+@interface MyClass : PXObject
+- (void)sayHello;
+@end
+
+@implementation MyClass
+
+- (void)sayHello {
+	printf("Hello!");
+}
+
+@end
+
+int main(void) {
+	printf("Object introspection test\n");
+	MyClass *instance = [MyClass new];
+	printf("class = %s\n", class_getName([instance class]));
+	printf("superclass = %s\n", class_getName([instance superclass]));
+	printf("className = %s\n", [instance className]);
+	printf("isMemberOfClass:MyClass = %s\n", [object isMemberOfClass:[MyClass class]]);
+}