Mercurial > cgi-bin > hgwebdir.cgi > VMS > VMS_Implementations > VMS_impls > VMS__MC_shared_impl

comparison VMS.c @ 75:f6990e1ba998

find changesets by author, revision, files, or words in the commit message
new sequential version
author Merten Sach <msach@mailbox.tu-berlin.de>
date Thu, 02 Jun 2011 13:55:51 +0200
parents 5ff1631c26ed
children 9ddbb071142d
comparison
equal deleted inserted replaced
38:90a67c3d0e5d 39:bc1c7b400e78
274 VMS__start_the_work_then_wait_until_done_Seq() 274 VMS__start_the_work_then_wait_until_done_Seq()
275 { 275 {
276 //Instead of un-suspending threads, just call the one and only 276 //Instead of un-suspending threads, just call the one and only
277 // core loop (sequential version), in the main thread. 277 // core loop (sequential version), in the main thread.
278 coreLoop_Seq( NULL ); 278 coreLoop_Seq( NULL );
279 flushRegisters();
279 280
280 } 281 }
281 #endif 282 #endif
282 283
283 /*Create stack, then create __cdecl structure on it and put initialData and 284 /*Create stack, then create __cdecl structure on it and put initialData and
702 * processors). 703 * processors).
703 */ 704 */
704 void 705 void
705 endOSThreadFn( void *initData, VirtProcr *animatingPr ) 706 endOSThreadFn( void *initData, VirtProcr *animatingPr )
706 { 707 {
708 #ifdef SEQUENTIAL
709 asmTerminateCoreLoopSeq(animatingPr);
710 #else
707 asmTerminateCoreLoop(animatingPr); 711 asmTerminateCoreLoop(animatingPr);
712 #endif
708 } 713 }
709 714
710 715
711 /*This is called from the startup & shutdown 716 /*This is called from the startup & shutdown
712 */ 717 */