Rombobjörn

summaryrefslogtreecommitdiff
path: root/testsuite/sources/library_1/testcase.adb
diff options
context:
space:
mode:
authorBjörn Persson <Bjorn@Rombobjörn.se>2014-01-31 08:32:17 +0100
committerBjörn Persson <Bjorn@Rombobjörn.se>2014-01-31 08:32:17 +0100
commit5d900ea8ccb660d4d3bb9aaa08464fb9aae081f9 (patch)
tree67f8d3df5ed5b6549834cf59fc90aa87ab68ca9e /testsuite/sources/library_1/testcase.adb
parentdfc4c5cdce886fa7261258a1b40d463ce5c39de1 (diff)
Check that the right generated files exist.
Diffstat (limited to 'testsuite/sources/library_1/testcase.adb')
-rw-r--r--testsuite/sources/library_1/testcase.adb24
1 files changed, 24 insertions, 0 deletions
diff --git a/testsuite/sources/library_1/testcase.adb b/testsuite/sources/library_1/testcase.adb
new file mode 100644
index 0000000..df96cc3
--- /dev/null
+++ b/testsuite/sources/library_1/testcase.adb
@@ -0,0 +1,24 @@
+-- part of Comfignat's testsuite
+-- Copyright 2014 B. Persson, Bjorn@Rombobeorn.se
+--
+-- This material is provided as is, with absolutely no warranty expressed
+-- or implied. Any use is at your own risk.
+--
+-- Permission is hereby granted to use or copy this testsuite
+-- for any purpose, provided the above notices are retained on all copies.
+-- Permission to modify the code and to distribute modified code is granted,
+-- provided the above notices are retained, and a notice that the code was
+-- modified is included with the above copyright notice.
+
+
+with Ada.Calendar; use Ada.Calendar;
+with Ada.Text_IO; use Ada.Text_IO;
+
+package body Testcase is
+
+ function Year return String is
+ begin
+ return Year(Clock)'Img;
+ end Year;
+
+end Testcase;