- File:
-
- 1 edited
-
libcfa/src/concurrency/thread.cfa (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
libcfa/src/concurrency/thread.cfa
r5b2b42e rb798713 10 10 // Created On : Tue Jan 17 12:27:26 2017 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Wed Dec 4 09:17:49 201913 // Update Count : 912 // Last Modified On : Fri Mar 30 17:19:52 2018 13 // Update Count : 8 14 14 // 15 15 … … 33 33 // Thread ctors and dtors 34 34 void ?{}(thread_desc & this, const char * const name, cluster & cl, void * storage, size_t storageSize ) with( this ) { 35 context{ 0p, 0p};35 context{ NULL, NULL }; 36 36 self_cor{ name, storage, storageSize }; 37 37 state = Start; … … 41 41 self_mon_p = &self_mon; 42 42 curr_cluster = &cl; 43 next = 0p; 43 link.next = 0p; 44 link.prev = 0p; 44 45 45 node.next = 0p;46 node.prev = 0p;46 node.next = NULL; 47 node.prev = NULL; 47 48 doregister(curr_cluster, this); 48 49 … … 58 59 void ?{}( scoped(T)& this ) with( this ) { 59 60 handle{}; 60 __thrd_start(handle , main);61 __thrd_start(handle); 61 62 } 62 63 … … 64 65 void ?{}( scoped(T)& this, P params ) with( this ) { 65 66 handle{ params }; 66 __thrd_start(handle , main);67 __thrd_start(handle); 67 68 } 68 69 … … 75 76 // Starting and stopping threads 76 77 forall( dtype T | is_thread(T) ) 77 void __thrd_start( T & this, void (*main_p)(T &)) {78 void __thrd_start( T& this ) { 78 79 thread_desc * this_thrd = get_thread(this); 80 thread_desc * curr_thrd = TL_GET( this_thread ); 79 81 80 82 disable_interrupts(); 81 CtxStart(main_p, get_coroutine(this), this, CtxInvokeThread); 82 83 CtxStart(&this, CtxInvokeThread); 83 84 this_thrd->context.[SP, FP] = this_thrd->self_cor.context.[SP, FP]; 84 85 verify( this_thrd->context.SP ); 86 CtxSwitch( &curr_thrd->context, &this_thrd->context ); 85 87 86 88 ScheduleThread(this_thrd); 87 89 enable_interrupts( __cfaabi_dbg_ctx ); 90 } 91 92 extern "C" { 93 // KERNEL ONLY 94 void __finish_creation(thread_desc * this) { 95 // set new coroutine that the processor is executing 96 // and context switch to it 97 verify( kernelTLS.this_thread != this ); 98 verify( kernelTLS.this_thread->context.SP ); 99 CtxSwitch( &this->context, &kernelTLS.this_thread->context ); 100 } 88 101 } 89 102
Note:
See TracChangeset
for help on using the changeset viewer.