From 0c343f4f8d1e7ec4a950def98c41e8892e62caee Mon Sep 17 00:00:00 2001
From: Jonathan Wilkes <jon.w.wilkes@gmail.com>
Date: Fri, 16 Feb 2018 11:47:03 -0500
Subject: [PATCH] remove unused var and unused fn addfileextent

---
 pd/src/g_clone.c |  4 ++--
 pd/src/m_class.c | 10 ----------
 2 files changed, 2 insertions(+), 12 deletions(-)

diff --git a/pd/src/g_clone.c b/pd/src/g_clone.c
index 7ef9cd49f..ade8cddd5 100644
--- a/pd/src/g_clone.c
+++ b/pd/src/g_clone.c
@@ -125,7 +125,7 @@ static void clone_in_set(t_in *x, t_floatarg f)
 
 static void clone_in_all(t_in *x, t_symbol *s, int argc, t_atom *argv)
 {
-    int phasewas = x->i_owner->x_phase, i;
+    int i;
     for (i = 0; i < x->i_owner->x_n; i++)
     {
         x->i_owner->x_phase = i;
@@ -145,7 +145,7 @@ static void clone_in_vis(t_in *x, t_floatarg fn, t_floatarg vis)
 
 static void clone_out_anything(t_out *x, t_symbol *s, int argc, t_atom *argv)
 {
-    t_atom *outv, *ap;
+    t_atom *outv;
     int first =
         1 + (s != &s_list && s != &s_float && s != &s_symbol && s != &s_bang),
             outc = argc + first;
diff --git a/pd/src/m_class.c b/pd/src/m_class.c
index 00e828782..a9ed52ad9 100644
--- a/pd/src/m_class.c
+++ b/pd/src/m_class.c
@@ -601,16 +601,6 @@ t_symbol *gensym(const char *s)
     return(dogensym(s, 0));
 }
 
-static t_symbol *addfileextent(t_symbol *s)
-{
-    char namebuf[FILENAME_MAX], *str = s->s_name;
-    int ln = strlen(str);
-    if (!strcmp(str + ln - 3, ".pd")) return (s);
-    strcpy(namebuf, str);
-    strcpy(namebuf+ln, ".pd");
-    return (gensym(namebuf));
-}
-
 #define MAXOBJDEPTH 1000
 static int tryingalready;
 
-- 
GitLab