From 9b1b8df212720add1ad9c702a5c0d0fd8b9d9ac3 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 31 Mar 2008 13:02:18 +0200 Subject: [PATCH] Removed, causes resource issues on some environments. From-SVN: r133750 --- gcc/testsuite/gnat.dg/too_many_tasks.adb | 25 ------------------------ 1 file changed, 25 deletions(-) delete mode 100644 gcc/testsuite/gnat.dg/too_many_tasks.adb diff --git a/gcc/testsuite/gnat.dg/too_many_tasks.adb b/gcc/testsuite/gnat.dg/too_many_tasks.adb deleted file mode 100644 index 5d01570d634..00000000000 --- a/gcc/testsuite/gnat.dg/too_many_tasks.adb +++ /dev/null @@ -1,25 +0,0 @@ --- { dg-do run } - -procedure too_many_tasks is - Global : Natural := 0; - function Output return Integer is - begin - Global := Global + 1; - return Global; - end Output; - - task type A; - task type B; - - task body A is - I : Integer := Output; - T : B; - begin null; end A; - - task body B is - I : Integer := Output; - T : A; - begin null; end B; - - T : A; -begin null; end; -- 2.30.2