project_files/hwc/rtl/Types.h
author sheepluva
Mon, 05 Aug 2019 00:20:45 +0200
changeset 15295 f382ec6dba11
parent 10015 4feced261c68
permissions -rw-r--r--
In hindsight my emscripten-ifdef (70d416a8f63f) is nonsense. As fpcrtl_glShaderSource() would not be defined and lead to compiling issues. So either it's 3 ifdefs (in pas2cRedo, pas2cSystem and misc.c), in order to toggle between fpcrtl_ and the native function, or alternatively have no ifdef for it at all. I'm going with none at all, which means emscripten will compile with the original (const) function prototype, being wrapped by the fpcrtl_ function, same as non-emscripten builds.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
10015
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     1
#ifndef _TYPES_H_
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     2
#define _TYPES_H_
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     3
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     4
#include "pas2c.h"
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     5
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     6
/*
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     7
 * Not very useful currently
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     8
 */
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
     9
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    10
typedef double TDate;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    11
typedef double TTime;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    12
typedef double TDateTime;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    13
typedef string255 TMonthNameArray[13];
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    14
typedef string255 TWeekNameArray[8];
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    15
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    16
typedef struct {
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    17
    Byte CurrencyFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    18
    Byte NegCurrFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    19
    Char ThousandSeparator;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    20
    Char DecimalSeparator;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    21
    Byte CurrencyDecimals;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    22
    Char DateSeparator;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    23
    Char TimeSeparator;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    24
    Char ListSeparator;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    25
    string255 CurrencyString;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    26
    string255 ShortDateFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    27
    string255 LongDateFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    28
    string255 TimeAMString;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    29
    string255 TimePMString;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    30
    string255 ShortTimeFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    31
    string255 LongTimeFormat;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    32
    TMonthNameArray ShortMonthNames;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    33
    TMonthNameArray LongMonthNames;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    34
    TWeekNameArray ShortDayNames;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    35
    TWeekNameArray LongDayNames;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    36
    Word TwoDigitYearCenturyWindow;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    37
}TFormatSettings;
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    38
4feced261c68 partial merge of the webgl branch
koda
parents: 8047
diff changeset
    39
#endif