diff options
| author | Joel Sherrill <joel.sherrill@OARcorp.com> | 1997-06-03 00:32:50 +0000 |
|---|---|---|
| committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 1997-06-03 00:32:50 +0000 |
| commit | e56a2ef367c735f429d7ab902e6a6177af5dd24a (patch) | |
| tree | e2421d9aec98f85b99fcee387ca07cec06a9f05c /c/src/ada-tests/sptests/sp07/sptest.ads | |
| parent | New style main procedure which creates the test's RTEMS initialization task (diff) | |
| download | rtems-e56a2ef367c735f429d7ab902e6a6177af5dd24a.tar.bz2 | |
updated to run
Diffstat (limited to '')
| -rw-r--r-- | c/src/ada-tests/sptests/sp07/sptest.ads | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/c/src/ada-tests/sptests/sp07/sptest.ads b/c/src/ada-tests/sptests/sp07/sptest.ads index 040e91a65d..2fcfec1888 100644 --- a/c/src/ada-tests/sptests/sp07/sptest.ads +++ b/c/src/ada-tests/sptests/sp07/sptest.ads @@ -166,4 +166,21 @@ package SPTEST is RUNNING_TASK : in RTEMS.TCB_POINTER ); +-- +-- This is the User Extension Table for this test. +-- + + EXTENSIONS : aliased RTEMS.EXTENSIONS_TABLE := + ( + SPTEST.TASK_CREATE_EXTENSION'ACCESS, -- Task create + SPTEST.TASK_START_EXTENSION'ACCESS, -- Task start + SPTEST.TASK_RESTART_EXTENSION'ACCESS, -- Task restart + SPTEST.TASK_DELETE_EXTENSION'ACCESS, -- Task delete + NULL, -- Task switch + NULL, -- Task post switch + NULL, -- Task begin + SPTEST.TASK_EXIT_EXTENSION'ACCESS, -- Task exitted + NULL -- Fatal error + ); + end SPTEST; |