2 * TCC auto test program
6 /* Unfortunately, gcc version < 3 does not handle that! */
9 /* only gcc 3 handles _Bool correctly */
30 void constant_expr_test();
32 void char_short_test();
34 void compound_literal_test(void);
36 void struct_assign_test();
38 void bitfield_test(void);
39 void c99_bool_test(void);
40 void float_test(void);
41 void longlong_test(void);
45 void forward_ref(void);
51 #define M1(a, b) (a) + (b)
54 #define glue(a, b) a ## b
55 #define xglue(a, b) glue(a, b)
56 #define HIGHLOW "hello"
57 #define LOW LOW ", world"
59 #define min(a, b) ((a) < (b) ? (a) : (b))
62 #define dprintf(level,...) printf(__VA_ARGS__)
73 printf("aaa=%d\n", AAA
);
75 printf("min=%d\n", min(1, min(2, -1)));
77 printf("s1=%s\n", glue(HIGH
, LOW
));
78 printf("s2=%s\n", xglue(HIGH
, LOW
));
79 printf("s3=%s\n", str("c"));
80 printf("s4=%s\n", str(a1
));
83 printf("A defined\n");
86 printf("B defined\n");
89 printf("A defined\n");
91 printf("A not defined\n");
94 printf("B defined\n");
96 printf("B not defined\n");
100 printf("A defined\n");
102 printf("B1 defined\n");
104 printf("B1 not defined\n");
107 printf("A not defined\n");
109 printf("B2 defined\n");
111 printf("B2 not defined\n");
116 printf("test true1\n");
119 printf("test true2\n");
122 printf("test true3\n");
125 printf("test trueA\n");
128 printf("test trueB\n");
141 printf("__LINE__=%d __FILE__=%s\n",
143 /* not strictly preprocessor, but we test it there */
145 printf("__func__ = %s\n", __func__
);
146 dprintf(1, "vaarg=%d\n", 1);
180 printf("\141\1423\143\n");/* dezdez test */
181 printf("\x41\x42\x43\x3a\n");
182 printf("c=%c\n", 'r');
183 printf("wc=%C 0x%lx %C\n", L
'a', L
'\x1234', L
'c');
184 printf("wstring=%S\n", L
"abc");
185 printf("wstring=%S\n", L
"abc" L
"def" "ghi");
188 while ((b
= b
+ 1) < 96) {
192 printf("fib=%d\n", fib(33));
194 while (b
!= 0x80000000) {
207 for(i
= 0; i
< 10;i
++)
216 /* break/continue tests */
228 /* break/continue tests */
240 for(i
= 0;i
< 10;i
++) {
280 printf("enum:\n%d %d %d %d %d %d\n",
281 E0
, E1
, E2
, E3
, E4
, E5
);
283 printf("b1=%d\n", b1
);
294 printf("typedef:\n");
295 printf("a=%d\n", *a
);
300 printf("forward:\n");
306 void forward_ref(void)
308 printf("forward ok\n");
311 typedef struct struct1
{
331 struct struct1 st1
, st2
;
333 int main(int argc
, char **argv
)
351 constant_expr_test();
355 compound_literal_test();
357 struct_assign_test();
373 printf("g1=%d\n", g
);
381 printf("g2=%d\n", g
);
385 printf("g3=%d\n", g
);
389 printf("g4=%d\n", g
);
392 printf("g5=%d\n", g
);
395 void array_test(int a
[4])
400 printf("sizeof(a) = %d\n", sizeof(a
));
401 printf("sizeof(int) = %d\n", sizeof(int));
402 printf("sizeof(unsigned int) = %d\n", sizeof(unsigned int));
403 printf("sizeof(short) = %d\n", sizeof(short));
404 printf("sizeof(unsigned short) = %d\n", sizeof(unsigned short));
405 printf("sizeof(char) = %d\n", sizeof(char));
406 printf("sizeof(unsigned char) = %d\n", sizeof(unsigned char));
407 printf("sizeof tab %d\n", sizeof(tab
));
408 printf("sizeof tab2 %d\n", sizeof tab2
);
412 printf("%d %d %d\n", tab
[0], tab
[1], tab
[2]);
415 tab2
[i
][j
] = 10 * i
+ j
;
417 printf(" %3d", ((int *)tab2
)[i
]);
426 printf("%d\n", a
+= 1);
427 printf("%d\n", a
-= 2);
428 printf("%d\n", a
*= 31232132);
429 printf("%d\n", a
/= 4);
430 printf("%d\n", a
%= 20);
431 printf("%d\n", a
&= 6);
432 printf("%d\n", a
^= 7);
433 printf("%d\n", a
|= 8);
434 printf("%d\n", a
>>= 3);
435 printf("%d\n", a
<<= 4);
439 printf("%d\n", a
+ 1);
440 printf("%d\n", a
- 2);
441 printf("%d\n", a
* 312);
442 printf("%d\n", a
/ 4);
443 printf("%d\n", b
/ 4);
444 printf("%d\n", (unsigned)b
/ 4);
445 printf("%d\n", a
% 20);
446 printf("%d\n", b
% 20);
447 printf("%d\n", (unsigned)b
% 20);
448 printf("%d\n", a
& 6);
449 printf("%d\n", a
^ 7);
450 printf("%d\n", a
| 8);
451 printf("%d\n", a
>> 3);
452 printf("%d\n", b
>> 3);
453 printf("%d\n", (unsigned)b
>> 3);
454 printf("%d\n", a
<< 4);
459 printf("%d\n", 12 + 1);
460 printf("%d\n", 12 - 2);
461 printf("%d\n", 12 * 312);
462 printf("%d\n", 12 / 4);
463 printf("%d\n", 12 % 20);
464 printf("%d\n", 12 & 6);
465 printf("%d\n", 12 ^ 7);
466 printf("%d\n", 12 | 8);
467 printf("%d\n", 12 >> 2);
468 printf("%d\n", 12 << 4);
472 printf("%d %d %d %d\n",
481 return (c
>= 'a' & c
<= 'z') | (c
>= 'A' & c
<= 'Z') | c
== '_';
484 /**********************/
486 int vstack
[10], *vstack_ptr
;
488 void vpush(int vt
, int vc
)
494 void vpop(int *ft
, int *fc
)
507 vstack_ptr
[-2] &= ~0xffffff80;
509 printf("res= %d %d\n", a
, b
);
512 void constant_expr_test()
515 printf("constant_expr:\n");
517 printf("%d\n", a
* 16);
518 printf("%d\n", a
* 1);
519 printf("%d\n", a
+ 0);
528 printf("expr_ptr:\n");
531 printf("diff=%d\n", q
- p
);
533 printf("inc=%d\n", p
- tab4
);
535 printf("dec=%d\n", p
- tab4
);
537 printf("inc=%d\n", p
- tab4
);
539 printf("dec=%d\n", p
- tab4
);
540 printf("add=%d\n", p
+ 3 - tab4
);
541 printf("add=%d\n", 3 + p
- tab4
);
547 printf("constant_expr:\n");
550 printf("%d\n", a
== a
);
551 printf("%d\n", a
!= a
);
553 printf("%d\n", a
< b
);
554 printf("%d\n", a
<= b
);
555 printf("%d\n", a
<= a
);
556 printf("%d\n", b
>= a
);
557 printf("%d\n", a
>= a
);
558 printf("%d\n", b
> a
);
560 printf("%d\n", (unsigned)a
< b
);
561 printf("%d\n", (unsigned)a
<= b
);
562 printf("%d\n", (unsigned)a
<= a
);
563 printf("%d\n", (unsigned)b
>= a
);
564 printf("%d\n", (unsigned)a
>= a
);
565 printf("%d\n", (unsigned)b
> a
);
574 printf("sizes: %d %d %d %d\n",
575 sizeof(struct struct1
),
576 sizeof(struct struct2
),
577 sizeof(union union1
),
578 sizeof(union union2
));
582 printf("st1: %d %d %d\n",
583 st1
.f1
, st1
.f2
, st1
.f3
);
586 printf("union1: %d\n", st1
.u
.v1
);
589 printf("union2: %d\n", u
.w1
);
594 printf("st2: %d %d %d\n",
595 s
->f1
, s
->f2
, s
->f3
);
596 printf("str_addr=%x\n", (int)st1
.str
- (int)&st1
.f1
);
599 /* XXX: depend on endianness */
600 void char_short_test()
604 printf("char_short:\n");
609 *(char *)&var1
, *(char *)&var2
);
611 *(unsigned char *)&var1
, *(unsigned char *)&var2
);
612 printf("s16=%d %d\n",
613 *(short *)&var1
, *(short *)&var2
);
614 printf("u16=%d %d\n",
615 *(unsigned short *)&var1
, *(unsigned short *)&var2
);
616 printf("s32=%d %d\n",
617 *(int *)&var1
, *(int *)&var2
);
618 printf("u32=%d %d\n",
619 *(unsigned int *)&var1
, *(unsigned int *)&var2
);
620 *(char *)&var1
= 0x08;
621 printf("var1=%x\n", var1
);
622 *(short *)&var1
= 0x0809;
623 printf("var1=%x\n", var1
);
624 *(int *)&var1
= 0x08090a0b;
625 printf("var1=%x\n", var1
);
644 printf("!s=%d\n", !s
);
650 printf("a=%d %d %d\n", 0 || 0, 0 || 1, 1 || 1);
651 printf("a=%d %d %d\n", 0 && 0, 0 && 1, 1 && 1);
652 printf("a=%d %d\n", 1 ? 1 : 0, 0 ? 1 : 0);
667 printf("b=%d\n", a
+ (0 ? 1 : a
/ 2));
672 int *cinit2
= (int []){3, 2, 1};
674 void compound_literal_test(void)
679 printf("compound_test:\n");
681 p
= (int []){1, 2, 3};
687 printf("%d", cinit2
[i
]);
691 printf("q1=%s\n", q
);
693 q
= (char *){ "tralala2" };
694 printf("q2=%s\n", q
);
697 printf("q3=%s\n", q3
);
699 q
= (char []){ "tralala3" };
700 printf("q4=%s\n", q
);
703 p
= (int []){1, 2, cinit1
+ 3};
709 p
= (int []){1, 2, 4 + i
};
732 printf("kr_test:\n");
733 printf("func1=%d\n", kr_func1(3, 4));
734 printf("func2=%d\n", kr_func2(3, 4));
741 tab
= (char*)malloc(20);
757 /* structure assignment tests */
763 struct structa1 ssta1
;
765 void struct_assign_test1(struct structa1 s1
, int t
)
767 printf("%d %d %d\n", s1
.f1
, s1
.f2
, t
);
770 struct structa1
struct_assign_test2(struct structa1 s1
, int t
)
777 void struct_assign_test()
779 struct structa1 lsta1
, lsta2
;
781 printf("struct_assign_test:\n");
785 printf("%d %d\n", lsta1
.f1
, lsta1
.f2
);
787 printf("%d %d\n", lsta2
.f1
, lsta2
.f2
);
789 struct_assign_test1(lsta2
, 3);
791 printf("before call: %d %d\n", lsta2
.f1
, lsta2
.f2
);
792 lsta2
= struct_assign_test2(lsta2
, 4);
793 printf("after call: %d %d\n", lsta2
.f1
, lsta2
.f2
);
796 /* casts to short/char */
798 void cast1(char a
, short b
, unsigned char c
, unsigned short d
)
800 printf("%d %d %d %d\n", a
, b
, c
, d
);
810 printf("cast_test:\n");
814 printf("%d %d %d %d\n",
817 (unsigned char)(a
+ 1),
818 (unsigned short)(a
+ 1));
819 printf("%d %d %d %d\n",
822 (unsigned char)0xfffff,
823 (unsigned short)0xfffff);
825 a
= (bcast
= 128) + 1;
827 a
= (scast
= 65536) + 1;
831 /* initializers tests */
841 int sinit3
[3] = { 1, 2, {{3}}, };
842 int sinit4
[3][2] = { {1, 2}, {3, 4}, {5, 6} };
843 int sinit5
[3][2] = { 1, 2, 3, 4, 5, 6 };
844 int sinit6
[] = { 1, 2, 3 };
845 int sinit7
[] = { [2] = 3, [0] = 1, 2 };
846 char sinit8
[] = "hello" "trala";
848 struct structinit1 sinit9
= { 1, 2, 3 };
849 struct structinit1 sinit10
= { .f2
= 2, 3, .f1
= 1 };
850 struct structinit1 sinit11
= { .f2
= 2, 3, .f1
= 1,
858 char *sinit12
= "hello world";
864 char sinit14
[10] = { "abc" };
870 int linit4
[3][2] = { {1, 2}, {3, 4}, {5, 6} };
871 int linit6
[] = { 1, 2, 3 };
873 char linit8
[] = "hello" "trala";
874 int linit12
[10] = { 1, 2 };
875 int linit13
[10] = { 1, 2, [7] = 3, [3] = 4, };
876 char linit14
[10] = "abc";
877 int linit15
[10] = { linit1
, linit1
+ 1, [6] = linit1
+ 2, };
878 struct linit16
{ int a1
, a2
, a3
, a4
; } linit16
= { 1, .a3
= 2 };
880 printf("init_test:\n");
882 printf("sinit1=%d\n", sinit1
);
883 printf("sinit2=%d\n", sinit2
);
884 printf("sinit3=%d %d %d %d\n",
890 printf("sinit6=%d\n", sizeof(sinit6
));
891 printf("sinit7=%d %d %d %d\n",
897 printf("sinit8=%s\n", sinit8
);
898 printf("sinit9=%d %d %d\n",
903 printf("sinit10=%d %d %d\n",
908 printf("sinit11=%d %d %d %d %d %d\n",
919 printf("[%d][%d] = %d %d %d\n",
920 i
, j
, sinit4
[i
][j
], sinit5
[i
][j
], linit4
[i
][j
]);
921 printf("linit1=%d\n", linit1
);
922 printf("linit2=%d\n", linit2
);
923 printf("linit6=%d\n", sizeof(linit6
));
924 printf("linit8=%d %s\n", sizeof(linit8
), linit8
);
926 printf("sinit12=%s\n", sinit12
);
927 printf("sinit13=%d %s %s %s\n",
932 printf("sinit14=%s\n", sinit14
);
934 for(i
=0;i
<10;i
++) printf(" %d", linit12
[i
]);
936 for(i
=0;i
<10;i
++) printf(" %d", linit13
[i
]);
938 for(i
=0;i
<10;i
++) printf(" %d", linit14
[i
]);
940 for(i
=0;i
<10;i
++) printf(" %d", linit15
[i
]);
942 printf("%d %d %d %d\n",
973 /* ISOC99 _Bool type */
974 void c99_bool_test(void)
980 printf("bool_test:\n");
981 printf("sizeof(_Bool) = %d\n", sizeof(_Bool
));
983 printf("cast: %d %d %d\n", (_Bool
)10, (_Bool
)0, (_Bool
)a
);
985 printf("b = %d\n", b
);
987 printf("b = %d\n", b
);
991 void bitfield_test(void)
1001 unsigned int f5
: 7;
1003 printf("bitfield_test:");
1004 printf("sizeof(st1) = %d\n", sizeof(st1
));
1013 printf("%d %d %d %d %d\n",
1014 st1
.f1
, st1
.f2
, st1
.f3
, st1
.f4
, st1
.f5
);
1017 #define FTEST(prefix, type, fmt)\
1018 void prefix ## cmp(type a, type b)\
1020 printf("%d %d %d %d %d %d\n",\
1027 printf(fmt " " fmt " " fmt " " fmt " " fmt " " fmt " " fmt "\n",\
1035 printf(fmt "\n", ++a);\
1036 printf(fmt "\n", a++);\
1037 printf(fmt "\n", a);\
1039 void prefix ## fcast(type a)\
1050 printf("ftof: %f %f %Lf\n", fa, da, la);\
1052 ua = (unsigned int)a;\
1053 printf("ftoi: %d %u\n", ia, ua);\
1057 printf("itof: " fmt "\n", b);\
1059 printf("utof: " fmt "\n", b);\
1062 void prefix ## test(void)\
1064 printf("testing '%s'\n", #type);\
1065 prefix ## cmp(1, 2.5);\
1066 prefix ## cmp(2, 1.5);\
1067 prefix ## cmp(1, 1);\
1068 prefix ## fcast(234.6);\
1069 prefix ## fcast(-2334.6);\
1072 FTEST(f
, float, "%f")
1073 FTEST(d
, double, "%f")
1074 FTEST(ld
, long double, "%Lf")
1076 double ftab1
[3] = { 1.2, 3.4, 5.6 };
1079 void float_test(void)
1086 printf("float_test:\n");
1087 printf("sizeof(float) = %d\n", sizeof(float));
1088 printf("sizeof(double) = %d\n", sizeof(double));
1089 printf("sizeof(long double) = %d\n", sizeof(long double));
1093 printf("%f %f %f\n", ftab1
[0], ftab1
[1], ftab1
[2]);
1094 printf("%f %f %f\n", 2.12, .5, 2.3e10
);
1095 // printf("%f %f %f\n", 0x1234p12, 0x1e23.23p10, 0x12dp-10);
1097 printf("da=%f\n", da
);
1099 printf("fa=%f\n", fa
);
1102 printf("da = %f\n", da
);
1105 printf("db = %f\n", db
);
1113 return fib(n
-1) + fib(n
-2);
1125 printf("funcptr:\n");
1132 /* more complicated pointer computation */
1135 printf("sizeof1 = %d\n", sizeof(funcptr_test
));
1136 printf("sizeof2 = %d\n", sizeof funcptr_test
);
1137 printf("sizeof3 = %d\n", sizeof(&funcptr_test
));
1138 printf("sizeof4 = %d\n", sizeof &funcptr_test
);
1141 void lloptest(long long a
, long long b
)
1143 unsigned long long ua
, ub
;
1148 printf("arith: %Ld %Ld %Ld %Ld %Ld\n",
1156 printf("bin: %Ld %Ld %Ld\n",
1162 printf("test: %d %d %d %d %d %d\n",
1170 printf("utest: %d %d %d %d %d %d\n",
1181 printf("arith2: %Ld %Ld\n", a
, b
);
1182 printf("arith2: %Ld %Ld\n", a
++, b
++);
1183 printf("arith2: %Ld %Ld\n", --a
, --b
);
1184 printf("arith2: %Ld %Ld\n", a
, b
);
1187 void llshift(long long a
, int b
)
1189 printf("shift: %Ld %Ld %Ld\n",
1190 (unsigned long long)a
>> b
,
1193 printf("shiftc: %Ld %Ld %Ld\n",
1194 (unsigned long long)a
>> 3,
1197 printf("shiftc: %Ld %Ld %Ld\n",
1198 (unsigned long long)a
>> 35,
1208 long long la
, lb
, lc
;
1209 unsigned long long ula
, ulb
, ulc
;
1212 la
= (la
<< 20) | 0x12345;
1214 printf("la=%Ld ula=%Lu\n", la
, ula
);
1219 printf("lltof: %f %f %Lf\n", fa
, da
, lda
);
1224 printf("ftoll: %Ld %Ld %Ld\n", la
, lb
, lc
);
1229 printf("ulltof: %f %f %Lf\n", fa
, da
, lda
);
1234 printf("ftoull: %Lu %Lu %Lu\n", ula
, ulb
, ulc
);
1237 long long llfunc1(int a
)
1242 /* currently not supported, except for typing */
1243 void longlong_test(void)
1248 printf("longlong_test:\n");
1249 printf("sizeof(long long) = %d\n", sizeof(long long));
1254 printf("%Ld %Ld\n", a
, b
);
1255 printf("%Ld %Ld %Ld %Lx\n",
1259 0x1234567812345679);
1264 lloptest(0xff, 0x1234);
1265 b
= 0x72345678 << 10;
1269 b
= 0x72345678 << 10;