re-arranged into libdir and setup with the template Makefile+debian stuff. renabled vv+ and vv- as vvplus and vvminus

svn path=/trunk/externals/smlib/; revision=13158

1 files changed, 0 insertions, 75 deletions

diff --git a/source/vdelta.c b/source/vdelta.c
deleted file mode 100644
index cc809db..0000000
--- a/source/vdelta.c
+++ /dev/null
@@ -1,75 +0,0 @@
-#include "defines.h"

-

-/*--------------- vdelta ----------------------------*/

-/* differences between element in succesive vectors  */

-

-static t_class *vdelta_class;

-

-typedef struct _vdelta

-{

-    t_object x_obj;

-	float m_c_leak;

-	float m_leak;

-	float *m_prev;

-	int m_n;

-} t_vdelta;

-

-

-static void vdelta_perform(t_vdelta *x, t_symbol *s, int argc, t_atom *argv)

-{

-	int i;

-	t_atom *ap,*app;

-	float *fp;

-	float m_leak;

-	float m_c_leak;

-	m_leak=x->m_leak;

-	m_c_leak=x->m_c_leak;

-

-	if (argc!=x->m_n)

-	{

-		int i;

-		if (x->m_prev)

-			freebytes(x->m_prev,x->m_n);

-		x->m_prev=(float*)getbytes(argc*sizeof(float));

-		for(i=0;i<argc;i++)

-			x->m_prev[i]=0.0f;

-		x->m_n=argc;

-	}

-

-	fp=x->m_prev;

-    ap = (t_atom *)getbytes(sizeof(t_atom)*argc);

-	app=ap;

-	for (i = 0; i < argc; i++)

-	{

-		float f=atom_getfloat(argv++);

-		SETFLOAT(app, f-*fp);

-		app++;

-		*fp++=f;

-	}

-	outlet_list(x->x_obj.ob_outlet,gensym("list"),argc,ap);

-    freebytes(ap,argc);

-}

-

-static void *vdelta_new()

-{

-	t_vdelta *x=(t_vdelta *)pd_new(vdelta_class);

-	outlet_new(&x->x_obj, gensym("list"));

-	x->m_n=0;

-	x->m_prev=0;

-	return (void *)x;

-}

-

-static void vdelta_free(t_vdelta *x)

-{

-	freebytes(x->m_prev,x->m_n);

-}

-

-void vdelta_setup(void)

-{

-    vdelta_class = class_new(gensym("vdelta"),

-    	(t_newmethod)vdelta_new, (t_method)vdelta_free,

-		sizeof(t_vdelta), 

-		CLASS_DEFAULT,

-	    0);

-    class_addlist(vdelta_class, (t_method)vdelta_perform);

-}