X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2Fh9.call;fp=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2Fh9.call;h=6b6b6340593909d53071113fde6688f41de0fe7d;hb=f6171150f9e60240b256808fc31613530b21db6c;hp=0000000000000000000000000000000000000000;hpb=b82da83a0ad2014c11113818eee6bd5fb5f3445c;p=uebersetzerbau-ss10.git

diff --git a/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/h9.call b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/h9.call
new file mode 100644
index 0000000..6b6b634
--- /dev/null
+++ b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/h9.call
@@ -0,0 +1,21 @@
+extern long h9(long a, long b, long c, long d);
+
+int check_arg4(long (*function)(long, long, long, long), long blubb[2][2][2][2]) {
+	int ret,a,b,c,d;
+	ret=1;
+	for(a=0;a<2;a++) {
+		for(b=0;b<2;b++) {
+			for(c=0;c<2;c++) {
+				for(d=0;d<2;d++) {
+					ret&=(function(a,b,c,d)==blubb[a][b][c][d]);
+				}
+			}
+		}
+	}
+	return ret;
+}
+
+long ret_h9[2][2][2][2]={{{{0,0},{0,0}},{{0,0},{0,0}}},{{{0,0},{0,0}},{{0,0},{0,1}}}};
+
+return check_arg4(h9,ret_h9);
+