tinycc/win32/lib/crt1.c
seyko dfbb00c106 wincrt1.c: add definition of the __TRY__ if not defined
Some i686-pc-mingw32-gcc don't know about __TRY__
2015-03-03 22:35:33 +03:00

87 lines
2.4 KiB
C

// =============================================
// crt1.c
// For ExitProcess
// windows.h header file should be included before any other library include
#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
#ifndef __TRY__
#ifdef _WIN64
#define __TRY__
#else
#define __TRY__ void __try__(void**), *_sehrec[6]; __try__(_sehrec);
#endif
#endif
typedef struct
{
int newmode;
} _startupinfo;
// Prototype of __getmainargs:
// in msvcrt v6.x : returns void (windows 98, 2000)
// in msvcrt v7.x : returns int (windows xp and above)
// Using the last for check the result. A negative value means no success.
// These are the test results of call to __getmainargs with the heap fully:
// win 98, 2000 :
// program termination with error code 255 after call _amsg_exit(8)
// prints: "runtime error R6008\r\n- not enough space for arguments\r\n"
// win xp :
// returns -1
// win 7, 8 :
// program termination with error code -1 after call ExitProcess(-1)
//
// Checking the return of this function also works on windows 98 and 2000
// because internally it sets to eax the value of the third parameter.
// In this case is &env and at that point it is not a negative value.
int __cdecl __getmainargs(int *pargc, char ***pargv, char ***penv, int globb, _startupinfo*);
void __cdecl __set_app_type(int apptype);
unsigned int __cdecl _controlfp(unsigned int new_value, unsigned int mask);
void _start(void);
int main(int argc, char * argv[], char * env[]);
void _start(void)
{
__TRY__
int argc;
char **argv;
char **env;
_startupinfo start_info;
// 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
// the ARM and x64 architectures
#if defined(_X86_) && !defined(__x86_64)
_controlfp(_PC_53, _MCW_PC);
#endif
start_info.newmode = 0;
if ( __getmainargs( &argc, &argv, &env, 0, &start_info ) < 0 )
{
ExitProcess(-1);
}
else
{
exit( main(argc, argv, env) );
}
}
// =============================================