rusi/test/arith.c

145 lines
5.7 KiB
C
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

#включить "тест.з"
#включить "stdvv.c"
цел главн() {
ПРОВЕРИТЬ(0, 0);
ПРОВЕРИТЬ(42, 42);
ПРОВЕРИТЬ(21, 5+20-4);
ПРОВЕРИТЬ(41, 12 + 34 - 5 );
ПРОВЕРИТЬ(47, 5+6*7);
ПРОВЕРИТЬ(15, 5*(9-6));
ПРОВЕРИТЬ(4, (3+5)/2);
ПРОВЕРИТЬ(10, -10+20);
ПРОВЕРИТЬ(10, - -10);
ПРОВЕРИТЬ(10, - - +10);
ПРОВЕРИТЬ(0, 0==1);
ПРОВЕРИТЬ(1, 42==42);
ПРОВЕРИТЬ(1, 0!=1);
ПРОВЕРИТЬ(0, 42!=42);
ПРОВЕРИТЬ(1, 0<1);
ПРОВЕРИТЬ(0, 1<1);
ПРОВЕРИТЬ(0, 2<1);
ПРОВЕРИТЬ(1, 0<=1);
ПРОВЕРИТЬ(1, 1<=1);
ПРОВЕРИТЬ(0, 2<=1);
ПРОВЕРИТЬ(1, 1>0);
ПРОВЕРИТЬ(0, 1>1);
ПРОВЕРИТЬ(0, 1>2);
ПРОВЕРИТЬ(1, 1>=0);
ПРОВЕРИТЬ(1, 1>=1);
ПРОВЕРИТЬ(0, 1>=2);
ПРОВЕРИТЬ(0, 1073741824 * 100 / 100);
ПРОВЕРИТЬ(7, ({ цел и=2; и+=5; и; }));
ПРОВЕРИТЬ(7, ({ цел и=2; и+=5; }));
ПРОВЕРИТЬ(3, ({ цел и=5; и-=2; и; }));
ПРОВЕРИТЬ(3, ({ цел и=5; и-=2; }));
ПРОВЕРИТЬ(6, ({ цел и=3; и*=2; и; }));
ПРОВЕРИТЬ(6, ({ цел и=3; и*=2; }));
ПРОВЕРИТЬ(3, ({ цел и=6; и/=2; и; }));
ПРОВЕРИТЬ(3, ({ цел и=6; и/=2; }));
ПРОВЕРИТЬ(3, ({ цел и=2; ++и; }));
ПРОВЕРИТЬ(2, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; ++*п; }));
ПРОВЕРИТЬ(0, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; --*п; }));
ПРОВЕРИТЬ(2, ({ цел и=2; и++; }));
ПРОВЕРИТЬ(2, ({ цел и=2; и--; }));
ПРОВЕРИТЬ(3, ({ цел и=2; и++; и; }));
ПРОВЕРИТЬ(1, ({ цел и=2; и--; и; }));
ПРОВЕРИТЬ(1, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; *п++; }));
ПРОВЕРИТЬ(1, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; *п--; }));
ПРОВЕРИТЬ(0, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п++)--; а[0]; }));
ПРОВЕРИТЬ(0, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*(п--))--; а[1]; }));
ПРОВЕРИТЬ(2, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п)--; а[2]; }));
ПРОВЕРИТЬ(2, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п)--; п++; *п; }));
ПРОВЕРИТЬ(0, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п++)--; а[0]; }));
ПРОВЕРИТЬ(0, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п++)--; а[1]; }));
ПРОВЕРИТЬ(2, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п++)--; а[2]; }));
ПРОВЕРИТЬ(2, ({ цел а[3]; а[0]=0; а[1]=1; а[2]=2; цел *п=а+1; (*п++)--; *п; }));
ПРОВЕРИТЬ(0, !1);
ПРОВЕРИТЬ(0, !2);
ПРОВЕРИТЬ(1, !0);
ПРОВЕРИТЬ(1, !(символ)0);
ПРОВЕРИТЬ(0, !(длин)3);
ПРОВЕРИТЬ(4, размер(!(символ)0));
ПРОВЕРИТЬ(4, размер(!(длин)0));
ПРОВЕРИТЬ(-1, ~0);
ПРОВЕРИТЬ(0, ~-1);
ПРОВЕРИТЬ(5, 17%6);
ПРОВЕРИТЬ(5, ((длин)17)%6);
ПРОВЕРИТЬ(2, ({ цел и=10; и%=4; и; }));
ПРОВЕРИТЬ(2, ({ длин и=10; и%=4; и; }));
ПРОВЕРИТЬ(0, 0&1);
ПРОВЕРИТЬ(1, 3&1);
ПРОВЕРИТЬ(3, 7&3);
ПРОВЕРИТЬ(10, -1&10);
ПРОВЕРИТЬ(1, 0|1);
ПРОВЕРИТЬ(0b10011, 0b10000|0b00011);
ПРОВЕРИТЬ(0, 0^0);
ПРОВЕРИТЬ(0, 0b1111^0b1111);
ПРОВЕРИТЬ(0b110100, 0b111000^0b001100);
ПРОВЕРИТЬ(2, ({ цел и=6; и&=3; и; }));
ПРОВЕРИТЬ(7, ({ цел и=6; и|=3; и; }));
ПРОВЕРИТЬ(10, ({ цел и=15; и^=5; и; }));
ПРОВЕРИТЬ(1, 1<<0);
ПРОВЕРИТЬ(8, 1<<3);
ПРОВЕРИТЬ(10, 5<<1);
ПРОВЕРИТЬ(2, 5>>1);
ПРОВЕРИТЬ(-1, -1>>1);
ПРОВЕРИТЬ(1, ({ цел и=1; и<<=0; и; }));
ПРОВЕРИТЬ(8, ({ цел и=1; и<<=3; и; }));
ПРОВЕРИТЬ(10, ({ цел и=5; и<<=1; и; }));
ПРОВЕРИТЬ(2, ({ цел и=5; и>>=1; и; }));
ПРОВЕРИТЬ(-1, -1);
ПРОВЕРИТЬ(-1, ({ цел и=-1; и; }));
ПРОВЕРИТЬ(-1, ({ цел и=-1; и>>=1; и; }));
ПРОВЕРИТЬ(2, 0?1:2);
ПРОВЕРИТЬ(1, 1?1:2);
ПРОВЕРИТЬ(-1, 0?-2:-1);
ПРОВЕРИТЬ(-2, 1?-2:-1);
ПРОВЕРИТЬ(4, размер(0?1:2));
ПРОВЕРИТЬ(8, размер(0?(длин)1:(длин)2));
ПРОВЕРИТЬ(-1, 0?(длин)-2:-1);
ПРОВЕРИТЬ(-1, 0?-2:(длин)-1);
ПРОВЕРИТЬ(-2, 1?(длин)-2:-1);
ПРОВЕРИТЬ(-2, 1?-2:(длин)-1);
1 ? -2 : (пусто)-1;
ПРОВЕРИТЬ(20, ({ цел х; цел *п=&х; п+20-п; }));
ПРОВЕРИТЬ(1, ({ цел х; цел *п=&х; п+20-п>0; }));
ПРОВЕРИТЬ(-20, ({ цел х; цел *п=&х; п-20-п; }));
ПРОВЕРИТЬ(1, ({ цел х; цел *п=&х; п-20-п<0; }));
ПРОВЕРИТЬ(15, (символ *)0xffffffffffffffff - (символ *)0xfffffffffffffff0);
ПРОВЕРИТЬ(-15, (символ *)0xfffffffffffffff0 - (символ *)0xffffffffffffffff);
ПРОВЕРИТЬ(1, (пусто *)0xffffffffffffffff > (пусто *)0);
ПРОВЕРИТЬ(3, 3?:5);
ПРОВЕРИТЬ(5, 0?:5);
ПРОВЕРИТЬ(4, ({ цел и = 3; ++и?:10; }));
ПРОВЕРИТЬ(3, (длин двойн)3);
ПРОВЕРИТЬ(5, (длин двойн)3+2);
ПРОВЕРИТЬ(6, (длин двойн)3*2);
ПРОВЕРИТЬ(5, (длин двойн)3+2.0);
printf("OK\n");
возврат 0;
}