From 319db5fc9f20a82044ae1623a0fd9f226e204ae5 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sun, 21 Sep 2014 18:05:43 +0900
Subject: [PATCH] remove unused helper functions

---
 blob.c           | 17 -----------------
 include/picrin.h |  3 ---
 2 files changed, 20 deletions(-)

diff --git a/blob.c b/blob.c
index a8f28c9b..d8fded8c 100644
--- a/blob.c
+++ b/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)
 {
diff --git a/include/picrin.h b/include/picrin.h
index b00e451d..f418cf47 100644
--- a/include/picrin.h
+++ b/include/picrin.h
@@ -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 *);