source: benchmark/ctxswitch/cfa_cor.cfa @ 3c67255

#include <kernel.hfa>
#include <thread.hfa>

#include "bench.h"

coroutine GreatSuspender {};

void ?{}( GreatSuspender & this ) {
        prime(this);
}

void main( __attribute__((unused)) GreatSuspender & this ) {
        while( true ) {
                suspend();
        }
}

int main(int argc, char* argv[]) {
        GreatSuspender s;

        BENCH(
                for ( i; n ) {
                        resume( s );
                },
                result
        )

        printf("%g\n", result);
}