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

diff --git a/aus_sammelwut/paulchen/ublu/ss08/abgabe/codeb/testcases/h22.call b/aus_sammelwut/paulchen/ublu/ss08/abgabe/codeb/testcases/h22.call
new file mode 100644
index 0000000..36ce291
--- /dev/null
+++ b/aus_sammelwut/paulchen/ublu/ss08/abgabe/codeb/testcases/h22.call
@@ -0,0 +1,21 @@
+extern long h22(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_h22[2][2][2][2]={{{{1,1},{1,0}},{{1,1},{1,1}}},{{{1,1},{1,1}},{{1,1},{1,1}}}};
+
+return check_arg4(h22,ret_h22);
+