2005-05-05 Joel Sherrill <joel@OARcorp.com>

* sptests/sp04/sptest.adb, tmtests/tm02/tmtest.adb,
	tmtests/tmoverhd/tmtest.adb: Removed warnings.
This commit is contained in:
Joel Sherrill
2005-05-05 18:35:16 +00:00
parent e9a5718438
commit 20b21beb02
4 changed files with 15 additions and 7 deletions

View File

@@ -1,3 +1,8 @@
2005-05-05 Joel Sherrill <joel@OARcorp.com>
* sptests/sp04/sptest.adb, tmtests/tm02/tmtest.adb,
tmtests/tmoverhd/tmtest.adb: Removed warnings.
2005-05-03 Joel Sherrill <joel@OARcorp.com>
* samples/hello/sptest.adb, sptests/sp03/sptest.adb,

View File

@@ -229,8 +229,9 @@ package body SPTEST is
);
TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_MODE" );
<<LOOP_LABEL>>
goto LOOP_LABEL;
LOOP
NULL;
END LOOP;
end if;
@@ -248,8 +249,9 @@ package body SPTEST is
) is
begin
<<LOOP_LABEL>>
goto LOOP_LABEL;
LOOP
NULL;
END LOOP;
end TASK_2;
@@ -263,8 +265,9 @@ package body SPTEST is
) is
begin
<<LOOP_LABEL>>
goto LOOP_LABEL;
LOOP
NULL;
END LOOP;
end TASK_3;

View File

@@ -188,7 +188,6 @@ package body TMTEST is
procedure LOW_TASK (
ARGUMENT : in RTEMS.TASK_ARGUMENT
) is
STATUS : RTEMS.STATUS_CODES;
begin
TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER;

View File

@@ -155,6 +155,7 @@ package body TMTEST is
OVERHEAD := 0;
IN_PRIORITY := 0;
IN_MODE := 0;
MASK := 0;
SIGNALS := 0;
EVENTS := 0;
MAJOR := 0;