From 0270bc852c437e2d04f6846fc01f49eee85aade8 Mon Sep 17 00:00:00 2001 From: Ralf Corsepius Date: Mon, 26 Aug 2002 09:27:51 +0000 Subject: 2002-08-26 Ralf Corsepius * tmtests/Makefile.am: New. * tmtests/tm01/Makefile.am: New. * tmtests/tm02/Makefile.am: New. * tmtests/tm03/Makefile.am: New. * tmtests/tm04/Makefile.am: New. * tmtests/tm05/Makefile.am: New. * tmtests/tm06/Makefile.am: New. * tmtests/tm07/Makefile.am: New. * tmtests/tm08/Makefile.am: New. * tmtests/tm09/Makefile.am: New. * tmtests/tm10/Makefile.am: New. * tmtests/tm11/Makefile.am: New. * tmtests/tm12/Makefile.am: New. * tmtests/tm13/Makefile.am: New. * tmtests/tm14/Makefile.am: New. * tmtests/tm15/Makefile.am: New. * tmtests/tm16/Makefile.am: New. * tmtests/tm17/Makefile.am: New. * tmtests/tm18/Makefile.am: New. * tmtests/tm19/Makefile.am: New. * tmtests/tm20/Makefile.am: New. * tmtests/tm21/Makefile.am: New. * tmtests/tm22/Makefile.am: New. * tmtests/tm23/Makefile.am: New. * tmtests/tm24/Makefile.am: New. * tmtests/tm25/Makefile.am: New. * tmtests/tm26/Makefile.am: New. * tmtests/tm26/tmtest.adb * tmtests/tm27/Makefile.am: New. * tmtests/tm28/Makefile.am: New. * tmtests/tm29/Makefile.am: New. * tmtests/tmck/Makefile.am: New. * tmtests/tmoverhd/Makefile.am: New. --- c/src/ada-tests/tmtests/Makefile.am | 37 ++ c/src/ada-tests/tmtests/tm01/Makefile.am | 15 + c/src/ada-tests/tmtests/tm02/Makefile.am | 15 + c/src/ada-tests/tmtests/tm03/Makefile.am | 15 + c/src/ada-tests/tmtests/tm04/Makefile.am | 15 + c/src/ada-tests/tmtests/tm05/Makefile.am | 15 + c/src/ada-tests/tmtests/tm06/Makefile.am | 15 + c/src/ada-tests/tmtests/tm07/Makefile.am | 15 + c/src/ada-tests/tmtests/tm08/Makefile.am | 15 + c/src/ada-tests/tmtests/tm09/Makefile.am | 15 + c/src/ada-tests/tmtests/tm10/Makefile.am | 15 + c/src/ada-tests/tmtests/tm11/Makefile.am | 15 + c/src/ada-tests/tmtests/tm12/Makefile.am | 15 + c/src/ada-tests/tmtests/tm13/Makefile.am | 15 + c/src/ada-tests/tmtests/tm14/Makefile.am | 15 + c/src/ada-tests/tmtests/tm15/Makefile.am | 15 + c/src/ada-tests/tmtests/tm16/Makefile.am | 15 + c/src/ada-tests/tmtests/tm17/Makefile.am | 15 + c/src/ada-tests/tmtests/tm18/Makefile.am | 15 + c/src/ada-tests/tmtests/tm19/Makefile.am | 15 + c/src/ada-tests/tmtests/tm20/Makefile.am | 17 + c/src/ada-tests/tmtests/tm21/Makefile.am | 15 + c/src/ada-tests/tmtests/tm22/Makefile.am | 15 + c/src/ada-tests/tmtests/tm23/Makefile.am | 15 + c/src/ada-tests/tmtests/tm24/Makefile.am | 15 + c/src/ada-tests/tmtests/tm25/Makefile.am | 15 + c/src/ada-tests/tmtests/tm26/Makefile.am | 17 + c/src/ada-tests/tmtests/tm26/tmtest.adb | 650 +++++++++++++++++++++++++++ c/src/ada-tests/tmtests/tm27/Makefile.am | 17 + c/src/ada-tests/tmtests/tm28/Makefile.am | 15 + c/src/ada-tests/tmtests/tm29/Makefile.am | 15 + c/src/ada-tests/tmtests/tmck/Makefile.am | 15 + c/src/ada-tests/tmtests/tmoverhd/Makefile.am | 17 + 33 files changed, 1160 insertions(+) create mode 100644 c/src/ada-tests/tmtests/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm01/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm02/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm03/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm04/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm05/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm06/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm07/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm08/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm09/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm10/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm11/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm12/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm13/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm14/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm15/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm16/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm17/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm18/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm19/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm20/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm21/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm22/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm23/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm24/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm25/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm26/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm26/tmtest.adb create mode 100644 c/src/ada-tests/tmtests/tm27/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm28/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tm29/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tmck/Makefile.am create mode 100644 c/src/ada-tests/tmtests/tmoverhd/Makefile.am (limited to 'c/src/ada-tests/tmtests') diff --git a/c/src/ada-tests/tmtests/Makefile.am b/c/src/ada-tests/tmtests/Makefile.am new file mode 100644 index 0000000000..8fd8e96772 --- /dev/null +++ b/c/src/ada-tests/tmtests/Makefile.am @@ -0,0 +1,37 @@ +## $Id$ + +SUBDIRS = +SUBDIRS += tm01 +SUBDIRS += tm02 +SUBDIRS += tm03 +SUBDIRS += tm04 +SUBDIRS += tm05 +SUBDIRS += tm06 +SUBDIRS += tm07 +SUBDIRS += tm08 +SUBDIRS += tm09 +SUBDIRS += tm10 +SUBDIRS += tm11 +SUBDIRS += tm12 +SUBDIRS += tm13 +SUBDIRS += tm14 +SUBDIRS += tm15 +SUBDIRS += tm16 +SUBDIRS += tm17 +SUBDIRS += tm18 +SUBDIRS += tm19 +SUBDIRS += tm20 +SUBDIRS += tm21 +SUBDIRS += tm22 +SUBDIRS += tm23 +SUBDIRS += tm24 +SUBDIRS += tm25 +SUBDIRS += tm26 +SUBDIRS += tm27 +SUBDIRS += tm28 +SUBDIRS += tm29 +SUBDIRS += tmck +SUBDIRS += tmoverhd + +include $(top_srcdir)/../../../automake/subdirs.am +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm01/Makefile.am b/c/src/ada-tests/tmtests/tm01/Makefile.am new file mode 100644 index 0000000000..a593cf04e2 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm01/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm01 +tm01_SOURCES = tm01.adb config.h tmtest.adb tmtest.ads + +tm01$(EXEEXT): tm01.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm02/Makefile.am b/c/src/ada-tests/tmtests/tm02/Makefile.am new file mode 100644 index 0000000000..bf3859db27 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm02/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm02 +tm02_SOURCES = tm02.adb config.h tmtest.adb tmtest.ads + +tm02$(EXEEXT): tm02.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm03/Makefile.am b/c/src/ada-tests/tmtests/tm03/Makefile.am new file mode 100644 index 0000000000..67a5af27c0 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm03/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm03 +tm03_SOURCES = tm03.adb config.h tmtest.adb tmtest.ads + +tm03$(EXEEXT): tm03.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm04/Makefile.am b/c/src/ada-tests/tmtests/tm04/Makefile.am new file mode 100644 index 0000000000..25dd4ff025 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm04/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm04 +tm04_SOURCES = tm04.adb config.h tmtest.adb tmtest.ads + +tm04$(EXEEXT): tm04.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm05/Makefile.am b/c/src/ada-tests/tmtests/tm05/Makefile.am new file mode 100644 index 0000000000..20048435b1 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm05/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm05 +tm05_SOURCES = tm05.adb config.h tmtest.adb tmtest.ads + +tm05$(EXEEXT): tm05.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm06/Makefile.am b/c/src/ada-tests/tmtests/tm06/Makefile.am new file mode 100644 index 0000000000..59d8b6ff54 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm06/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm06 +tm06_SOURCES = tm06.adb config.h tmtest.adb tmtest.ads + +tm06$(EXEEXT): tm06.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm07/Makefile.am b/c/src/ada-tests/tmtests/tm07/Makefile.am new file mode 100644 index 0000000000..0002c2c52d --- /dev/null +++ b/c/src/ada-tests/tmtests/tm07/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm07 +tm07_SOURCES = tm07.adb config.h tmtest.adb tmtest.ads + +tm07$(EXEEXT): tm07.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm08/Makefile.am b/c/src/ada-tests/tmtests/tm08/Makefile.am new file mode 100644 index 0000000000..9815b532ee --- /dev/null +++ b/c/src/ada-tests/tmtests/tm08/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm08 +tm08_SOURCES = tm08.adb config.h tmtest.adb tmtest.ads + +tm08$(EXEEXT): tm08.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm09/Makefile.am b/c/src/ada-tests/tmtests/tm09/Makefile.am new file mode 100644 index 0000000000..4540925ec0 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm09/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm09 +tm09_SOURCES = tm09.adb config.h tmtest.adb tmtest.ads + +tm09$(EXEEXT): tm09.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm10/Makefile.am b/c/src/ada-tests/tmtests/tm10/Makefile.am new file mode 100644 index 0000000000..0fd8e65f71 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm10/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm10 +tm10_SOURCES = tm10.adb config.h tmtest.adb tmtest.ads + +tm10$(EXEEXT): tm10.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm11/Makefile.am b/c/src/ada-tests/tmtests/tm11/Makefile.am new file mode 100644 index 0000000000..868c29b019 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm11/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm11 +tm11_SOURCES = tm11.adb config.h tmtest.adb tmtest.ads + +tm11$(EXEEXT): tm11.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm12/Makefile.am b/c/src/ada-tests/tmtests/tm12/Makefile.am new file mode 100644 index 0000000000..035a4b5e09 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm12/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm12 +tm12_SOURCES = tm12.adb config.h tmtest.adb tmtest.ads + +tm12$(EXEEXT): tm12.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm13/Makefile.am b/c/src/ada-tests/tmtests/tm13/Makefile.am new file mode 100644 index 0000000000..c5da7c7c97 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm13/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm13 +tm13_SOURCES = tm13.adb config.h tmtest.adb tmtest.ads + +tm13$(EXEEXT): tm13.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm14/Makefile.am b/c/src/ada-tests/tmtests/tm14/Makefile.am new file mode 100644 index 0000000000..eacc567bc7 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm14/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm14 +tm14_SOURCES = tm14.adb config.h tmtest.adb tmtest.ads + +tm14$(EXEEXT): tm14.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm15/Makefile.am b/c/src/ada-tests/tmtests/tm15/Makefile.am new file mode 100644 index 0000000000..c2cc300791 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm15/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm15 +tm15_SOURCES = tm15.adb config.h tmtest.adb tmtest.ads + +tm15$(EXEEXT): tm15.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm16/Makefile.am b/c/src/ada-tests/tmtests/tm16/Makefile.am new file mode 100644 index 0000000000..4db5860c53 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm16/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm16 +tm16_SOURCES = tm16.adb config.h tmtest.adb tmtest.ads + +tm16$(EXEEXT): tm16.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm17/Makefile.am b/c/src/ada-tests/tmtests/tm17/Makefile.am new file mode 100644 index 0000000000..66c56f1b9a --- /dev/null +++ b/c/src/ada-tests/tmtests/tm17/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm17 +tm17_SOURCES = tm17.adb config.h tmtest.adb tmtest.ads + +tm17$(EXEEXT): tm17.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm18/Makefile.am b/c/src/ada-tests/tmtests/tm18/Makefile.am new file mode 100644 index 0000000000..fb8bb664c5 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm18/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm18 +tm18_SOURCES = tm18.adb config.h tmtest.adb tmtest.ads + +tm18$(EXEEXT): tm18.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm19/Makefile.am b/c/src/ada-tests/tmtests/tm19/Makefile.am new file mode 100644 index 0000000000..a4d10c08c2 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm19/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm19 +tm19_SOURCES = tm19.adb config.h tmtest.adb tmtest.ads + +tm19$(EXEEXT): tm19.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm20/Makefile.am b/c/src/ada-tests/tmtests/tm20/Makefile.am new file mode 100644 index 0000000000..c99b867d2a --- /dev/null +++ b/c/src/ada-tests/tmtests/tm20/Makefile.am @@ -0,0 +1,17 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +if EXPADA +noinst_PROGRAMS = tm20 +endif +tm20_SOURCES = tm20.adb config.h tmtest.adb tmtest.ads + +tm20$(EXEEXT): tm20.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm21/Makefile.am b/c/src/ada-tests/tmtests/tm21/Makefile.am new file mode 100644 index 0000000000..7ac2eb8acc --- /dev/null +++ b/c/src/ada-tests/tmtests/tm21/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm21 +tm21_SOURCES = tm21.adb config.h tmtest.adb tmtest.ads + +tm21$(EXEEXT): tm21.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm22/Makefile.am b/c/src/ada-tests/tmtests/tm22/Makefile.am new file mode 100644 index 0000000000..f155f4e1ef --- /dev/null +++ b/c/src/ada-tests/tmtests/tm22/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm22 +tm22_SOURCES = tm22.adb config.h tmtest.adb tmtest.ads + +tm22$(EXEEXT): tm22.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm23/Makefile.am b/c/src/ada-tests/tmtests/tm23/Makefile.am new file mode 100644 index 0000000000..8c427961eb --- /dev/null +++ b/c/src/ada-tests/tmtests/tm23/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm23 +tm23_SOURCES = tm23.adb config.h tmtest.adb tmtest.ads + +tm23$(EXEEXT): tm23.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm24/Makefile.am b/c/src/ada-tests/tmtests/tm24/Makefile.am new file mode 100644 index 0000000000..3114dd2ece --- /dev/null +++ b/c/src/ada-tests/tmtests/tm24/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm24 +tm24_SOURCES = tm24.adb config.h tmtest.adb tmtest.ads + +tm24$(EXEEXT): tm24.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm25/Makefile.am b/c/src/ada-tests/tmtests/tm25/Makefile.am new file mode 100644 index 0000000000..06e7fb7803 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm25/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm25 +tm25_SOURCES = tm25.adb config.h tmtest.adb tmtest.ads + +tm25$(EXEEXT): tm25.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm26/Makefile.am b/c/src/ada-tests/tmtests/tm26/Makefile.am new file mode 100644 index 0000000000..16c0baaf32 --- /dev/null +++ b/c/src/ada-tests/tmtests/tm26/Makefile.am @@ -0,0 +1,17 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +if EXPADA +noinst_PROGRAMS = tm26 +endif +tm26_SOURCES = tm26.adb config.h tmtest.adp tmtest.ads + +tm26$(EXEEXT): tm26.adp + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm26/tmtest.adb b/c/src/ada-tests/tmtests/tm26/tmtest.adb new file mode 100644 index 0000000000..ddf0c39f7a --- /dev/null +++ b/c/src/ada-tests/tmtests/tm26/tmtest.adb @@ -0,0 +1,650 @@ +-- +-- TMTEST / BODY +-- +-- DESCRIPTION: +-- +-- This package is the implementation of Test 26 of the RTEMS +-- Timing Test Suite. +-- +-- DEPENDENCIES: +-- +-- +-- +-- COPYRIGHT (c) 1989-1997. +-- On-Line Applications Research Corporation (OAR). +-- Copyright assigned to U.S. Government, 1994. +-- +-- The license and distribution terms for this file may in +-- the file LICENSE in this distribution or at +-- http://www.OARcorp.com/rtems/license.html. +-- +-- $Id$ +-- + +with INTERFACES; use INTERFACES; +with RTEMS_CALLING_OVERHEAD; +with RTEMS; +with RTEMS_TEST_SUPPORT; +with TEST_SUPPORT; +with TEXT_IO; +with TIME_TEST_SUPPORT; +with UNSIGNED32_IO; + +include(../../support/fp.inc) + +package body TMTEST is + +--PAGE +-- +-- INIT +-- + + procedure INIT ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + INDEX : RTEMS.UNSIGNED32; + TASK_ID : RTEMS.ID; + STATUS : RTEMS.STATUS_CODES; + begin + + TEXT_IO.NEW_LINE( 2 ); + TEXT_IO.PUT_LINE( "*** TIME TEST 26 ***" ); + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'F', 'P', '1', ' ' ), + 201, + 2048, + RTEMS.DEFAULT_MODES, + RTEMS.FLOATING_POINT, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF FP1" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.FLOATING_POINT_TASK_1'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF FP1" ); + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'F', 'P', '2', ' ' ), + 202, + 2048, + RTEMS.DEFAULT_MODES, + RTEMS.FLOATING_POINT, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF FP2" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.FLOATING_POINT_TASK_2'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF FP2" ); + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'L', 'O', 'W', ' ' ), + 200, + 2048, + RTEMS.DEFAULT_MODES, + RTEMS.DEFAULT_ATTRIBUTES, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF LOW" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.LOW_TASK'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF LOW" ); + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'M', 'I', 'D', ' ' ), + 128, + 2048, + RTEMS.DEFAULT_MODES, + RTEMS.DEFAULT_ATTRIBUTES, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF MIDDLE" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.MIDDLE_TASK'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF MIDDLE" ); + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'H', 'I', 'G', 'H' ), + 5, + 2048, + RTEMS.DEFAULT_MODES, + RTEMS.DEFAULT_ATTRIBUTES, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE OF HIGH" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.HIGH_TASK'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START OF HIGH" ); + + RTEMS.SEMAPHORE_CREATE( + RTEMS.BUILD_NAME( 'S', 'E', 'M', '1' ), + TIME_TEST_SUPPORT.OPERATION_COUNT, + RTEMS.DEFAULT_ATTRIBUTES, + TMTEST.SEMAPHORE_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "SEMAPHORE_CREATE" ); + + for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT + loop + + RTEMS.TASK_CREATE( + RTEMS.BUILD_NAME( 'N', 'U', 'L', 'L' ), + 254, + 512, + RTEMS.DEFAULT_MODES, + RTEMS.DEFAULT_ATTRIBUTES, + TASK_ID, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_CREATE LOOP" ); + + RTEMS.TASK_START( + TASK_ID, + TMTEST.NULL_TASK'ACCESS, + 0, + STATUS + ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_START LOOP" ); + + end loop; + + RTEMS.TASK_DELETE( RTEMS.SELF, STATUS ); + TEST_SUPPORT.DIRECTIVE_FAILED( STATUS, "TASK_DELETE OF SELF" ); + + end INIT; + +--PAGE +-- +-- NULL_TASK +-- + + procedure NULL_TASK ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + begin + + NULL; + + end NULL_TASK; + +--PAGE +-- +-- HIGH_TASK +-- + + procedure HIGH_TASK ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + begin + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_ENABLE_DISPATCH; + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_ENABLE_DISPATCH", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_SET_STATE( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING, + RTEMS.SUSPENDED + ); + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_SET_STATE", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + -- FORCE CONTEXT SWITCH + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := TRUE; + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_DISPATCH; -- dispatches MIDDLE_TASK + + end HIGH_TASK; + +--PAGE +-- +-- MIDDLE_TASK +-- + + procedure MIDDLE_TASK ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + begin + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_DISPATCH (NO FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + RTEMS_TEST_SUPPORT.THREAD_SET_STATE( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING, + RTEMS.SUSPENDED + ); + + TMTEST.MIDDLE_TCB := RTEMS_TEST_SUPPORT.THREAD_EXECUTING; + + RTEMS_TEST_SUPPORT.THREAD_EXECUTING := + RTEMS_TEST_SUPPORT.THREAD_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.CHAIN_NODE_POINTER_TO_ADDRESS( + RTEMS_TEST_SUPPORT.THREAD_READY_CHAIN( 200 ).FIRST + ) + ); + + -- do NOT force context switch + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := FALSE; + + RTEMS_TEST_SUPPORT.THREAD_DISABLE_DISPATCH; + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH( + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + TMTEST.MIDDLE_TCB.REGISTERS'ADDRESS + ), + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.REGISTERS'ADDRESS + ) + ); + + end MIDDLE_TASK; + +--PAGE +-- +-- LOW_TASK +-- + + procedure LOW_TASK ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + EXECUTING : RTEMS.TCB_POINTER; + begin + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "CONTEXT_SWITCH (NO FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + EXECUTING := RTEMS_TEST_SUPPORT.THREAD_EXECUTING; + + RTEMS_TEST_SUPPORT.THREAD_EXECUTING := + RTEMS_TEST_SUPPORT.THREAD_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.CHAIN_NODE_POINTER_TO_ADDRESS( + RTEMS_TEST_SUPPORT.THREAD_READY_CHAIN( 201 ).FIRST + ) + ); + + -- do NOT force context switch + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := FALSE; + + RTEMS_TEST_SUPPORT.THREAD_DISABLE_DISPATCH; + + TIMER_DRIVER.INITIALIZE; + + RTEMS_TEST_SUPPORT.CONTEXT_RESTORE_FP( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.FP_CONTEXT'ADDRESS + ); + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH( + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + EXECUTING.REGISTERS'ADDRESS + ), + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.REGISTERS'ADDRESS + ) + ); + + end LOW_TASK; + +--PAGE +-- +-- FLOATING_POINT_TASK_1 +-- + + procedure FLOATING_POINT_TASK_1 ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + EXECUTING : RTEMS.TCB_POINTER; + FP_DECLARE; + begin + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "CONTEXT_SWITCH (restore 1st FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + EXECUTING := RTEMS_TEST_SUPPORT.THREAD_EXECUTING; + + RTEMS_TEST_SUPPORT.THREAD_EXECUTING := + RTEMS_TEST_SUPPORT.THREAD_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.CHAIN_NODE_POINTER_TO_ADDRESS( + RTEMS_TEST_SUPPORT.THREAD_READY_CHAIN( 202 ).FIRST + ) + ); + + -- do NOT force context switch + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := FALSE; + + RTEMS_TEST_SUPPORT.THREAD_DISABLE_DISPATCH; + + TIMER_DRIVER.INITIALIZE; + + RTEMS_TEST_SUPPORT.CONTEXT_SAVE_FP( EXECUTING.FP_CONTEXT'ADDRESS ); + RTEMS_TEST_SUPPORT.CONTEXT_RESTORE_FP( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.FP_CONTEXT'ADDRESS + ); + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH( + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + EXECUTING.REGISTERS'ADDRESS + ), + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.REGISTERS'ADDRESS + ) + ); + + -- switch to FLOATING_POINT_TASK_2 + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "CONTEXT_SWITCH (used->init FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + FP_LOAD( 1.0 ); + + EXECUTING := RTEMS_TEST_SUPPORT.THREAD_EXECUTING; + + RTEMS_TEST_SUPPORT.THREAD_EXECUTING := + RTEMS_TEST_SUPPORT.THREAD_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.CHAIN_NODE_POINTER_TO_ADDRESS( + RTEMS_TEST_SUPPORT.THREAD_READY_CHAIN( 202 ).FIRST + ) + ); + + -- do NOT force context switch + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := FALSE; + + RTEMS_TEST_SUPPORT.THREAD_DISABLE_DISPATCH; + + TIMER_DRIVER.INITIALIZE; + + RTEMS_TEST_SUPPORT.CONTEXT_SAVE_FP( EXECUTING.FP_CONTEXT'ADDRESS ); + RTEMS_TEST_SUPPORT.CONTEXT_RESTORE_FP( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.FP_CONTEXT'ADDRESS + ); + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH( + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + EXECUTING.REGISTERS'ADDRESS + ), + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.REGISTERS'ADDRESS + ) + ); + + -- switch to FLOATING_POINT_TASK_2 + + end FLOATING_POINT_TASK_1; + +--PAGE +-- +-- FLOATING_POINT_TASK_2 +-- + + procedure FLOATING_POINT_TASK_2 ( + ARGUMENT : in RTEMS.TASK_ARGUMENT + ) is + EXECUTING : RTEMS.TCB_POINTER; + FP_DECLARE; + begin + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "CONTEXT_SWITCH (init->init FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + EXECUTING := RTEMS_TEST_SUPPORT.THREAD_EXECUTING; + + RTEMS_TEST_SUPPORT.THREAD_EXECUTING := + RTEMS_TEST_SUPPORT.THREAD_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.CHAIN_NODE_POINTER_TO_ADDRESS( + RTEMS_TEST_SUPPORT.THREAD_READY_CHAIN( 201 ).FIRST + ) + ); + + FP_LOAD( 1.0 ); + + -- do NOT force context switch + + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH_NECESSARY := FALSE; + + RTEMS_TEST_SUPPORT.THREAD_DISABLE_DISPATCH; + + TIMER_DRIVER.INITIALIZE; + + RTEMS_TEST_SUPPORT.CONTEXT_SAVE_FP( EXECUTING.FP_CONTEXT'ADDRESS ); + RTEMS_TEST_SUPPORT.CONTEXT_RESTORE_FP( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.FP_CONTEXT'ADDRESS + ); + RTEMS_TEST_SUPPORT.CONTEXT_SWITCH( + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + EXECUTING.REGISTERS'ADDRESS + ), + RTEMS_TEST_SUPPORT.CONTEXT_TO_CONTROL_POINTER( + RTEMS_TEST_SUPPORT.THREAD_EXECUTING.REGISTERS'ADDRESS + ) + ); + + -- switch to FLOATING_POINT_TASK_1 + + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "CONTEXT_SWITCH (used->used FP)", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + TMTEST.COMPLETE_TEST; + + RTEMS.SHUTDOWN_EXECUTIVE( 0 ); + + end FLOATING_POINT_TASK_2; + +--PAGE +-- +-- COMPLETE_TEST +-- + + procedure COMPLETE_TEST + is + INDEX : RTEMS.UNSIGNED32; + OVERHEAD : RTEMS.UNSIGNED32; + TASK_ID : RTEMS.ID; + LOCATION : RTEMS_TEST_SUPPORT.OBJECTS_LOCATIONS; + THE_SEMAPHORE : RTEMS.TCB_POINTER; + THE_THREAD : RTEMS.TCB_POINTER; + begin + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_RESUME( TMTEST.MIDDLE_TCB ); + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_RESUME", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + RTEMS_TEST_SUPPORT.THREAD_SET_STATE( + TMTEST.MIDDLE_TCB, + RTEMS.WAITING_FOR_MESSAGE + ); + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_UNBLOCK( TMTEST.MIDDLE_TCB ); + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_UNBLOCK", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + RTEMS_TEST_SUPPORT.THREAD_SET_STATE( + TMTEST.MIDDLE_TCB, + RTEMS.WAITING_FOR_MESSAGE + ); + + TIMER_DRIVER.INITIALIZE; + RTEMS_TEST_SUPPORT.THREAD_READY( TMTEST.MIDDLE_TCB ); + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_READY", + TMTEST.END_TIME, + 1, + 0, + 0 + ); + + TIMER_DRIVER.INITIALIZE; + for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT + loop + TIMER_DRIVER.EMPTY_FUNCTION; + end loop; + OVERHEAD := TIMER_DRIVER.READ_TIMER; + + TIMER_DRIVER.INITIALIZE; + for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT + loop + RTEMS_TEST_SUPPORT.THREAD_GET( + TASK_ID, + LOCATION, + THE_THREAD + ); + end loop; + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_GET", + TMTEST.END_TIME, + TIME_TEST_SUPPORT.OPERATION_COUNT, + 0, + 0 + ); + +-- TIMER_DRIVER.INITIALIZE; +-- for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT +-- loop +-- RTEMS_TEST_SUPPORT.SEMAPHORE_GET( +-- TMTEST.SEMAPHORE_ID, +-- LOCATION, +-- THE_SEMAPHORE +-- ); +-- end loop; +-- TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + +-- TIME_TEST_SUPPORT.PUT_TIME( +-- "SEMAPHORE_GET", +-- TMTEST.END_TIME, +-- TIME_TEST_SUPPORT.OPERATION_COUNT, +-- 0, +-- 0 +-- ); + TEXT_IO.PUT_LINE( "SEMAPHORE_GET NOT IN ADA" ); + + TIMER_DRIVER.INITIALIZE; + for INDEX in 1 .. TIME_TEST_SUPPORT.OPERATION_COUNT + loop + RTEMS_TEST_SUPPORT.THREAD_GET( + 16#3#, + LOCATION, + THE_THREAD + ); + end loop; + TMTEST.END_TIME := TIMER_DRIVER.READ_TIMER; + + TIME_TEST_SUPPORT.PUT_TIME( + "THREAD_GET (invalid id)", + TMTEST.END_TIME, + TIME_TEST_SUPPORT.OPERATION_COUNT, + 0, + 0 + ); + + end COMPLETE_TEST; + +end TMTEST; diff --git a/c/src/ada-tests/tmtests/tm27/Makefile.am b/c/src/ada-tests/tmtests/tm27/Makefile.am new file mode 100644 index 0000000000..1c8d28476a --- /dev/null +++ b/c/src/ada-tests/tmtests/tm27/Makefile.am @@ -0,0 +1,17 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +if EXPADA +noinst_PROGRAMS = tm27 +endif +tm27_SOURCES = tm27.adb config.h tmtest.adb tmtest.ads + +tm27$(EXEEXT): tm27.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm28/Makefile.am b/c/src/ada-tests/tmtests/tm28/Makefile.am new file mode 100644 index 0000000000..c95b7662bd --- /dev/null +++ b/c/src/ada-tests/tmtests/tm28/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm28 +tm28_SOURCES = tm28.adb config.h tmtest.adb tmtest.ads + +tm28$(EXEEXT): tm28.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tm29/Makefile.am b/c/src/ada-tests/tmtests/tm29/Makefile.am new file mode 100644 index 0000000000..b130a6fcda --- /dev/null +++ b/c/src/ada-tests/tmtests/tm29/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tm29 +tm29_SOURCES = tm29.adb config.h tmtest.adb tmtest.ads + +tm29$(EXEEXT): tm29.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tmck/Makefile.am b/c/src/ada-tests/tmtests/tmck/Makefile.am new file mode 100644 index 0000000000..5065600d34 --- /dev/null +++ b/c/src/ada-tests/tmtests/tmck/Makefile.am @@ -0,0 +1,15 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tmck +tmck_SOURCES = tmck.adb config.h tmtest.adb tmtest.ads + +tmck$(EXEEXT): tmck.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am diff --git a/c/src/ada-tests/tmtests/tmoverhd/Makefile.am b/c/src/ada-tests/tmtests/tmoverhd/Makefile.am new file mode 100644 index 0000000000..f8af3b7103 --- /dev/null +++ b/c/src/ada-tests/tmtests/tmoverhd/Makefile.am @@ -0,0 +1,17 @@ +## $Id$ + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../../../automake/compile.am +include $(top_srcdir)/../../../automake/lib.am + +include $(top_srcdir)/ada.am + +noinst_PROGRAMS = tmoverhd +tmoverhd_SOURCES = tmoverhd.adb config.h \ +tmtest.adb tmtest.ads \ +dummy_rtems.adb dummy_rtems.ads + +tmoverhd$(EXEEXT): tmoverhd.adb + $(GNATCOMPILE) -margs -a $< -o $@ + +include $(top_srcdir)/../../../automake/local.am -- cgit v1.2.3