summaryrefslogtreecommitdiffstats
path: root/c/src/ada-tests/sptests/sp04/sptest.adb
diff options
context:
space:
mode:
authorJoel Sherrill <joel.sherrill@OARcorp.com>2005-05-05 18:35:16 +0000
committerJoel Sherrill <joel.sherrill@OARcorp.com>2005-05-05 18:35:16 +0000
commit20b21beb0217390266370f9e693052860dacd856 (patch)
tree134448a242c919bdddc1c9db065d414da0a84a09 /c/src/ada-tests/sptests/sp04/sptest.adb
parent2005-05-05 Ralf Corsepius <ralf.corsepius@rtems.org> (diff)
downloadrtems-20b21beb0217390266370f9e693052860dacd856.tar.bz2
2005-05-05 Joel Sherrill <joel@OARcorp.com>
* sptests/sp04/sptest.adb, tmtests/tm02/tmtest.adb, tmtests/tmoverhd/tmtest.adb: Removed warnings.
Diffstat (limited to '')
-rw-r--r--c/src/ada-tests/sptests/sp04/sptest.adb15
1 files changed, 9 insertions, 6 deletions
diff --git a/c/src/ada-tests/sptests/sp04/sptest.adb b/c/src/ada-tests/sptests/sp04/sptest.adb
index b57f78db3d..e20f33444d 100644
--- a/c/src/ada-tests/sptests/sp04/sptest.adb
+++ b/c/src/ada-tests/sptests/sp04/sptest.adb
@@ -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;