mirror of
git://repo.or.cz/tinycc.git
synced 2026-06-17 15:44:18 +08:00
30afb50e64
tccpe.c: - fix arm64 unwind codes (to make native set/longjmp() work) sizeof(RUNTIME_FUNCTION) is 8 on arm64 in the first place no need to note stack slots if we don't save any registers anyway arm64-gen.c: - fix long double reg-move - fix arm64_hfa() for structs with float arrays - gfunc_prolog(): setup stackframe eariler (simplifies unwind codes) - new function gv_addr(RC); win32/include/setjmp.h: - provide correct definition for setjmo() (frameoffset = 224) tccasm.c: - support ".quad" with symbol & relocation - support ".size" - fix ". - symbol" arithmetic win32/lib/crt1.c and win32/include/stdlib.h: - do not write to __argc/__argv which reside in msvcrt.dll (msvcrt.dll on arm64 does not like that, crashes on unload) tcc.c,libtcc.c: - new functions tcc_fopen/fclose to avoid different stdio unstances in tcc.exe & libtcc.dll tests & github workflow: - add test-win32.bat to run tests with a tcc compiled by build-tcc.bat - add msvcrt_start.c for gcc/clang to use the same runtime as tcc the problem is that newer gcc as well as clang and cl are linking to newer runtimes (such as UCRT) that have partially different printf format behavior which makes tcctest fail. the solution here is to force these compilers to link with msvcrt.dll just like tcc. Also, there is no gcc on arm64-win32 currently at all. Anyway, this approach to running the github CI tests does not require msys2. But It does rely on gnumake as well as on some 'sh' shell though which seems to be installed somewhere (maybe it is the one from git).
105 lines
2.7 KiB
C
105 lines
2.7 KiB
C
// =============================================
|
|
// crt1.c
|
|
|
|
// _UNICODE for tchar.h, UNICODE for API
|
|
#include <tchar.h>
|
|
|
|
#include <windows.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
#define _UNKNOWN_APP 0
|
|
#define _CONSOLE_APP 1
|
|
#define _GUI_APP 2
|
|
|
|
#define _MCW_PC 0x00030000 // Precision Control
|
|
#define _PC_24 0x00020000 // 24 bits
|
|
#define _PC_53 0x00010000 // 53 bits
|
|
#define _PC_64 0x00000000 // 64 bits
|
|
|
|
#ifdef _UNICODE
|
|
#define __tgetmainargs __wgetmainargs
|
|
#define _tstart _wstart
|
|
#define _tmain wmain
|
|
#define _runtmain _runwmain
|
|
#else
|
|
#define __tgetmainargs __getmainargs
|
|
#define _tstart _start
|
|
#define _tmain main
|
|
#define _runtmain _runmain
|
|
#endif
|
|
|
|
typedef struct { int newmode; } _startupinfo;
|
|
int __cdecl __tgetmainargs(int *pargc, _TCHAR ***pargv, _TCHAR ***penv, int globb, _startupinfo*);
|
|
void __cdecl __set_app_type(int apptype);
|
|
unsigned int __cdecl _controlfp(unsigned int new_value, unsigned int mask);
|
|
extern int _tmain(int argc, _TCHAR * argv[], _TCHAR * env[]);
|
|
|
|
#include "crtinit.c"
|
|
|
|
/* Allow command-line globbing with "int _dowildcard = 1;" in the user source */
|
|
int _dowildcard;
|
|
|
|
static LONG WINAPI catch_sig(EXCEPTION_POINTERS *ex)
|
|
{
|
|
return _XcptFilter(ex->ExceptionRecord->ExceptionCode, ex);
|
|
}
|
|
|
|
void _tstart(void)
|
|
{
|
|
int ret;
|
|
|
|
_startupinfo start_info = {0};
|
|
SetUnhandledExceptionFilter(catch_sig);
|
|
// Sets the current application type
|
|
__set_app_type(_CONSOLE_APP);
|
|
|
|
// Set default FP precision to 53 bits (8-byte double)
|
|
// _MCW_PC (Precision control) is not supported on ARM
|
|
#if defined __i386__ || defined __x86_64__
|
|
_controlfp(_PC_53, _MCW_PC);
|
|
#endif
|
|
|
|
__tgetmainargs( &__argc, &__targv, &_tenviron, _dowildcard, &start_info);
|
|
run_ctors(__argc, __targv, _tenviron);
|
|
ret = _tmain(__argc, __targv, _tenviron);
|
|
run_dtors();
|
|
exit(ret);
|
|
}
|
|
|
|
// =============================================
|
|
// for 'tcc -run ,,,'
|
|
|
|
__attribute__((weak)) extern int __run_on_exit();
|
|
|
|
int _runtmain(int argc, /* as tcc passed in */ char **argv)
|
|
{
|
|
int ret;
|
|
#if defined UNICODE || defined __aarch64__
|
|
_startupinfo start_info = {0};
|
|
__tgetmainargs(&__argc, &__targv, &_tenviron, 0, &start_info);
|
|
#endif
|
|
#ifdef UNICODE
|
|
/* may be wrong when tcc has received wildcards (*.c) */
|
|
if (argc < __argc) {
|
|
__targv += __argc - argc;
|
|
__argc = argc;
|
|
}
|
|
#else
|
|
__argc = argc;
|
|
__targv = argv;
|
|
#endif
|
|
#if defined __i386__ || defined __x86_64__
|
|
_controlfp(_PC_53, _MCW_PC);
|
|
#endif
|
|
run_ctors(__argc, __targv, _tenviron);
|
|
ret = _tmain(__argc, __targv, _tenviron);
|
|
fflush(stdout);
|
|
fflush(stderr);
|
|
run_dtors();
|
|
__run_on_exit(ret);
|
|
return ret;
|
|
}
|
|
|
|
// =============================================
|