source: tests/concurrent/coroutineYield.cfa@ dc33b5b

ADT arm-eh ast-experimental enum forall-pointer-decay jacob/cs343-translation jenkins-sandbox new-ast new-ast-unique-expr pthread-emulation qualifiedEnum
Last change on this file since dc33b5b was 107b01a, checked in by Thierry Delisle <tdelisle@…>, 7 years ago

Several changes to the makefiles

  • change .c tests to .cfa
  • add require for libtool in configure
  • libtoolize to fix some warnings
  • Property mode set to 100644
File size: 878 bytes
Line 
1#include <fstream.hfa>
2#include <kernel.hfa>
3#include <stdlib.hfa>
4#include <thread.hfa>
5#include <time.hfa>
6
7#define __kick_rate 150000ul
8#include "long_tests.hfa"
9
10#ifndef PREEMPTION_RATE
11#define PREEMPTION_RATE 10`ms
12#endif
13
14Duration default_preemption() {
15 return PREEMPTION_RATE;
16}
17
18#ifdef TEST_LONG
19static const unsigned long N = 600_000ul;
20#else
21static const unsigned long N = 1_000ul;
22#endif
23
24coroutine Coroutine {};
25
26void main(Coroutine& this) {
27 while(true) {
28 #if !defined(TEST_FOREVER)
29 sout | "Coroutine 1";
30 #endif
31 yield();
32 #if !defined(TEST_FOREVER)
33 sout | "Coroutine 2";
34 #endif
35 suspend();
36 }
37}
38
39
40int main(int argc, char* argv[]) {
41 Coroutine c;
42 for(int i = 0; TEST(i < N); i++) {
43 #if !defined(TEST_FOREVER)
44 sout | "Thread 1";
45 #endif
46 resume(c);
47 #if !defined(TEST_FOREVER)
48 sout | "Thread 2";
49 #endif
50 yield();
51 KICK_WATCHDOG;
52 }
53}
Note: See TracBrowser for help on using the repository browser.