73 if (
version_info.dwPlatformId == VER_PLATFORM_WIN32s)
return 0;
75 if (
version_info.dwPlatformId == VER_PLATFORM_WIN32_NT)
return 1;
91 strcpy(chVerBuf,
"Windows");
95 strcpy(chVerBuf,
"WindowsNT");
99 strcpy(chVerBuf,
"Windows95");
115 vi.dwOSVersionInfoSize =
sizeof(vi);
119 wsprintf(chVerBuf,
"%i.%02i",(
int)vi.dwMajorVersion,(
int)vi.dwMinorVersion);
132 const char *chSysName;
140 strcpy(outPtr, chSysName);
149 return source_string;
158 return EXCEPTION_CONTINUE_SEARCH;
162 #define MAX_ADDRESS_NAME_LENGTH 250
void reportException(wholenumber_t error)
#define Error_Environment_name_name
RexxString * new_string(const char *s, stringsizeB_t bl, sizeC_t cl=-1)
RexxString * raw_string(stringsizeB_t bl, stringsizeC_t cl=-1)
const char * getStringData()
static void setNoMessageLoop()
static RexxString * getSystemVersion()
static RexxString * getSystemName()
static RexxString * getSourceString(RexxString *callType, RexxString *programName)
static RexxString * getInternalSystemName()
static void validateAddressName(RexxString *name)
static OSVERSIONINFO version_info
#define MAX_ADDRESS_NAME_LENGTH
BOOL APIENTRY RexxSetProcessMessages(BOOL turnOn)
int which_system_is_running()
int WinExceptionFilter(int xCode)