Last change
on this file since c2f6b79 was c26bea2a, checked in by Peter A. Buhr <pabuhr@…>, 2 years ago |
first attempt at renaming directory tests/concurrent to tests/concurrency to harmonize with other concurrency directory names
|
-
Property mode
set to
100644
|
File size:
743 bytes
|
Line | |
---|
1 | #include <fstream.hfa>
|
---|
2 | #include <thread.hfa>
|
---|
3 | #include <time.hfa>
|
---|
4 |
|
---|
5 | #include "long_tests.hfa"
|
---|
6 |
|
---|
7 | #ifndef PREEMPTION_RATE
|
---|
8 | #define PREEMPTION_RATE 10`ms
|
---|
9 | #endif
|
---|
10 |
|
---|
11 | Duration default_preemption() {
|
---|
12 | return PREEMPTION_RATE;
|
---|
13 | }
|
---|
14 |
|
---|
15 | #ifdef TEST_LONG
|
---|
16 | static const unsigned long N = 30_000ul;
|
---|
17 | #else
|
---|
18 | static const unsigned long N = 500ul;
|
---|
19 | #endif
|
---|
20 |
|
---|
21 | extern void __cfaabi_check_preemption();
|
---|
22 |
|
---|
23 | static struct {
|
---|
24 | volatile int x;
|
---|
25 | volatile int y;
|
---|
26 | } globals;
|
---|
27 |
|
---|
28 | thread T1 {};
|
---|
29 | void main(T1 &) {
|
---|
30 | for() {
|
---|
31 | if ( globals.x == N ) break;
|
---|
32 | if ( globals.x < globals.y ) globals.x += 1;
|
---|
33 | }
|
---|
34 | }
|
---|
35 |
|
---|
36 | thread T2 {};
|
---|
37 | void main(T2 &) {
|
---|
38 | for() {
|
---|
39 | if ( globals.y == N ) break;
|
---|
40 | if ( globals.y == globals.x ) globals.y += 1;
|
---|
41 | }
|
---|
42 | }
|
---|
43 |
|
---|
44 | int main() {
|
---|
45 | {
|
---|
46 | T1 t1;
|
---|
47 | T2 t2;
|
---|
48 | }
|
---|
49 | sout | "Done";
|
---|
50 | } // main
|
---|
Note:
See
TracBrowser
for help on using the repository browser.