From db7c129e717fdffbacef1d6448fbc40b49cd2c52 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Tue, 5 Aug 2014 12:05:18 +0900
Subject: [PATCH] s/pic_record_record/pic_record_make_record/g

---
 src/record.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/record.c b/src/record.c
index 8412c874..158aafc2 100644
--- a/src/record.c
+++ b/src/record.c
@@ -47,7 +47,7 @@ pic_record_set(pic_state *pic, struct pic_record *rec, pic_sym slotname, pic_val
 }
 
 static pic_value
-pic_record_record(pic_state *pic)
+pic_record_make_record(pic_state *pic)
 {
   struct pic_record * rec;
   pic_value rectype;
@@ -109,7 +109,7 @@ void
 pic_init_record(pic_state *pic)
 {
   pic_deflibrary (pic, "(picrin record)") {
-    pic_defun(pic, "make-record", pic_record_record);
+    pic_defun(pic, "make-record", pic_record_make_record);
     pic_defun(pic, "record?", pic_record_record_p);
     pic_defun(pic, "record-of?", pic_record_record_of);
     pic_defun(pic, "record-ref", pic_record_record_ref);