begin work on strings
This commit is contained in:
parent
83fce46449
commit
91714d1025
7 changed files with 32 additions and 1 deletions
|
|
@ -38,6 +38,11 @@ typedef struct Sy {
|
|||
U8 *data;
|
||||
} Sy;
|
||||
|
||||
typedef struct Ss {
|
||||
Z len;
|
||||
char data[];
|
||||
} Ss;
|
||||
|
||||
// Closure
|
||||
typedef struct Cl {
|
||||
O args, body, env;
|
||||
|
|
@ -73,6 +78,7 @@ enum {
|
|||
TYPE_SYM = 2,
|
||||
TYPE_PRIM = 4,
|
||||
TYPE_PAIR,
|
||||
TYPE_STR,
|
||||
TYPE_CLOS,
|
||||
TYPE_MAC,
|
||||
TYPE_FWD,
|
||||
|
|
@ -197,6 +203,8 @@ O pair_make(In *in, O head, O tail);
|
|||
// Unwrap a pair
|
||||
Pa *pair_unwrap(O obj);
|
||||
|
||||
O string_make(In *in, const char *cstr, I len);
|
||||
|
||||
V print(O obj);
|
||||
V println(O obj);
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue