[gesamt] Added two simples testcases

[testub10.git] / gesamt / skinner33_00.0

diff --git a/gesamt/skinner33_00.0 b/gesamt/skinner33_00.0
new file mode 100644 (file)
index 0000000..adf9ee9
--- /dev/null
+++ b/gesamt/skinner33_00.0
@@ -0,0 +1,19 @@
+struct a end;
+
+method even()
+       if this.a = 0 then
+               return 0;
+       else
+               this.a := this.a - 1;
+               return odd();
+       end;
+end;
+
+method odd()
+       if 0 = this.a then
+               return 1;
+       else
+               this.a := this.a - 1;
+               return even();
+       end;
+end;