ppc: 'neue' testfaelle angepasst ppc
authorBernhard Urban <lewurm@gmail.com>
Thu, 10 Jun 2010 14:04:55 +0000 (16:04 +0200)
committerBernhard Urban <lewurm@gmail.com>
Thu, 10 Jun 2010 14:04:55 +0000 (16:04 +0200)
44 files changed:
gesamt_ppc/codea_intelli_05.call
gesamt_ppc/codea_intelli_06.call
gesamt_ppc/codea_intelli_07.0
gesamt_ppc/codea_intelli_07.call
gesamt_ppc/codea_intelli_08.call
gesamt_ppc/codea_lewurm_07.call
gesamt_ppc/codea_lewurm_09.0
gesamt_ppc/codea_lewurm_11.call
gesamt_ppc/codea_mrstrcmp_08.0
gesamt_ppc/codea_mrstrcmp_13.call
gesamt_ppc/codea_mrstrcmp_14.call
gesamt_ppc/codea_skinner33_04.call
gesamt_ppc/codea_skinner33_05.call
gesamt_ppc/codea_skinner33_06.call
gesamt_ppc/codea_skinner33_07.call
gesamt_ppc/codea_skinner33_08.call
gesamt_ppc/codea_skinner33_09.call
gesamt_ppc/codea_skinner33_10.call
gesamt_ppc/codea_skinner33_11.call
gesamt_ppc/codea_skinner33_12.call
gesamt_ppc/codea_skinner33_13.call
gesamt_ppc/codea_skinner33_14.call
gesamt_ppc/codea_skinner33_21.0
gesamt_ppc/codeb_georg_fib_043.0
gesamt_ppc/codeb_georg_fib_044.0
gesamt_ppc/codeb_intelli_02.call
gesamt_ppc/codeb_intelli_03.call
gesamt_ppc/codeb_intelli_04.call
gesamt_ppc/codeb_intelli_05.call
gesamt_ppc/codeb_intelli_06.call
gesamt_ppc/codeb_intelli_07.call
gesamt_ppc/codeb_intelli_08.call
gesamt_ppc/codeb_intelli_09.call
gesamt_ppc/codeb_intelli_10.call
gesamt_ppc/codeb_intelli_11.call
gesamt_ppc/codeb_intelli_12.call
gesamt_ppc/codeb_intelli_13.call
gesamt_ppc/codeb_intelli_14.0
gesamt_ppc/codeb_intelli_14.call
gesamt_ppc/codeb_intelli_15.0
gesamt_ppc/codeb_intelli_15.call
gesamt_ppc/skinner33_02.call
scripts/debug_gesamt_ppc [new file with mode: 0755]
scripts/modlvatest_gesamt_ppc.sh

index 6e296ea25e0d4366d946bfbf8fa9d46a9f207d33..428a9ed53f51f40c6afc5dae3457b6621fb4c253 100644 (file)
@@ -1,9 +1,9 @@
-extern long long f(long long*, long long*, long long);
-extern long long g(long long*, long long*);
+extern int f(int*, int*, int);
+extern int g(int*, int*);
 
 
-long long ar[10];
-long long ar2[10];
+int ar[10];
+int ar2[10];
 int i = 1;
 for(; i <= 10; i++)
        ar[i-1] = i;
index 42435f0a10e5ac276f10ccb6f0808dd2686cc38b..b3a03d878d9513135802113cf39e0e51e3143831 100644 (file)
@@ -1,7 +1,7 @@
-extern long long f(long long*);
+extern int f(int*);
 
 
-long long ar[10];
+int ar[10];
 int i = 1;
 for(; i <= 10; i++)
        ar[i-1] = i;
index 0394e3ce45e838e0a12b2d0270ccdd8382dcd3f9..46e56d33507270073ccfc65820739ed37566d4a3 100644 (file)
@@ -1,5 +1,5 @@
 struct x y z end;
 
 method f(a)
-       return (a - (-3*8)).y;
+       return (a - (-3*4)).y;
 end;
index 1c49d3fdae05e9edd3c8171f42aeea4bad5b800b..82879f61175ecbb59167696e79e3ea178fd4acf8 100644 (file)
@@ -1,6 +1,6 @@
-extern long long f(long long*, long long*);
+extern int f(int*, int*);
 
-long long ar[10];
+int ar[10];
 int i = 1;
 for(; i <= 10; i++)
        ar[i-1] = i;
index 2153dc349831ecb33b581124dbed62a751feb06c..e8b76e3e28a43dd11a828397920a1ee65b2b91d6 100644 (file)
@@ -1,6 +1,6 @@
-extern long long f(long long*, long long*);
+extern int f(int*, int*);
 
-long long ar[10];
+int ar[10];
 int i = 1;
 for(; i <= 10; i++)
        ar[i-1] = i;
index 5df2bd63f7f7fa719e69025d538cfca7ff217b0c..b48bf110c5d1d8a9659e3a0372c24a1d24df5a8f 100644 (file)
@@ -4,4 +4,10 @@ long y(long);
 long z(long);
 long override(long);
 
+printf("w(20,30)(1): %d\n", w(20,30));
+printf("w(30,20)(0): %d\n", w(30,20));
+printf("x(400)(0): %d\n", x(400));
+printf("y(400)(1): %d\n", y(400));
+printf("z(400)(0): %d\n", z(400));
+printf("override(0x1)(0x55555): %x\n", override(0x1));
 RET(w(20,30)==1 && override(0x1)==0x55555 && w(30,20)==0 && override(1)==0x55555 && x(400)==0 && override(0x1)==0x55555 && y(400)==1 && override(0x1)==0x55555 && z(400)==0 && override(0x1)==0x55555);
index b42b23846464ba9c2fc89f1f4dc8f762d785015d..d6326ab4f3307d4bf19535f01063b319062f6145 100644 (file)
@@ -8,5 +8,5 @@ method x()
 end;
 
 method y()
-       return (this-8).k;
+       return (this-4).k;
 end;
index 067edca4b263016fc46f5d568083e6a570ad07fe..2535c8895ebf192633287561fd3d979d8d07fd13 100644 (file)
@@ -38,6 +38,7 @@ if ((void *)-1 == addr) {
 
 addr[2] = 1337;
 
+printf("t: %d\n", t);
 switch (t) {
 case 0:        RET(try0(0xcafebabe) == 1337);
 case 1:        RET(try1(0xcafebabe) == 1337);
index 63d2815832be8fbb05588564cbe3f4f80a9586c8..47be2889578ca87c2b75f56e6e6cd0cd260d226f 100644 (file)
@@ -3,6 +3,6 @@ struct
 end;
 
 method f(a)
-       return (a - (-8 * 4) ).v;
+       return (a - (-4 * 4) ).v;
 end;
 
index 91ca672f592043f390527a7c7441b1819c493976..8d401c3a3eaa740f73da11343a60d119d407a042 100644 (file)
@@ -35,21 +35,21 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
      f(0,  10, -20,  30, -40) == F( 10, -20,  30, -40) &&
      f(0, -10, -20, -30, -40) == F(-10, -20, -30, -40) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f4(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F4(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f8(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F8(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f4(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F4(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f8(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F8(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL));
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f4(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F4(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f8(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F8(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f4(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F4(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f8(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F8(0x8FFFFFFFUL, 0x8FFFFFFFUL));
 
index 91ca672f592043f390527a7c7441b1819c493976..8d401c3a3eaa740f73da11343a60d119d407a042 100644 (file)
@@ -35,21 +35,21 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
      f(0,  10, -20,  30, -40) == F( 10, -20,  30, -40) &&
      f(0, -10, -20, -30, -40) == F(-10, -20, -30, -40) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f4(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F4(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f8(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F8(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f4(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F4(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f8(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F8(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL));
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f4(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F4(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f8(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F8(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f4(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F4(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f8(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F8(0x8FFFFFFFUL, 0x8FFFFFFFUL));
 
index d83320de46f7656989e557d34ceec6f1e21100dc..8fcbfe72d681df43e96fbbbf8f418bc3c71fa1c4 100644 (file)
@@ -33,18 +33,18 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f(0,  10, -20,  30, -40) == F( 10, -20,  30, -40) &&
     f(0, -10, -20, -30, -40) == F(-10, -20, -30, -40) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F3(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F3(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f3(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F3(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f3(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F3(0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index 5c88f7a2398973e9f9c2104ad48b1ee164c40112..66614b1168ca523876f880776e58ca2ceafe65f3 100644 (file)
@@ -26,18 +26,18 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f3(0,   50,  -9) == F3(  50,  -9) &&
     f3(0,  -77, -50) == F3( -77, -50) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F3(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F3(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f3(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F3(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f3(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F3(0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index 7ea77017ad9d8d0c69297318566e34146d78b258..7dc8c9a44f65103af713794b4967c1d296c15227 100644 (file)
@@ -34,17 +34,17 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f(0,  10, -20,  30, -40) == F( 10, -20,  30, -40) &&
     f(0, -10, -20, -30, -40) == F(-10, -20, -30, -40) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F3(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f3(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F3(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) 
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f3(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F3(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f3(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F3(0x8FFFFFFFUL, 0x8FFFFFFFUL) 
    );
index 62902cc1d7535362c210dadecd1b77a17348c64f..74d41039340dcf187b65e2cb5ce2723cbfd30745 100644 (file)
@@ -15,14 +15,14 @@ RET(f1(0,    3,  20, 15) == F1(   3,  20, 15) &&
     f2(0,   50,  -9, -5) == F2(  50,  -9, -5) &&
     f2(0,  -77, -50, 87) == F2( -77, -50, 87) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index 2fbb006e426d0b6854ccb3ea75b7bde7e328a662..b20406e8c01540d4b6036f199d1fc10633d5ae55 100644 (file)
@@ -15,14 +15,14 @@ RET(f1(0,    3,  20, 15) == F1(   3,  20, 15) &&
     f2(0,   50,  -9, -5) == F2(  50,  -9, -5) &&
     f2(0,  -77, -50, 87) == F2( -77, -50, 87) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index 224059c835a5471d1a5338e24015d6b9529334a1..71d0e7b7896899964ab303e68b029663e8b483f9 100644 (file)
@@ -15,14 +15,14 @@ RET(f1(0,    3,  20, 15) == F1(   3,  20, 15) &&
     f2(0,   50,  -9, -5) == F2(  50,  -9, -5) &&
     f2(0,  -77, -50, 87) == F2( -77, -50, 87) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index a2eb7e91a539919c70ad8a52d633c1dde068380c..5ade799a3e348738a2eaf2e8531c56bb2073b639 100644 (file)
@@ -15,14 +15,14 @@ RET(f1(0,    3,  20, 15) == F1(   3,  20, 15) &&
     f2(0,   50,  -9, -5) == F2(  50,  -9, -5) &&
     f2(0,  -77, -50, 87) == F2( -77, -50, 87) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL)
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL, 0x8FFFFFFFUL)
    );
 
index 3c9cdcef11aca41c1102205bbed7eb89d0910599..3e0cbda41fe529009dd4deee7069a21f179e6ea9 100644 (file)
@@ -14,14 +14,14 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f2(0,   50,  -9) == F2(  50,  -9) &&
     f2(0,  -77, -50) == F2( -77, -50) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) 
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) 
    );
 
index f18e5a2d4a3dde02e9abbe8f5e542f079d93811c..7954f843901cd511527e28922e050e75298fd38e 100644 (file)
@@ -14,14 +14,14 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f2(0,   50,  -9) == F2(  50,  -9) &&
     f2(0,  -77, -50) == F2( -77, -50) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) 
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) 
    );
 
index 77dace704ef68d0938dc52a357f568796017d501..83955d4a173534bc33cba65e18e96a1b902c3859 100644 (file)
@@ -14,14 +14,14 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f2(0,   50,  -9) == F2(  50,  -9) &&
     f2(0,  -77, -50) == F2( -77, -50) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) 
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) 
    );
 
index 714f7bdb636a02a50e27254bef7af4f1ac86a347..4c1efee786c48dcb6c11d37cd0f5dbad4385765f 100644 (file)
@@ -14,14 +14,14 @@ RET(f1(0,    3,  20) == F1(   3,  20) &&
     f2(0,   50,  -9) == F2(  50,  -9) &&
     f2(0,  -77, -50) == F2( -77, -50) &&
 
-    f1(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F1(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) ==
-       F2(0x7FFFFFFFFFFFFFFFUL, 0x7FFFFFFFFFFFFFFFUL) &&
+    f1(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F1(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
+    f2(0, 0x7FFFFFFFUL, 0x7FFFFFFFUL) ==
+       F2(0x7FFFFFFFUL, 0x7FFFFFFFUL) &&
 
-    f1(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F1(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) &&
-    f2(0, 0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) ==
-       F2(0x8FFFFFFFFFFFFFFFUL, 0x8FFFFFFFFFFFFFFFUL) 
+    f1(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F1(0x8FFFFFFFUL, 0x8FFFFFFFUL) &&
+    f2(0, 0x8FFFFFFFUL, 0x8FFFFFFFUL) ==
+       F2(0x8FFFFFFFUL, 0x8FFFFFFFUL) 
    );
 
index 60780105f23f69efb5b00ff2cb1c62c7e1b8b11d..0977c73b51d4bd18e9a1f77a4278331706ec5725 100644 (file)
@@ -1,5 +1,5 @@
 struct a b c end;
 
 method m(x)
-  return ((this-0)-8).c;
+  return ((this-0)-4).c;
 end;
index 4db524a74f983f7d379e764c4d8a0b4f94d69ab2..d37fd0e3a1ccb42ac4d0726184cba84368e11749 100644 (file)
@@ -10,13 +10,13 @@ method fib(x)
        var t := this;
        if x < 0 then return -1; end;   t.f0 := 0;
        if x < 1 then return f0; end;   t.f1 := 1;
-       if x < 2 then return f1; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 3 then return f2; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 4 then return f3; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 5 then return f4; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 6 then return f5; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 7 then return f6; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 8 then return f7; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
-       if x < 9 then return f8; end;   t.f2 := t.f0-(0-t.f1);  t := t--8;
+       if x < 2 then return f1; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 3 then return f2; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 4 then return f3; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 5 then return f4; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 6 then return f5; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 7 then return f6; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 8 then return f7; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
+       if x < 9 then return f8; end;   t.f2 := t.f0-(0-t.f1);  t := t--4;
        return f9;
 end;
index c8e1a16401da530dcb9653ce88fc6e8045e4c11f..ab90c9ba6c7e08fc542fa7187d644faf7406571e 100644 (file)
@@ -17,8 +17,8 @@ method fib(x)
        while not (x < 2)
        do
                t.c := t.a-(0-t.b);
-               t := t--8;
+               t := t--4;
                x := x-1;
        end;
-       return (t-8).c;
+       return (t-4).c;
 end;
index f4b6a3d5b3548a785b71f17b24d8c0fa7129b7bc..c1343e93075642fe0029ad045eec17fb81a148fd 100644 (file)
@@ -1,5 +1,5 @@
-extern long a(long long this);
-extern long b(long long this);
+extern long a(int this);
+extern long b(int this);
 
 
 RET(a(20) == -7 && b(0xDEAD) == 20);
index a9c4795046a223a9b72ef53f0cc055236c7b9d56..1e75a43ef548edd48ce06645ddcbb67e494e3729 100644 (file)
@@ -1,6 +1,6 @@
-extern long a(long long *this);
-extern long b(long long this, long long *a);
+extern long a(int *this);
+extern long b(int this, int *a);
 
-long long ar[3] = { 2, 4, 8 };
+int ar[3] = { 2, 4, 8 };
 
 RET(a(ar) == -4711 && b(0xDEAD, ar) == 16);
index 130f7107cfcc51560396458bdf57ea4d006b8cd7..eddb611d619af196791f7287f6c3bd1625aa9527 100644 (file)
@@ -1,6 +1,6 @@
-extern long a(long long *this);
+extern long a(int *this);
 
 
-long long ar[3] = { 2, 4, 8 };
+int ar[3] = { 2, 4, 8 };
 
 RET(a(ar) == 815 && ar[0] == 815);
index fb144223d8945ef9c68cbd01cb06ea929f4022ff..4c5ad1e5cd8e6c59efadd2a6d17f61c746165347 100644 (file)
@@ -1,6 +1,6 @@
-extern long a(long long *this);
+extern long a(int *this);
 
 
-long long ar[3] = { 2, 4, 8 };
+int ar[3] = { 2, 4, 8 };
 
-RET(a(ar) == 3260 && ar[2] == 3260 && ar[0] == 815);
\ No newline at end of file
+RET(a(ar) == 3260 && ar[2] == 3260 && ar[0] == 815);
index 6f32852e125ffc68980efb109fe498ce8ebd8bb1..da22ab9085bfee8c2ed6cabc217e660e6b4f0266 100644 (file)
@@ -1,5 +1,5 @@
-extern long long* b(long long this, long long *a);
+extern int* b(int this, int *a);
 
-long long ar[3] = { 2, 4, 8 };
+int ar[3] = { 2, 4, 8 };
 
 RET(b(0xDEAD, ar) == ar && ar[0] == 3 && ar[1] == 2 && ar[2] == -4);
index d66845cc8e96131253d4f3aaffe3ad6f8b79f8a5..9b42641ad8f6f137195662a32fe5d43af07ab2a0 100644 (file)
@@ -1,5 +1,5 @@
-extern long long m(long long *this, long long x);
+extern int m(int *this, int x);
 
-long long ar[3] = { 2, 4, 8 };
+int ar[3] = { 2, 4, 8 };
 
 RET(m(ar, 12) == 188 && ar[0] == 1 && ar[1] == 4 && ar[2] == 8);
index 5d374dc2dd122bbf171e08dfc57a3f58b4e1fa4f..814ab918dd589b20ad58d0e80b5c56dd912ed175 100644 (file)
@@ -1,3 +1,3 @@
-extern long long m(long long this);
+extern int m(int this);
 
-RET(m(9) == 3 && m(10) == 0);
\ No newline at end of file
+RET(m(9) == 3 && m(10) == 0);
index 372469ea502edc6644063c0eb5bf7c113777e755..c9d6e72e188836bb0343da378d90d9881fff039a 100644 (file)
@@ -1,3 +1,3 @@
-extern long long m(long long this, long long a);
+extern int m(int this, int a);
 
-RET(m(51, 0) == 10 && m(-3, 5) == 30 && m(35, 18) == 8);
\ No newline at end of file
+RET(m(51, 0) == 10 && m(-3, 5) == 30 && m(35, 18) == 8);
index 39c3e6dcfe667fc3613ab76a34736bf9781edff0..85ee6efe95bbec1d042806bc27e4fdbd7152f0f5 100644 (file)
@@ -1,3 +1,7 @@
-extern long long m(long long this, long long a);
+extern int m(int this, int a);
 
-RET(m(60, 0) == 10 && m(0, 10) == 200 && m(35, 18) == 8 && m(-10, 0) == 840);
\ No newline at end of file
+printf("m(60,0): %d(10)\n", m(60,0));
+printf("m(0,10): %d(200)\n", m(0,10));
+printf("m(35,18): %d(8)\n", m(35,18));
+printf("m(-10,0): %d(840)\n", m(-10,0));
+RET(m(60, 0) == 10 && m(0, 10) == 200 && m(35, 18) == 8 && m(-10, 0) == 840);
index 3a71fea3c45414b1d93a77f1f015cf5fd5a68b70..e06d3b0bc6983333e59627da927e43908e307aad 100644 (file)
@@ -1,3 +1,3 @@
-extern long long m(long long this);
+extern int m(int this);
 
-RET(m(0xCCACC) == 10);
\ No newline at end of file
+RET(m(0xCCACC) == 10);
index 1f1c37aa07e77f519058fcd0b57afdb685aa390c..4bb475ae3a3caef5bf457fa28906d09560636e3a 100644 (file)
@@ -1,4 +1,4 @@
-extern long long m(long long this);
+extern int m(int this);
 
 RET(m(-2) == 7 && m(-1) == 5);
 
index bb251ad81a037eeed007424132719aea7f46fd04..15648e3f65686ac218fcb198679540f7c205f101 100644 (file)
@@ -1,3 +1,3 @@
-extern long long m(long long this);
+extern int m(int this);
 
-RET(m(0xBABE) == 0);
\ No newline at end of file
+RET(m(0xBABE) == 0);
index b1b91cc14a4004fc5f3c271a0873712430313541..590c872ebb64cb0e747666d442a61e9252b4313a 100644 (file)
@@ -4,11 +4,11 @@ method m(s)
        var i := 0;
        var sum := 0;
        while i < s do
-               (this - (-8 * i)).x := (this - (-8 * i)).x * 10;
-               if (this - (-8 * i)).x = 47110 then
-                       (this - (-8 * i)).x := 0815;
+               (this - (-4 * i)).x := (this - (-4 * i)).x * 10;
+               if (this - (-4 * i)).x = 47110 then
+                       (this - (-4 * i)).x := 0815;
                end;
-               sum := sum - ((this - (-8 * i)).x * -1);
+               sum := sum - ((this - (-4 * i)).x * -1);
                i := i - (-1);
        end;
        return sum;
index d3fedd837b5215a191990a40bb77f718c5cf6be7..cc77a91c808be6004b0316cd9860b48a7eca9884 100644 (file)
@@ -1,7 +1,7 @@
-extern long long m(long long *this, long long s);
+extern int m(int *this, int s);
 
-long long ar[] = { 1, 2, 3, 4};
-long long ar2[] = { -7, 4711, 3, 4};
+int ar[] = { 1, 2, 3, 4};
+int ar2[] = { -7, 4711, 3, 4};
 
 RET(m(ar, 3) == 60 && ar[0] == 10 && ar[1] == 20 && ar[2] == 30 && ar[3] == 4
 && m(ar2, 2) == 745 && ar2[0] == -70 && ar2[1] == 815 && ar2[2] == 3);
index 7ed79aa07583cc7a5c12217b815e3cee6ce1f5a3..0f789d92195ea6bf7ebe59a66e680b5a86dd8e2a 100644 (file)
@@ -6,9 +6,9 @@ method m1(size)
         var i:= 0;
         while not (i = size) do
                 if i < 1 then
-                        (this - (i * -8)).x := (this - (i * -8)).x - (-20);
+                        (this - (i * -4)).x := (this - (i * -4)).x - (-20);
                 else
-                                       (this - (i * -8)).x := (this - ((i - 1) * -8)).x or 128;
+                                       (this - (i * -4)).x := (this - ((i - 1) * -4)).x or 128;
                                end;
                                i := i - -1;
         end;
index a004b8d7ece55418d18269d2bf8befd983f53bcf..edb221c2bf3cb36ac605865d43b88495297f9017 100644 (file)
@@ -1,7 +1,7 @@
-extern long long m1(long long *this, long long size);
-extern long long m2(long long this, long long y);
+extern int m1(int *this, int size);
+extern int m2(int this, int y);
 
-long long ar[] = { 2, 4, 8, 16, 32 };
+int ar[] = { 2, 4, 8, 16, 32 };
 
 RET(m1(ar, 3) == -20 && ar[0] == 22 && ar[1] == 150 && ar[2] == 150 &&
-m2(0xABC, 101) == 0 && m2(0xABC, -5) == -20 && m2(0xABC, 100) == 320);
\ No newline at end of file
+m2(0xABC, 101) == 0 && m2(0xABC, -5) == -20 && m2(0xABC, 100) == 320);
index 5de0e00f1bff09ab25cf260bcd41b180f93636b4..211438840da05a6d2fb91d99b54ec49e52bc3385 100644 (file)
@@ -1,7 +1,7 @@
-extern long long m(long long* ar1, long long *ar2);
+extern int m(int* ar1, int *ar2);
 
-long long z1[] = { 0, 2, 4, 6, 8, 10, 12 };
-long long z2[] = { 10, 20, 40, 60, 80, 100, 120 };
+int z1[] = { 0, 2, 4, 6, 8, 10, 12 };
+int z2[] = { 10, 20, 40, 60, 80, 100, 120 };
 int i;
 
 
@@ -11,7 +11,7 @@ for(i=0; i < sizeof z1/sizeof z1[0]; i++) {
        printf("z1[%i]: %ld, z2[%i]: %ld\n", i, z1[i], i, z2[i]);
 }
 
-long long ret = m(&z1[1], &z2[1]);
+int ret = m(&z1[1], &z2[1]);
 printf("ret: %ld\n", ret);
 
 for(i=0; i < sizeof z1/sizeof z1[0]; i++) {
diff --git a/scripts/debug_gesamt_ppc b/scripts/debug_gesamt_ppc
new file mode 100755 (executable)
index 0000000..eaf1206
--- /dev/null
@@ -0,0 +1,73 @@
+#!/bin/bash
+
+i=$1
+beispiel=gesamt_ppc
+PROGRAM=./$beispiel
+
+#LOC=.
+#LOC=/usr/ftp/pub/ubvl/test/$beispiel
+LOC=~/test/scripts
+
+allow_null_glob_expansion=1
+
+if [ ! -d ~/abgabe/$beispiel ]; then
+  echo "Fehler: Verzeichnis ~/abgabe/$beispiel existiert nicht."
+  exit 1
+else
+  cd ~/abgabe/$beispiel
+  echo 'Teste "make"'
+  make
+fi
+
+if test ! -x $PROGRAM
+then
+       echo "Fehler: Kein Programm $PROGRAM"
+       exit 1
+fi
+let prgnum=0
+#for i in $LOC/*.0 $LOC2/*.0
+if [ -f $i ]; then
+       let prgnum=prgnum+1
+       let errorfound=0
+       echo "==========> Eingabe von $i:"
+       cat $i
+       echo
+       RESFILE=test${beispiel}out$$
+       $PROGRAM <$i >$RESFILE
+       retval=$?
+       echo -n "Übersetzung: "
+       if test $retval -eq 0
+       then
+               echo "Status korrekt"
+       else
+               echo "[Errot] Status=$retval. Erwartet: 0"
+               let errorfound=1
+       fi
+       echo
+       echo "Ausgabe:"
+       if [ -f ~/test/scripts/clr.py ]; then
+               cat $RESFILE | ~/test/scripts/clr.py
+       else
+               cat $RESFILE
+       fi
+       mv -f $RESFILE $RESFILE.s
+       CALLFILE=${i%.*}.call
+       echo
+       if [ ! -f $CALLFILE ]; then
+       echo "Fehler: Datei $CALLFILE existiert nicht, kann Code nicht ausführen..."
+       exit 1
+       else
+       echo "Übersetze und linke das Testprogramm:"
+       if cc -g -I. -DCALL=\"$CALLFILE\" $LOC/testmain.c $LOC/callingconvention.o $RESFILE.s; then
+               echo
+               echo "Rufe folgendes Codefragment auf:"
+               cat $CALLFILE
+               echo
+               gdb ./a.out 
+       else
+               echo "[Error] Erzeugter Code konnte nicht assembliert und gelinkt werden."
+               let errorfound=1
+       fi
+       fi
+       rm -f a.out $RESFILE $RESFILE.s
+fi
index dd64ac07604d6982ccbcfa8050e0a3c581b9adbb..dabfb35eb94d64ec21ff72d93d59cf12be1a541b 100755 (executable)
@@ -52,11 +52,11 @@ do
            fi
            echo
            echo "Ausgabe:"
-               if [ -f ~/test/scripts/clr.py ]; then
-                       cat $RESFILE | ~/test/scripts/clr.py
-               else
+               #if [ -f ~/test/scripts/clr.py ]; then
+               #       cat $RESFILE | ~/test/scripts/clr.py
+               #else
                        cat $RESFILE
-               fi
+               #fi
            mv -f $RESFILE $RESFILE.s
            CALLFILE=${i%.*}.call
            echo