1 files changed, 2 insertions, 2 deletions
diff --git a/TestAufgabeFFP7.hs b/TestAufgabeFFP7.hs
index 376e782..00af333 100755
--- a/TestAufgabeFFP7.hs
+++ b/TestAufgabeFFP7.hs
@@ -82,8 +82,8 @@ cases2 = TestLabel "bufferI" $ TestList [
    (insertI 'b' ("a", "c")),
  TestCase $ assertEqual "deleteI1" ("", "bc")
-    (deleteI ("", "abc")),
+    (deleteI ("", "bc")),
-  TestCase $ assertEqual "deleteI2" ("cba", "")
+  TestCase $ assertEqual "deleteI2" ("ba", "")
    (deleteI ("cba", "")),
  TestCase $ assertEqual "deleteI3" ("", "")
    (deleteI ("", "")),

diff --git a/TestAufgabeFFP7.hs b/TestAufgabeFFP7.hs index 376e782..00af333 100755 --- a/TestAufgabeFFP7.hs +++ b/TestAufgabeFFP7.hs
@@ -82,8 +82,8 @@ cases2 = TestLabel "bufferI" $ TestList [
82	(insertI 'b' ("a", "c")),	82	(insertI 'b' ("a", "c")),
83		83
84	TestCase $ assertEqual "deleteI1" ("", "bc")	84	TestCase $ assertEqual "deleteI1" ("", "bc")
85	(deleteI ("", "abc")),	85	(deleteI ("", "bc")),
86	TestCase $ assertEqual "deleteI2" ("cba", "")	86	TestCase $ assertEqual "deleteI2" ("ba", "")
87	(deleteI ("cba", "")),	87	(deleteI ("cba", "")),
88	TestCase $ assertEqual "deleteI3" ("", "")	88	TestCase $ assertEqual "deleteI3" ("", "")
89	(deleteI ("", "")),	89	(deleteI ("", "")),