blob: 7463fe79d5c4985f74720e8b4a7e189037b6424b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
import unittest
from crowbar_reference_compiler import parse_header, parse_implementation, scan
class TestParsing(unittest.TestCase):
def test_basic(self):
print(parse_header(scan("int8 x();")))
def test_scdoc_str(self):
# adapted from https://git.sr.ht/~sircmpwn/scdoc/tree/master/include/str.h
print(parse_header(scan(r"""
struct str {
(uint8[size])* str;
uintsize len;
uintsize size;
}
struct str *str_create();
void str_free(struct str *str);
void str_reset(struct str *str);
intsize str_append_ch(struct str *str, uint32 ch);
""")))
# adapted from https://git.sr.ht/~sircmpwn/scdoc/tree/master/src/string.c
print(parse_implementation(scan(r"""
include "stdlib.hro";
include "stdint.hro";
include "str.hro";
include "unicode.hro";
bool ensure_capacity(struct str *str, intsize len) {
if (len + 1 >= str->size) {
(uint8[str->size * 2])* new = realloc(str->str, str->size * 2);
if (!new) {
return false;
}
str->str = new;
str->size *= 2;
}
return true;
}
struct str *str_create() {
struct str *str = calloc(1, sizeof(struct str));
str->str = malloc(16);
str->size = 16;
str->len = 0;
str->str[0] = '\0';
return str;
}
void str_free(struct str *str) {
if (!str) {
return;
}
free(str->str);
free(str);
}
intsize str_append_ch(struct str *str, uint32 ch) {
intsize size = utf8_chsize(ch);
if (size <= 0) {
return -1;
}
if (!ensure_capacity(str, str->len + size)) {
return -1;
}
utf8_encode(&str->str[str->len], ch);
str->len += size;
str->str[str->len] = '\0';
return size;
}
""")))
|
