diff options
| author | 2022-09-25 22:57:18 +0200 | |
|---|---|---|
| committer | 2022-09-25 22:57:18 +0200 | |
| commit | d86f6ee27f63b120fce952e0905a8c627861ba81 (patch) | |
| tree | 30b2eeb88f5f2838cc8ebc0719c74c11cbf4b3aa /xs.h | |
| parent | Fixed some incorrect allocations. (diff) | |
| download | penes-snac2-d86f6ee27f63b120fce952e0905a8c627861ba81.tar.gz penes-snac2-d86f6ee27f63b120fce952e0905a8c627861ba81.tar.xz penes-snac2-d86f6ee27f63b120fce952e0905a8c627861ba81.zip | |
Backported from xs.
Diffstat (limited to 'xs.h')
| -rw-r--r-- | xs.h | 24 |
1 files changed, 12 insertions, 12 deletions
| @@ -17,10 +17,10 @@ typedef enum { | |||
| 17 | XSTYPE_NULL = 0x18, | 17 | XSTYPE_NULL = 0x18, |
| 18 | XSTYPE_TRUE = 0x06, | 18 | XSTYPE_TRUE = 0x06, |
| 19 | XSTYPE_FALSE = 0x15, | 19 | XSTYPE_FALSE = 0x15, |
| 20 | XSTYPE_SOL = 0x11, | 20 | XSTYPE_LIST = 0x11, |
| 21 | XSTYPE_LITEM = 0x1f, | 21 | XSTYPE_LITEM = 0x1f, |
| 22 | XSTYPE_EOL = 0x12, | 22 | XSTYPE_EOL = 0x12, |
| 23 | XSTYPE_SOD = 0x13, | 23 | XSTYPE_DICT = 0x13, |
| 24 | XSTYPE_DITEM = 0x1e, | 24 | XSTYPE_DITEM = 0x1e, |
| 25 | XSTYPE_EOD = 0x14, | 25 | XSTYPE_EOD = 0x14, |
| 26 | XSTYPE_NUMBER = 0x17, | 26 | XSTYPE_NUMBER = 0x17, |
| @@ -103,9 +103,9 @@ xstype xs_type(const char *data) | |||
| 103 | case XSTYPE_NULL: | 103 | case XSTYPE_NULL: |
| 104 | case XSTYPE_TRUE: | 104 | case XSTYPE_TRUE: |
| 105 | case XSTYPE_FALSE: | 105 | case XSTYPE_FALSE: |
| 106 | case XSTYPE_SOL: | 106 | case XSTYPE_LIST: |
| 107 | case XSTYPE_EOL: | 107 | case XSTYPE_EOL: |
| 108 | case XSTYPE_SOD: | 108 | case XSTYPE_DICT: |
| 109 | case XSTYPE_EOD: | 109 | case XSTYPE_EOD: |
| 110 | case XSTYPE_LITEM: | 110 | case XSTYPE_LITEM: |
| 111 | case XSTYPE_DITEM: | 111 | case XSTYPE_DITEM: |
| @@ -136,19 +136,19 @@ int xs_size(const char *data) | |||
| 136 | len = strlen(data) + 1; | 136 | len = strlen(data) + 1; |
| 137 | break; | 137 | break; |
| 138 | 138 | ||
| 139 | case XSTYPE_SOL: | 139 | case XSTYPE_LIST: |
| 140 | /* look for a balanced EOL */ | 140 | /* look for a balanced EOL */ |
| 141 | do { | 141 | do { |
| 142 | c += data[len] == XSTYPE_SOL ? 1 : data[len] == XSTYPE_EOL ? -1 : 0; | 142 | c += data[len] == XSTYPE_LIST ? 1 : data[len] == XSTYPE_EOL ? -1 : 0; |
| 143 | len++; | 143 | len++; |
| 144 | } while (c); | 144 | } while (c); |
| 145 | 145 | ||
| 146 | break; | 146 | break; |
| 147 | 147 | ||
| 148 | case XSTYPE_SOD: | 148 | case XSTYPE_DICT: |
| 149 | /* look for a balanced EOD */ | 149 | /* look for a balanced EOD */ |
| 150 | do { | 150 | do { |
| 151 | c += data[len] == XSTYPE_SOD ? 1 : data[len] == XSTYPE_EOD ? -1 : 0; | 151 | c += data[len] == XSTYPE_DICT ? 1 : data[len] == XSTYPE_EOD ? -1 : 0; |
| 152 | len++; | 152 | len++; |
| 153 | } while (c); | 153 | } while (c); |
| 154 | 154 | ||
| @@ -397,7 +397,7 @@ d_char *xs_list_new(void) | |||
| 397 | d_char *list; | 397 | d_char *list; |
| 398 | 398 | ||
| 399 | list = malloc(_xs_blk_size(2)); | 399 | list = malloc(_xs_blk_size(2)); |
| 400 | list[0] = XSTYPE_SOL; | 400 | list[0] = XSTYPE_LIST; |
| 401 | list[1] = XSTYPE_EOL; | 401 | list[1] = XSTYPE_EOL; |
| 402 | 402 | ||
| 403 | return list; | 403 | return list; |
| @@ -429,7 +429,7 @@ int xs_list_iter(char **list, char **value) | |||
| 429 | p = *list; | 429 | p = *list; |
| 430 | 430 | ||
| 431 | /* skip a possible start of the list */ | 431 | /* skip a possible start of the list */ |
| 432 | if (*p == XSTYPE_SOL) | 432 | if (*p == XSTYPE_LIST) |
| 433 | p++; | 433 | p++; |
| 434 | 434 | ||
| 435 | /* an element? */ | 435 | /* an element? */ |
| @@ -572,7 +572,7 @@ d_char *xs_dict_new(void) | |||
| 572 | d_char *dict; | 572 | d_char *dict; |
| 573 | 573 | ||
| 574 | dict = malloc(_xs_blk_size(2)); | 574 | dict = malloc(_xs_blk_size(2)); |
| 575 | dict[0] = XSTYPE_SOD; | 575 | dict[0] = XSTYPE_DICT; |
| 576 | dict[1] = XSTYPE_EOD; | 576 | dict[1] = XSTYPE_EOD; |
| 577 | 577 | ||
| 578 | return dict; | 578 | return dict; |
| @@ -606,7 +606,7 @@ int xs_dict_iter(char **dict, char **key, char **value) | |||
| 606 | p = *dict; | 606 | p = *dict; |
| 607 | 607 | ||
| 608 | /* skip a possible start of the list */ | 608 | /* skip a possible start of the list */ |
| 609 | if (*p == XSTYPE_SOD) | 609 | if (*p == XSTYPE_DICT) |
| 610 | p++; | 610 | p++; |
| 611 | 611 | ||
| 612 | /* an element? */ | 612 | /* an element? */ |