Actors: Coroutines/MYCoroutineTest.m@2475f871c218

     1 //

     2 //  MYCoroutineTest.m

     3 //  Coroutines

     4 //

     5 //  Created by Jens Alfke on 4/29/08.

     6 //  Copyright 2008 __MyCompanyName__. All rights reserved.

     7 //

     9 #import "MYCoroutine.h"

    10 #import "CoroX.h"

    13 @interface CoroTest1 : MYCoroutine

    14 {

    15     int value;

    16 }

    17 @property int value;

    18 @end

    20 @interface CoroTest2 : CoroTest1

    21 @end

    24 CoroTest1 *firstCoro, *secondCoro;

    27 @implementation CoroTest2

    29 - (void) main

    30 {

    31     int num = 0;

    33 	NSLog(@"secondTask created with value %d", self.value);

    35 	while (1)

    36 	{

    37 		NSLog(@"secondTask: %d %d", self.bytesLeftOnStack, num++);

    38 		[firstCoro resume];

    39 	}

    40 }

    42 @end

    45 @implementation CoroTest1

    47 @synthesize value;

    49 - (void) regress: (int)depth

    50 {

    51     char useUpSpace[1024];

    52     useUpSpace[0] = 0;

    53     NSLog(@"infinite regress:  depth=%i, stack space=%d", depth,self.bytesLeftOnStack);

    54     if( [[MYCoroutine currentCoroutine] stackSpaceAlmostGone] )

    55         NSLog(@"infinite regress: bailing out!");

    56     else

    57         [self regress: depth+1];

    58 }

    60 - (void) main

    61 {

    62 	int num = 0;

    64 	NSLog(@"firstTask created with value %d", self.value);

    65 	secondCoro = [[CoroTest2 alloc] init];

    66     secondCoro.name = @"second";

    67     secondCoro.value = 2;

    69 	while ( num < 100 )

    70 	{

    71 		NSLog(@"firstTask:  %d %d", self.bytesLeftOnStack, num++);

    72         [secondCoro resume];

    73 	}

    75     [secondCoro release];

    77     NSLog(@"*** TESTING STACK LIMITS ***");

    78     [self regress: 1];

    80     [[MYCoroutine mainCoroutine] resume];

    81 }

    83 + (void) test

    84 {

    85     NSLog(@"*** TESTING COROUTINES ***");

    86 	firstCoro = [[CoroTest1 alloc] init];

    87     firstCoro.name = @"first";

    88     firstCoro.value = 1;

    89     [firstCoro resume];

    91     NSLog(@"Returned from coroutines; exiting");

    93     [firstCoro release];

    94 }

    96 @end

   101 @interface Generator : MYCoroutine

   102 { int _count; }

   103 - (id) initWithCount: (int)count;

   104 @end

   106 @implementation Generator

   108 - (id) initWithCount: (int)count

   109 {

   110     self = [super init];

   111     if (self != nil) {

   112         _count = count;

   113     }

   114     return self;

   115 }

   118 - (void) main

   119 {

   120     for( int i=1; i<=_count; i++ )

   121         [MYCoroutine yieldToCaller: [NSNumber numberWithInt: i]];

   122 }

   124 + (void) test

   125 {

   126     NSLog(@"*** TESTING GENERATOR ***");

   127     Generator *g = [[Generator alloc] initWithCount: 10];

   128     id value;

   129     while( nil != (value = [g call]) )

   130         NSLog(@"Generator yielded %@",value);

   131     NSLog(@"Generator returned nil");

   132 }

   134 @end

   138 int main()

   139 {

   140     NSAutoreleasePool *pool = [NSAutoreleasePool new];

   141     NSLog(@"Starting test...");

   143     [MYCoroutine setDefaultStackSize: kCoroX_minStackSize];

   145     [CoroTest1 test];

   147     [Generator test];

   149     NSLog(@"FINISHED");

   150     [pool drain];

   151 }

author	Jens Alfke <jens@mooseyard.com>
	Wed Apr 30 14:18:49 2008 -0700 (2008-04-30)
changeset 1	2475f871c218
parent 0	deb0ee0c5b21
permissions	-rw-r--r--