codea: spass mit '-' und 'this'

diff --git a/codea/lewurm_00.0 b/codea/lewurm_00.0
new file mode 100644 (file)
index 0000000..297740c
--- /dev/null
+++ b/codea/lewurm_00.0
@@ -0,0 +1,3 @@
+method f(a b c)
+       return (a-5) - (b-c) - this;
+end;

diff --git a/codea/lewurm_00.call b/codea/lewurm_00.call
new file mode 100644 (file)
index 0000000..d32445c
--- /dev/null
+++ b/codea/lewurm_00.call
@@ -0,0 +1,3 @@
+long f(long, long, long, long);
+
+RET(f(1, 100, 10, 5) == 89);

diff --git a/codea/lewurm_01.call b/codea/lewurm_01.call
index 448486438bda30d085145321e8669836989a1577..7102d6053582cc814a0ebfef7fead722555e8dd2 100644 (file)
--- a/codea/lewurm_01.call
+++ b/codea/lewurm_01.call
@@ -1,2 +1,2 @@
 extern long f(long, long);
-RET(f(0xDEAD, 5)==5);
+RET((f(0xDEAD, 5)==5) && (f(0xDEAD, -3)==-3));

diff --git a/codea/lewurm_02.0 b/codea/lewurm_02.0
index c6fd5ac825d2ef8f52cc053a352be01f97e3f8a5..10a2205ecbe939e2ab9f0e047d5090bf527a2de9 100644 (file)
--- a/codea/lewurm_02.0
+++ b/codea/lewurm_02.0
@@ -1,3 +1,3 @@
-method f(x)
-  return x;
+method f(a b c d)
+  return this-(a-b-c-d);
 end;

diff --git a/codea/lewurm_02.call b/codea/lewurm_02.call
index 84fad81f529f214fddc68600d3863168478bce76..2dcfbe9899494d99c30ab505c1b12bfb66e8c643 100644 (file)
--- a/codea/lewurm_02.call
+++ b/codea/lewurm_02.call
@@ -1,2 +1,2 @@
-extern long f(long, long);
-RET(f(0xDEAD, -3)==-3);
+extern long f(long,long,long,long,long);
+RET(f(100,50,15,10,5)==80);

diff --git a/codea/lewurm_03.0 b/codea/lewurm_03.0
new file mode 100644 (file)
index 0000000..33170d8
--- /dev/null
+++ b/codea/lewurm_03.0
@@ -0,0 +1,3 @@
+method f()
+  return this;
+end;

diff --git a/codea/lewurm_03.call b/codea/lewurm_03.call
new file mode 100644 (file)
index 0000000..aba4bb3
--- /dev/null
+++ b/codea/lewurm_03.call
@@ -0,0 +1,2 @@
+extern long f(long);
+RET(f(-1337)==-1337);

diff --git a/codea/lewurm_04.0 b/codea/lewurm_04.0
new file mode 100644 (file)
index 0000000..b43a1a7
--- /dev/null
+++ b/codea/lewurm_04.0
@@ -0,0 +1,3 @@
+method f()
+  return 666-this;
+end;

diff --git a/codea/lewurm_04.call b/codea/lewurm_04.call
new file mode 100644 (file)
index 0000000..bc992d7
--- /dev/null
+++ b/codea/lewurm_04.call
@@ -0,0 +1,2 @@
+extern long f(long);
+RET(f(111)==555);

diff --git a/codea/lewurm_05.0 b/codea/lewurm_05.0
new file mode 100644 (file)
index 0000000..f673753
--- /dev/null
+++ b/codea/lewurm_05.0
@@ -0,0 +1,3 @@
+method Long(a b c d e)
+       return (e - d - c - b - a - this);
+end;

diff --git a/codea/lewurm_05.call b/codea/lewurm_05.call
new file mode 100644 (file)
index 0000000..d791072
--- /dev/null
+++ b/codea/lewurm_05.call
@@ -0,0 +1,3 @@
+long Long(long, long, long, long, long, long);
+
+RET( Long(2, 6, 12, 25, 50, 100) == 5);