project_files/hwc/rtl/pas2c.h
branchwebgl
changeset 9962 97ed501accc5
parent 8006 7ca007615b88
child 10121 8b65699beb56
equal deleted inserted replaced
9960:fac73b8a52d3 9962:97ed501accc5
     9 #define MAX_PARAMS 64
     9 #define MAX_PARAMS 64
    10 
    10 
    11 typedef union string255_
    11 typedef union string255_
    12     {
    12     {
    13         struct {
    13         struct {
    14             char s[257];
    14             unsigned char s[257];
    15         };
    15         };
    16         struct {
    16         struct {
    17             unsigned char len;
    17             unsigned char len;
    18             char str[256];
    18             unsigned char str[256];
    19         };
    19         };
    20     } string255;
    20     } string255;
    21 typedef struct string192_
    21 typedef struct string192_
    22     {
    22     {
    23         char s[193];
    23         unsigned char s[193];
    24     } string192;
    24     } string192;
    25 typedef struct string31_
    25 typedef struct string31_
    26     {
    26     {
    27         char s[32];
    27         unsigned char s[32];
    28     } string31;
    28     } string31;
    29 typedef struct string15_
    29 typedef struct string15_
    30     {
    30     {
    31         char s[16];
    31         unsigned char s[16];
    32     } string15;
    32     } string15;
    33 
    33 
    34 typedef string255 shortstring;
    34 typedef string255 shortstring;
    35 typedef string255 ansistring;
    35 typedef string255 ansistring;
    36 
    36 
    65 typedef LongInt SizeInt;
    65 typedef LongInt SizeInt;
    66 typedef char ** PPChar;
    66 typedef char ** PPChar;
    67 typedef Word* PWord;
    67 typedef Word* PWord;
    68 
    68 
    69 string255 _strconcat(string255 a, string255 b);
    69 string255 _strconcat(string255 a, string255 b);
    70 string255 _strappend(string255 s, char c);
    70 string255 _strappend(string255 s, unsigned char c);
    71 string255 _strprepend(char c, string255 s);
    71 string255 _strprepend(unsigned char c, string255 s);
    72 string255 _chrconcat(char a, char b);
    72 string255 _chrconcat(unsigned char a, unsigned char b);
    73 bool _strcompare(string255 a, string255 b);
    73 bool _strcompare(string255 a, string255 b);
    74 bool _strcomparec(string255 a, char b);
    74 bool _strcomparec(string255 a, unsigned char b);
    75 bool _strncompare(string255 a, string255 b);
    75 bool _strncompare(string255 a, string255 b);
    76 
    76 
    77 
    77 
    78 #define STRINIT(a) {.len = sizeof(a) - 1, .str = a}
    78 #define STRINIT(a) {.len = sizeof(a) - 1, .str = a}
    79 
    79