source: src/tests/preempt_longrun/stack.c @ f2b12406

ADTaaron-thesisarm-ehast-experimentalcleanup-dtorsdeferred_resndemanglerenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerpthread-emulationqualifiedEnumresolv-newwith_gc
Last change on this file since f2b12406 was 0322865c, checked in by Thierry Delisle <tdelisle@…>, 7 years ago

Cleaned long tests to be more consistent and offer more debug information

  • Property mode set to 100644
File size: 547 bytes
RevLine 
[cc3e4d0]1#include <kernel>
2#include <thread>
3
4#include <math>
5
6#ifndef PREEMPTION_RATE
7#define PREEMPTION_RATE 10_000ul
8#endif
9
10unsigned int default_preemption() {
11        return PREEMPTION_RATE;
12}
13
[0322865c]14thread worker_t {};
[cc3e4d0]15
[0322865c]16void main(worker_t * this) {
[cc3e4d0]17        volatile long p = 5_021_609ul;
18        volatile long a = 326_417ul;
19        volatile long n = 1l;
[0322865c]20        for (volatile long i = 0; i < p; i++) {
21                n *= a;
22                n %= p;
[cc3e4d0]23        }
[0322865c]24
[cc3e4d0]25        if( n != a ) {
26                abort();
27        }
28}
29
[0322865c]30extern "C" {
31static worker_t * workers;
32}
33
[cc3e4d0]34int main(int argc, char* argv[]) {
35        processor p;
36        {
[0322865c]37                worker_t w[7];
38                workers = w;
[cc3e4d0]39        }
40}
Note: See TracBrowser for help on using the repository browser.