X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=gesamt_ppc%2Flewurm_05.call;fp=gesamt_ppc%2Flewurm_05.call;h=0db317d668bb579903dd7075a3b3ebd1ff8434cf;hb=631a92314abaefe6e0d275647ed815a3fb34fd81;hp=0000000000000000000000000000000000000000;hpb=89b2d6e5e8c24415bcd51a6b3a5687880e86d164;p=testub10.git

diff --git a/gesamt_ppc/lewurm_05.call b/gesamt_ppc/lewurm_05.call
new file mode 100644
index 0000000..0db317d
--- /dev/null
+++ b/gesamt_ppc/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);