objc4-756.2.tar.gz

[apple/objc4.git] / test / load-reentrant.m

diff --git a/test/load-reentrant.m b/test/load-reentrant.m
new file mode 100644 (file)
index 0000000..1dac2f2
--- /dev/null
+++ b/test/load-reentrant.m
@@ -0,0 +1,36 @@
+/*
+TEST_BUILD
+    $C{COMPILE} $DIR/load-reentrant.m -o load-reentrant.exe
+    $C{COMPILE} $DIR/load-reentrant2.m -o libload-reentrant2.dylib -bundle -bundle_loader load-reentrant.exe
+END
+*/
+
+#include "test.h"
+#include <dlfcn.h>
+
+int state1 = 0;
+int *state2_p;
+
+OBJC_ROOT_CLASS
+@interface One @end
+@implementation One
++(void)load 
+{
+    state1 = 111;
+
+    // Re-entrant +load doesn't get to complete until we do
+    void *dlh = dlopen("libload-reentrant2.dylib", RTLD_LAZY);
+    testassert(dlh);
+    state2_p = (int *)dlsym(dlh, "state2");
+    testassert(state2_p);
+    testassert(*state2_p == 0);
+
+    state1 = 1;
+}
+@end
+
+int main()
+{
+    testassert(state1 == 1  &&  state2_p  &&  *state2_p == 2);
+    succeed(__FILE__);
+}