codea: auesserst simple testfaelle

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

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

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

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