18c1441f8SAlexey Samsonov //
2*2946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
3*2946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
4*2946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
58c1441f8SAlexey Samsonov
68c1441f8SAlexey Samsonov // CONFIG open rdar://6416474
78c1441f8SAlexey Samsonov // was rdar://5847976
88c1441f8SAlexey Samsonov // was rdar://6348320
98c1441f8SAlexey Samsonov
108c1441f8SAlexey Samsonov #include <stdio.h>
118c1441f8SAlexey Samsonov #include <Block.h>
128c1441f8SAlexey Samsonov
138c1441f8SAlexey Samsonov int verbose = 0;
148c1441f8SAlexey Samsonov
main(int argc,char * argv[])158c1441f8SAlexey Samsonov int main(int argc, char* argv[]) {
168c1441f8SAlexey Samsonov
178c1441f8SAlexey Samsonov if (argc > 1) verbose = 1;
188c1441f8SAlexey Samsonov
198c1441f8SAlexey Samsonov __block void (^recursive_local_block)(int);
208c1441f8SAlexey Samsonov
218c1441f8SAlexey Samsonov if (verbose) printf("recursive_local_block is a local recursive block\n");
228c1441f8SAlexey Samsonov recursive_local_block = ^(int i) {
238c1441f8SAlexey Samsonov if (verbose) printf("%d\n", i);
248c1441f8SAlexey Samsonov if (i > 0) {
258c1441f8SAlexey Samsonov recursive_local_block(i - 1);
268c1441f8SAlexey Samsonov }
278c1441f8SAlexey Samsonov };
288c1441f8SAlexey Samsonov
298c1441f8SAlexey Samsonov if (verbose) printf("recursive_local_block's address is %p, running it:\n", (void*)recursive_local_block);
308c1441f8SAlexey Samsonov recursive_local_block(5);
318c1441f8SAlexey Samsonov
328c1441f8SAlexey Samsonov if (verbose) printf("Creating other_local_block: a local block that calls recursive_local_block\n");
338c1441f8SAlexey Samsonov
348c1441f8SAlexey Samsonov void (^other_local_block)(int) = ^(int i) {
358c1441f8SAlexey Samsonov if (verbose) printf("other_local_block running\n");
368c1441f8SAlexey Samsonov recursive_local_block(i);
378c1441f8SAlexey Samsonov };
388c1441f8SAlexey Samsonov
398c1441f8SAlexey Samsonov if (verbose) printf("other_local_block's address is %p, running it:\n", (void*)other_local_block);
408c1441f8SAlexey Samsonov
418c1441f8SAlexey Samsonov other_local_block(5);
428c1441f8SAlexey Samsonov
438c1441f8SAlexey Samsonov #if __APPLE_CC__ >= 5627
448c1441f8SAlexey Samsonov if (verbose) printf("Creating other_copied_block: a Block_copy of a block that will call recursive_local_block\n");
458c1441f8SAlexey Samsonov
468c1441f8SAlexey Samsonov void (^other_copied_block)(int) = Block_copy(^(int i) {
478c1441f8SAlexey Samsonov if (verbose) printf("other_copied_block running\n");
488c1441f8SAlexey Samsonov recursive_local_block(i);
498c1441f8SAlexey Samsonov });
508c1441f8SAlexey Samsonov
518c1441f8SAlexey Samsonov if (verbose) printf("other_copied_block's address is %p, running it:\n", (void*)other_copied_block);
528c1441f8SAlexey Samsonov
538c1441f8SAlexey Samsonov other_copied_block(5);
548c1441f8SAlexey Samsonov #endif
558c1441f8SAlexey Samsonov
568c1441f8SAlexey Samsonov __block void (^recursive_copy_block)(int);
578c1441f8SAlexey Samsonov
588c1441f8SAlexey Samsonov if (verbose) printf("Creating recursive_copy_block: a Block_copy of a block that will call recursive_copy_block recursively\n");
598c1441f8SAlexey Samsonov
608c1441f8SAlexey Samsonov recursive_copy_block = Block_copy(^(int i) {
618c1441f8SAlexey Samsonov if (verbose) printf("%d\n", i);
628c1441f8SAlexey Samsonov if (i > 0) {
638c1441f8SAlexey Samsonov recursive_copy_block(i - 1);
648c1441f8SAlexey Samsonov }
658c1441f8SAlexey Samsonov });
668c1441f8SAlexey Samsonov
678c1441f8SAlexey Samsonov if (verbose) printf("recursive_copy_block's address is %p, running it:\n", (void*)recursive_copy_block);
688c1441f8SAlexey Samsonov
698c1441f8SAlexey Samsonov recursive_copy_block(5);
708c1441f8SAlexey Samsonov
718c1441f8SAlexey Samsonov printf("%s: Success\n", argv[0]);
728c1441f8SAlexey Samsonov return 0;
738c1441f8SAlexey Samsonov }
74