You've already forked lazarus-ccr
d2a6c32d49
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@340 8e941d3f-bd1b-0410-a28a-d453659cc2b4
55 lines
909 B
C
55 lines
909 B
C
/*
|
|
system.h
|
|
|
|
C/C++ header for the LCL Exports library
|
|
|
|
LICENSE: The same modifyed LGPL as the Free Pascal Runtime Library
|
|
and the Lazarus Component Library
|
|
|
|
Copyright (C) 2008 Felipe Monteiro de Carvalho
|
|
*/
|
|
|
|
/* Basic Pascal declarations */
|
|
|
|
#ifndef LAZARUS_SYSTEM_H
|
|
#define LAZARUS_SYSTEM_H
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
|
|
/* Cross-platform entry-point */
|
|
|
|
#ifdef __Win32__
|
|
|
|
#define APPBEGIN() \
|
|
int WINAPI WinMain (HINSTANCE hThisInstance, \
|
|
HINSTANCE hPrevInstance, \
|
|
LPSTR lpszArgument, \
|
|
int nFunsterStil)
|
|
|
|
#else
|
|
|
|
#define APPBEGIN() \
|
|
int main(int argc, char *argv[])
|
|
|
|
#endif
|
|
|
|
typedef void* TObjectH;
|
|
|
|
/* 32-bit types */
|
|
|
|
typedef int Integer;
|
|
typedef unsigned int Cardinal;
|
|
|
|
/* Variable width types */
|
|
|
|
typedef int PtrInt;
|
|
typedef unsigned int PtrUInt;
|
|
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
#endif /* !LAZARUS_SYSTEM_H */
|