From d9416b36c20d4260d3f818b29c4fd3b3de54b48f Mon Sep 17 00:00:00 2001
From: manuel <manuel@mausz.at>
Date: Sat, 21 May 2011 19:56:48 +0200
Subject: add some tests

---
 bank-eiffel/tests/test_account.e | 30 ++++++++++++++++++++
 bank-eiffel/tests/test_person.e  | 60 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 90 insertions(+)
 create mode 100644 bank-eiffel/tests/test_account.e
 create mode 100644 bank-eiffel/tests/test_person.e

(limited to 'bank-eiffel/tests')

diff --git a/bank-eiffel/tests/test_account.e b/bank-eiffel/tests/test_account.e
new file mode 100644
index 0000000..1820c45
--- /dev/null
+++ b/bank-eiffel/tests/test_account.e
@@ -0,0 +1,30 @@
+note
+	description: "[
+		Eiffel tests that can be executed by testing tool.
+	]"
+	author: "EiffelStudio test wizard"
+	date: "$Date$"
+	revision: "$Revision$"
+	testing: "type/manual"
+
+class
+	TEST_ACCOUNT
+
+inherit
+	EQA_TEST_SET
+
+feature -- Test routines
+
+	CREATE_ACCOUNT
+			-- New test routine
+		local
+			person1: PERSON
+			account: ACCOUNT
+		do
+			create person1.make ("VORNAME", "NACHNAME")
+			--assert ("not_implemented", False)
+		end
+
+end
+
+
diff --git a/bank-eiffel/tests/test_person.e b/bank-eiffel/tests/test_person.e
new file mode 100644
index 0000000..f23df03
--- /dev/null
+++ b/bank-eiffel/tests/test_person.e
@@ -0,0 +1,60 @@
+note
+	description: "[
+		Eiffel tests that can be executed by testing tool.
+	]"
+	author: "EiffelStudio test wizard"
+	date: "$Date$"
+	revision: "$Revision$"
+	testing: "type/manual"
+
+class
+	TEST_PERSON
+
+inherit
+	EQA_TEST_SET
+
+feature -- Test routines
+
+	CREATE_PERSON
+		local
+			person: PERSON
+		do
+			create person.make("SOME_SURNAME", "SOME_FIRSTNAME")
+		end
+
+	CREATE_PERSON_NO_SURNAME
+		local
+			person: PERSON
+			retried: BOOLEAN
+		do
+			if not retried then
+				create person.make("", "SOME_FIRSTNAME")
+				retried := True
+				assert("CREATE_PERSON_NO_SURNAME", False)
+			end
+		rescue
+			if not retried then
+				retried := True
+				retry
+			end
+		end
+
+	CREATE_PERSON_NO_FIRSTNAME
+		local
+			person: PERSON
+			retried: BOOLEAN
+		do
+			if not retried then
+				create person.make("SOME_SURNAME", "")
+				retried := True
+				assert("CREATE_PERSON_NO_FIRSTNAME", False)
+			end
+		rescue
+			if not retried then
+				retried := True
+				retry
+			end
+		end
+end
+
+
-- 
cgit v1.2.3