X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=codea%2Fsnafu_06.call;h=ecb435a5cdf3bff3621a25737a823e32c543e1da;hb=d37ec1b24167bcaf381f39c907f4bb95fffc2088;hp=c618c4d61082f74d03da574b8798ae728af38a5b;hpb=9c4a4fc94372a972959bd31fe8493f751d0f1216;p=testub10.git diff --git a/codea/snafu_06.call b/codea/snafu_06.call index c618c4d..ecb435a 100644 --- a/codea/snafu_06.call +++ b/codea/snafu_06.call @@ -1,5 +1,21 @@ long test64(long); +long num(long); +long num2(long); +long globcmp(long*); +long globcmp2(long*); -RET((test64(0x1000000000) == (long) 0x1000000000 + (int) 0x80808080) + +long foo[] = {1337, 42}; +long bar[] = {23, 23}; +long foobar[] = {23, 42}; + +RET((test64(0x1000000000) == (long) 0x1000000000 - (int) 0x80808080) && (num(0) == -4) - && (num2(0) == 26)); + && (num2(0) == 26) + && (globcmp(foo) == 0) + && (globcmp(bar) == 0) + && (globcmp(foobar) == 1) + && (globcmp2(foo) == 0) + && (globcmp2(bar) == 1) + && (globcmp2(foobar) == 0) + );