source: src/libcfa/concurrency/threads @ 8f49a54

aaron-thesisarm-ehcleanup-dtorsdeferred_resndemanglerenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerpthread-emulationqualifiedEnumresolv-newwith_gc
Last change on this file since 8f49a54 was 8f49a54, checked in by Thierry Delisle <tdelisle@…>, 6 years ago

Clean-up thread, kernel and examples

  • Property mode set to 100644
File size: 1.9 KB
Line 
1//                              -*- Mode: CFA -*-
2//
3// Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
4//
5// The contents of this file are covered under the licence agreement in the
6// file "LICENCE" distributed with Cforall.
7//
8// threads --
9//
10// Author           : Thierry Delisle
11// Created On       : Tue Jan 17 12:27:26 2016
12// Last Modified By : Thierry Delisle
13// Last Modified On : --
14// Update Count     : 0
15//
16
17#ifndef THREADS_H
18#define THREADS_H
19
20#include "assert"
21#include "invoke.h"
22
23#include "coroutines"
24
25//-----------------------------------------------------------------------------
26// Coroutine trait
27// Anything that implements this trait can be resumed.
28// Anything that is resumed is a coroutine.
29trait is_thread(dtype T /*| sized(T)*/) {
30      void main(T* this);
31      thread_h* get_thread(T* this);
32        /*void ?{}(T*);
33        void ^?{}(T*);*/
34};
35
36#define DECL_THREAD(X) static inline thread_h* get_thread(X* this) { return &this->t; } void main(X* this);
37
38forall(otype T | is_thread(T) )
39static inline coroutine* get_coroutine(T* this) {
40        return &get_thread(this)->c;
41}
42
43static inline coroutine* get_coroutine(thread_h* this) {
44        return &this->c;
45}
46
47//-----------------------------------------------------------------------------
48// Ctors and dtors
49void ?{}(thread_h* this);
50void ^?{}(thread_h* this);
51
52//-----------------------------------------------------------------------------
53// thread runner
54// Structure that actually start and stop threads
55forall(otype T | is_thread(T) )
56struct thread {
57        T handle;
58};
59
60forall(otype T | is_thread(T) )
61void ?{}( thread(T)* this );
62
63forall(otype T, ttype P | is_thread(T) | { void ?{}(T*, P); } )
64void ?{}( thread(T)* this, P params );
65
66forall(otype T | is_thread(T) )
67void ^?{}( thread(T)* this );
68
69//-----------------------------------------------------------------------------
70// PRIVATE exposed because of inline
71
72#endif //THREADS_H
73
74// Local Variables: //
75// mode: c //
76// tab-width: 4 //
77// End: //
Note: See TracBrowser for help on using the repository browser.