19e3e10e4b
tccgen.c: - just track local_stack for small scopes (can't declare variables) - fix a vla problem with nested scopes - move debug N_L/RBRAC into curly braced block Also: - tccpp.c: move 'label_...' functions to tccgen.c - tccpp.c: let get_tok_str() say "<no name>" for anonymous symbols - tcctest.c: let __pa_symbol() work for memory > 2GB - 119_random_stuff.c: revert strtoll test (no reason to test libc) - tccdefs.h/tcctest.c: enable bit fncs for _WIN32 - Makefile: - use i686-linux-gnu instead of i386-linux-gnu for cross-i386 - update 'make help' - revert umplicit 'make all' with 'make install' (but print warning)
120 lines
1.9 KiB
C
120 lines
1.9 KiB
C
#include <stdio.h>
|
|
|
|
struct big_struct { char a[262144]; };
|
|
|
|
static const char str[] = "abcdefghijklmnopqrstuvwxyz";
|
|
|
|
void tst_branch(void)
|
|
{
|
|
printf("tst_branch --");
|
|
goto *&&a;
|
|
printf (" dummy");
|
|
a: ;
|
|
printf(" --\n");
|
|
}
|
|
|
|
void tst_void_ptr(void *pv, int i)
|
|
{
|
|
i ? *pv : *pv; // dr106
|
|
}
|
|
|
|
void tst_shift(void)
|
|
{
|
|
int i = 1;
|
|
long long l = 1;
|
|
i = i << 32; // illegal. just test
|
|
l = l << 64; // illegal. just test
|
|
}
|
|
|
|
#if !defined(_WIN32)
|
|
#include <sys/mman.h>
|
|
|
|
void tst_const_addr(void)
|
|
{
|
|
void *addr = mmap ((void *)0x20000000, 4096, PROT_READ | PROT_WRITE, MAP_FIXED | MAP_ANONYMOUS, -1, 0);
|
|
if (addr != (void *) -1) {
|
|
*(int *)0x20000000 += 42;
|
|
munmap (addr, 4096);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
struct zero_struct {};
|
|
|
|
struct zero_struct tst_zero_struct(void)
|
|
{
|
|
struct zero_struct ret;
|
|
return ret;
|
|
}
|
|
|
|
struct big_struct tst_big(struct big_struct tst)
|
|
{
|
|
return tst;
|
|
}
|
|
|
|
void tst_adr (int (*fp)(char *, const char *, ...))
|
|
{
|
|
char buf[10];
|
|
(*fp)(buf, "%.0f", 5.0);
|
|
printf("tst_adr %s\n", buf);
|
|
}
|
|
|
|
int tst(void)
|
|
{
|
|
long long value = 3;
|
|
return -value;
|
|
}
|
|
|
|
void tst_compare(void)
|
|
{
|
|
/* This failed on risc64 */
|
|
printf ("tst_compare: %s\n", tst() > 0 ? "error" : "ok");
|
|
}
|
|
|
|
#pragma pack(1)
|
|
struct S { int d:24; int f:14; } i, j;
|
|
#pragma pack()
|
|
|
|
void tst_pack (void)
|
|
{
|
|
i.f = 5; j.f = 5;
|
|
printf("tst_pack: j.f = %d, i.f = %d\n", j.f, i.f);
|
|
}
|
|
|
|
void tst_cast(void)
|
|
{
|
|
signed char c = (signed char) 0xaaaaaaaa;
|
|
int r = (unsigned short) c ^ (signed char) 0x99999999;
|
|
printf ("schar to ushort cast: %x\n", r);
|
|
}
|
|
|
|
struct {
|
|
int (*print)(const char *format, ...);
|
|
} tst_indir = {
|
|
printf
|
|
};
|
|
|
|
void tst_indir_func(void)
|
|
{
|
|
tst_indir.print("tst_indir_func %d\n", 10);
|
|
}
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
struct big_struct big;
|
|
|
|
tst_branch();
|
|
tst_shift();
|
|
tst_void_ptr(&big.a[0], 0);
|
|
#if !defined(_WIN32)
|
|
tst_const_addr();
|
|
#endif
|
|
tst_zero_struct();
|
|
tst_big(big);
|
|
tst_adr(&sprintf);
|
|
tst_compare();
|
|
tst_pack();
|
|
tst_cast();
|
|
tst_indir_func();
|
|
}
|