remove unused helper functions
This commit is contained in:
parent
1c2af96340
commit
319db5fc9f
17
blob.c
17
blob.c
|
@ -8,23 +8,6 @@
|
|||
#include "picrin/blob.h"
|
||||
#include "picrin/pair.h"
|
||||
|
||||
char *
|
||||
pic_strndup(pic_state *pic, const char *s, size_t n)
|
||||
{
|
||||
char *r;
|
||||
|
||||
r = pic_alloc(pic, n + 1);
|
||||
memcpy(r, s, n);
|
||||
r[n] = '\0';
|
||||
return r;
|
||||
}
|
||||
|
||||
char *
|
||||
pic_strdup(pic_state *pic, const char *s)
|
||||
{
|
||||
return pic_strndup(pic, s, strlen(s));
|
||||
}
|
||||
|
||||
struct pic_blob *
|
||||
pic_make_blob(pic_state *pic, size_t len)
|
||||
{
|
||||
|
|
|
@ -170,9 +170,6 @@ pic_sym pic_gensym(pic_state *, pic_sym);
|
|||
pic_sym pic_ungensym(pic_state *, pic_sym);
|
||||
bool pic_interned_p(pic_state *, pic_sym);
|
||||
|
||||
char *pic_strdup(pic_state *, const char *);
|
||||
char *pic_strndup(pic_state *, const char *, size_t);
|
||||
|
||||
pic_value pic_read(pic_state *, struct pic_port *);
|
||||
pic_value pic_read_cstr(pic_state *, const char *);
|
||||
|
||||
|
|
Loading…
Reference in New Issue