project_files/hwc/rtl/Types.h
author unc0rr
Mon, 18 Apr 2016 21:47:39 +0300
changeset 11652 09ebdfe364d9
parent 10015 4feced261c68
permissions -rw-r--r--
Fix fpcrtl_strappendA, which cut last char from UserPathPrefix leading to PHYSFS_setWriteDir fail with 'File not found' error, which led to lack of writing dir and logFile handle being nil, which led to crash on attempt to write to (absent) log file

#ifndef _TYPES_H_
#define _TYPES_H_

#include "pas2c.h"

/*
 * Not very useful currently
 */

typedef double TDate;
typedef double TTime;
typedef double TDateTime;
typedef string255 TMonthNameArray[13];
typedef string255 TWeekNameArray[8];

typedef struct {
    Byte CurrencyFormat;
    Byte NegCurrFormat;
    Char ThousandSeparator;
    Char DecimalSeparator;
    Byte CurrencyDecimals;
    Char DateSeparator;
    Char TimeSeparator;
    Char ListSeparator;
    string255 CurrencyString;
    string255 ShortDateFormat;
    string255 LongDateFormat;
    string255 TimeAMString;
    string255 TimePMString;
    string255 ShortTimeFormat;
    string255 LongTimeFormat;
    TMonthNameArray ShortMonthNames;
    TMonthNameArray LongMonthNames;
    TWeekNameArray ShortDayNames;
    TWeekNameArray LongDayNames;
    Word TwoDigitYearCenturyWindow;
}TFormatSettings;

#endif