2013-10-10 03:15:41 -04:00
|
|
|
#ifndef PICRIN_H__
|
|
|
|
#define PICRIN_H__
|
|
|
|
|
2013-10-10 04:54:35 -04:00
|
|
|
#include <stddef.h>
|
|
|
|
|
2013-10-10 03:34:24 -04:00
|
|
|
#include "picrin/value.h"
|
|
|
|
|
2013-10-10 03:15:41 -04:00
|
|
|
typedef struct {
|
|
|
|
} pic_state;
|
|
|
|
|
2013-10-10 03:44:51 -04:00
|
|
|
void *pic_alloc(pic_state *, size_t);
|
|
|
|
struct pic_object *pic_gc_alloc(pic_state *, size_t, enum pic_tt);
|
|
|
|
void pic_free(pic_state *, void *);
|
|
|
|
|
2013-10-10 03:15:41 -04:00
|
|
|
pic_state *pic_open();
|
2013-10-10 03:19:10 -04:00
|
|
|
void pic_close(pic_state *);
|
2013-10-10 03:15:41 -04:00
|
|
|
|
2013-10-10 04:22:25 -04:00
|
|
|
pic_value pic_cons(pic_state *, pic_value, pic_value);
|
|
|
|
pic_value pic_car(pic_state *, pic_value);
|
|
|
|
pic_value pic_cdr(pic_state *, pic_value);
|
|
|
|
|
|
|
|
pic_value pic_intern_cstr(pic_state *, const char *);
|
2013-10-10 04:06:26 -04:00
|
|
|
|
2013-10-11 02:18:37 -04:00
|
|
|
pic_value pic_parse(pic_state *, const char *);
|
|
|
|
|
2013-10-10 04:48:01 -04:00
|
|
|
void pic_debug(pic_state *, pic_value);
|
|
|
|
|
2013-10-10 03:15:41 -04:00
|
|
|
#endif
|