X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fcodeb_skinner33_02.0;fp=gesamt%2Fcodeb_skinner33_02.0;h=17c6bb5d0bd4de451832eb1de0791061bd5da6bd;hp=0000000000000000000000000000000000000000;hb=029401d51612c5e69d7ac8603e1b69cd7ed6ef96;hpb=bf19094ac2573112418701ba4c6abf5779e3a9f7 diff --git a/gesamt/codeb_skinner33_02.0 b/gesamt/codeb_skinner33_02.0 new file mode 100644 index 0000000..17c6bb5 --- /dev/null +++ b/gesamt/codeb_skinner33_02.0 @@ -0,0 +1,24 @@ + +struct a b end; + +method foo() + var x := 5; + if this * x then + return (x - this) * x; + end; + return x; +end; + +method bar(n) + var x := n; + this.a := x; + return x; +end; + +method bla(m n) + if not((m-n) < (m*n)) then + return m; + else + return n; + end; +end;