Changeset d37aa444 in rtems
- Timestamp:
- 11/16/99 15:39:08 (24 years ago)
- Branches:
- 4.10, 4.11, 4.8, 4.9, 5, master
- Children:
- e9b00d7
- Parents:
- 2d82857
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
c/src/tests/itrontests/itrontask03/init.c
r2d82857 rd37aa444 58 58 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 59 59 directive_failed( status, "INIT - ref_tsk of RTEMS_PREEMPT"); 60 assert( pk_rtsk.tskstat == TTS_DMT);60 fatal_directive_status(pk_rtsk.tskstat,TTS_DMT,"tskstat of PREEMPT"); 61 61 62 62 /* … … 71 71 puts( "INIT - ref_tsk PREEMPT - Validate no longer exists" ); 72 72 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 73 assert( status == E_NOEXS ); 74 73 fatal_directive_status( status, E_NOEXS, "tskstat of PREEMPT"); 75 74 status = chg_pri( TSK_SELF, PREEMPT_PRIORITY ); 76 75 directive_failed( status, "chg_pri of SELF" ); … … 99 98 status = sta_tsk( TA3_ID, 0 ); 100 99 directive_failed( status, "sta_tsk of TA3" ); 101 puts( "INIT - ref_tsk TA1 - Validate READY STATE" ); 100 102 101 status = ref_tsk( &pk_rtsk, TA1_ID); 103 102 directive_failed( status, "INIT - ref_tsk of TA1"); 104 assert( pk_rtsk.tskstat == TTS_RDY);103 fatal_directive_status( pk_rtsk.tskstat, TTS_RDY , "tskstat of TA1"); 105 104 106 105 puts( "INIT - suspending TA2 while middle task on a ready chain" ); … … 109 108 status = ref_tsk( &pk_rtsk, TA2_ID); 110 109 directive_failed( status, "INIT - ref_tsk of TA2"); 111 assert( pk_rtsk.tskstat == TTS_SUS);110 fatal_directive_status( pk_rtsk.tskstat, TTS_SUS, "tskstat of TA2"); 112 111 113 112 status = ter_tsk( TA1_ID ); … … 131 130 status = sta_tsk( TA3_ID, 0 ); 132 131 directive_failed( status, "sta_tsk of TA3" ); 133 132 134 133 exd_tsk(); 135 134 assert(0); -
c/src/tests/itrontests/itrontask03/preempt.c
r2d82857 rd37aa444 31 31 puts( "PREEMPT - ref_tsk validation" ); 32 32 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 33 assert( status == E_OK);33 fatal_directive_status( status, E_OK , "ref_tsk of PREEMPT"); 34 34 assert( pk_rtsk.tskpri == PREEMPT_PRIORITY ); 35 35 assert( pk_rtsk.itskpri == PREEMPT_PRIORITY ); -
testsuites/itrontests/itrontask03/init.c
r2d82857 rd37aa444 58 58 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 59 59 directive_failed( status, "INIT - ref_tsk of RTEMS_PREEMPT"); 60 assert( pk_rtsk.tskstat == TTS_DMT);60 fatal_directive_status(pk_rtsk.tskstat,TTS_DMT,"tskstat of PREEMPT"); 61 61 62 62 /* … … 71 71 puts( "INIT - ref_tsk PREEMPT - Validate no longer exists" ); 72 72 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 73 assert( status == E_NOEXS ); 74 73 fatal_directive_status( status, E_NOEXS, "tskstat of PREEMPT"); 75 74 status = chg_pri( TSK_SELF, PREEMPT_PRIORITY ); 76 75 directive_failed( status, "chg_pri of SELF" ); … … 99 98 status = sta_tsk( TA3_ID, 0 ); 100 99 directive_failed( status, "sta_tsk of TA3" ); 101 puts( "INIT - ref_tsk TA1 - Validate READY STATE" ); 100 102 101 status = ref_tsk( &pk_rtsk, TA1_ID); 103 102 directive_failed( status, "INIT - ref_tsk of TA1"); 104 assert( pk_rtsk.tskstat == TTS_RDY);103 fatal_directive_status( pk_rtsk.tskstat, TTS_RDY , "tskstat of TA1"); 105 104 106 105 puts( "INIT - suspending TA2 while middle task on a ready chain" ); … … 109 108 status = ref_tsk( &pk_rtsk, TA2_ID); 110 109 directive_failed( status, "INIT - ref_tsk of TA2"); 111 assert( pk_rtsk.tskstat == TTS_SUS);110 fatal_directive_status( pk_rtsk.tskstat, TTS_SUS, "tskstat of TA2"); 112 111 113 112 status = ter_tsk( TA1_ID ); … … 131 130 status = sta_tsk( TA3_ID, 0 ); 132 131 directive_failed( status, "sta_tsk of TA3" ); 133 132 134 133 exd_tsk(); 135 134 assert(0); -
testsuites/itrontests/itrontask03/preempt.c
r2d82857 rd37aa444 31 31 puts( "PREEMPT - ref_tsk validation" ); 32 32 status = ref_tsk( &pk_rtsk, PREEMPT_TASK_ID ); 33 assert( status == E_OK);33 fatal_directive_status( status, E_OK , "ref_tsk of PREEMPT"); 34 34 assert( pk_rtsk.tskpri == PREEMPT_PRIORITY ); 35 35 assert( pk_rtsk.itskpri == PREEMPT_PRIORITY );
Note: See TracChangeset
for help on using the changeset viewer.