Changeset ffac259 for tests/exceptions
- Timestamp:
- Jul 11, 2023, 2:02:38 PM (18 months ago)
- Branches:
- master
- Children:
- c16cc99
- Parents:
- 4c8ce47
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
tests/exceptions/pingpong_nonlocal.cfa
r4c8ce47 rffac259 3 3 #include <fstream.hfa> 4 4 #include <mutex_stmt.hfa> 5 #include <locks.hfa>6 5 7 6 exception num_ping_pongs { int num; }; … … 15 14 }; 16 15 17 semaphore sync{0};18 19 16 void ?{}( Ping_Pong & this, char * name ) with( this ) { 20 17 this.name = name; … … 23 20 } 24 21 25 int numtimes = 100; 22 void main( Ping_Pong & this ) with( this ) { 23 enum { numtimes = 100 }; 26 24 27 void main( Ping_Pong & this ) with( this ) {28 25 void inc_resume_at( int value ) { 29 26 except.num = value + 1; 30 27 resumeAt( partner, except ); 31 28 } 32 // mutex( sout ) sout | name | "start"; // removed to get rid of output race33 29 try { 34 30 for () { … … 45 41 } 46 42 } 47 // mutex( sout ) sout | name | "end"; // removed to get rid of output race48 43 } 49 44
Note: See TracChangeset
for help on using the changeset viewer.