2009-07-07 Joel Sherrill <joel.sherrill@OARcorp.com>

	* sp04/sp04.doc, sp04/sp04.scn, sp04/task1.c: Add test of
	rtems_extension_delete.

3 files changed, 17 insertions, 2 deletions

diff --git a/testsuites/sptests/sp04/sp04.doc b/testsuites/sptests/sp04/sp04.doc
index e2a16eeb3e..35c0daef79 100644
--- a/testsuites/sptests/sp04/sp04.doc
+++ b/testsuites/sptests/sp04/sp04.doc
@@ -15,8 +15,14 @@ This file describes the directives and concepts tested by this test set.
 test set name:  test4
 
 directives:
-  ex_init, ex_start, t_create, t_start, tm_tick, i_return,
-  tm_set, tm_get, ev_receive, t_mode
+  rtems_task_create
+  rtems_task_start
+  rtems_task_mode
+  rtems_clock_set
+  rtems_clock_get
+  rtems_event_receive
+  rtems_extension_create
+  rtems_extension_delete
 
 concepts:
 
@@ -28,6 +34,9 @@ concepts:
 
   d.  Verifies time-slice gets reset even if only one task ready.
 
+  e.  Verifies that deleting a user extension with a task switch hook
+      works as expected.
+
 output:
   The task name and the current time are printed out each time that a new
   task is being dispatched.  The configured timeslice is 100 ticks
diff --git a/testsuites/sptests/sp04/sp04.scn b/testsuites/sptests/sp04/sp04.scn
index 801ad8c6fb..70bea4ad1f 100644
--- a/testsuites/sptests/sp04/sp04.scn
+++ b/testsuites/sptests/sp04/sp04.scn
@@ -22,4 +22,5 @@ TA1 - 09:15:09   12/31/1988
 TA2 - 09:15:16   12/31/1988
 TA3 - 09:15:17   12/31/1988
 TA1 - 09:15:18   12/31/1988
+TA1 - rtems_extension_delete - successful
 *** END OF TEST 4 ***
diff --git a/testsuites/sptests/sp04/task1.c b/testsuites/sptests/sp04/task1.c
index e712568e6a..35724ff83a 100644
--- a/testsuites/sptests/sp04/task1.c
+++ b/testsuites/sptests/sp04/task1.c
@@ -110,6 +110,11 @@ rtems_task Task_1(
 
       while ( !testsFinished );
       showTaskSwitches ();
+
+      puts( "TA1 - rtems_extension_delete - successful" );
+      status = rtems_extension_delete( Extension_id[1] );
+      directive_failed( status, "rtems_extension_delete" );
+
       puts( "*** END OF TEST 4 ***" );
       rtems_test_exit (0);
     }