mirror of https://github.com/janet-lang/janet
20 lines
395 B
C
20 lines
395 B
C
#include "unit.h"
|
|
#include <dst/dst.h>
|
|
|
|
int main() {
|
|
DstParseResult pres;
|
|
const uint8_t *str;
|
|
|
|
dst_init();
|
|
|
|
pres = dst_parsec("'(+ 1 () [] 3 5 :hello \"hi\\h41\")");
|
|
|
|
assert(pres.status == DST_PARSE_OK);
|
|
assert(dst_checktype(pres.value, DST_TUPLE));
|
|
|
|
str = dst_to_string(pres.value);
|
|
printf("%.*s\n", dst_string_length(str), (const char *) str);
|
|
|
|
return 0;
|
|
}
|