summaryrefslogtreecommitdiff
path: root/xs.h
diff options
context:
space:
mode:
authorGravatar default2022-09-25 22:57:18 +0200
committerGravatar default2022-09-25 22:57:18 +0200
commitd86f6ee27f63b120fce952e0905a8c627861ba81 (patch)
tree30b2eeb88f5f2838cc8ebc0719c74c11cbf4b3aa /xs.h
parentFixed some incorrect allocations. (diff)
downloadpenes-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.h24
1 files changed, 12 insertions, 12 deletions
diff --git a/xs.h b/xs.h
index 3562070..8205b98 100644
--- a/xs.h
+++ b/xs.h
@@ -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? */