X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Flewurm_05.call;fp=gesamt%2Flewurm_05.call;h=0db317d668bb579903dd7075a3b3ebd1ff8434cf;hp=0000000000000000000000000000000000000000;hb=93ee438ea843a39de25259c94f2a80e338774db4;hpb=d3eee741334748ca1cec38587336fced47d7d108

diff --git a/gesamt/lewurm_05.call b/gesamt/lewurm_05.call
new file mode 100644
index 0000000..0db317d
--- /dev/null
+++ b/gesamt/lewurm_05.call
@@ -0,0 +1,21 @@
+long fa (long, long, long, long, long);
+long fa_(long, long, long, long, long);
+long fb (long, long, long, long, long);
+long fb_(long, long, long, long, long);
+long fc (long, long, long, long, long);
+long fc_(long, long, long, long, long);
+long fd (long, long, long, long, long);
+long fd_(long, long, long, long, long);
+
+long (*fp[])(long, long, long, long, long) = {fa, fa_, fb, fb_, fc, fc_, fd, fd_};
+char st[sizeof fp/sizeof fp[0]][4] = {"fa ", "fa_", "fb ", "fb_", "fc ", "fc_", "fd ", "fd_"};
+
+#define PAR(a) ((a-'a'+1)*10)
+int i, t, r = 1;
+
+for(i=0; i < sizeof fp/sizeof fp[0]; i++) {
+	t = fp[i](0xdead, PAR('a'), PAR('b'), PAR('c'), PAR('d'));
+	printf("returnwert von %s() ist %3i (erwartet: %3i)\n", st[i], t, PAR(st[i][1]));
+	r = r && (t==PAR(st[i][1]));
+}
+RET(r);