diff options
| author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2012-09-26 03:18:36 +0000 |
|---|---|---|
| committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2012-09-26 03:18:36 +0000 |
| commit | b843f7f9aa9867e9912164a86868b633b554efbb (patch) | |
| tree | 029c7208792d636d6b5150009e5015c81e877b50 /strlen | |
| parent | c2fcda154f1f6775db689fe612e58e3589717a1f (diff) | |
fix typo in #includeHEADsvn2git-headexternals/jasch_lib
svn path=/trunk/externals/jasch_lib/; revision=16298
Diffstat (limited to 'strlen')
| -rw-r--r-- | strlen/strlen.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/strlen/strlen.c b/strlen/strlen.c index 67aab65..87e09eb 100644 --- a/strlen/strlen.c +++ b/strlen/strlen.c @@ -1 +1 @@ -/*__________________________________________________________________________
strlen á strlen c-string function
Copyright (C) 2003 jan schacher
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
initial build 20030507
____________________________________________________________________________*/
#include "m_pd.h"
#include <strings.h>
typedef struct strlen
{
t_object ob;
void *s_outlet;
float s_length;
} t_strlen;
void *strlen_class;
void *strlen_new(t_symbol *s, long n);
void strlen_anything(t_strlen *x, t_symbol *s, long argc, t_atom *argv);
void strlen_free(t_strlen *x);
void strlen_setup(void)
{
strlen_class = class_new(gensym("strlen"), (t_newmethod)strlen_new,
(t_method)strlen_free, sizeof(t_strlen), 0, A_GIMME, 0);
class_addsymbol(strlen_class, (t_method)strlen_anything);
post(". strlen . jasch . "__DATE__" ",0);
}
void *strlen_new(t_symbol *s, long n)
{
t_strlen *x;
x = (t_strlen *)pd_new(strlen_class);
x->s_outlet = outlet_new(&x->ob, gensym("float"));
return (x);
}
void strlen_anything(t_strlen *x, t_symbol *s, long argc, t_atom *argv)
{
x->s_length = strlen(s->s_name);
outlet_float(x->s_outlet,x->s_length);
}
void strlen_free(t_strlen *x)
{
// notify_free((t_object *)x);
}
\ No newline at end of file +/*__________________________________________________________________________
strlen á strlen c-string function
Copyright (C) 2003 jan schacher
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
initial build 20030507
____________________________________________________________________________*/
#include "m_pd.h"
#include <string.h>
typedef struct strlen
{
t_object ob;
void *s_outlet;
float s_length;
} t_strlen;
void *strlen_class;
void *strlen_new(t_symbol *s, long n);
void strlen_anything(t_strlen *x, t_symbol *s, long argc, t_atom *argv);
void strlen_free(t_strlen *x);
void strlen_setup(void)
{
strlen_class = class_new(gensym("strlen"), (t_newmethod)strlen_new,
(t_method)strlen_free, sizeof(t_strlen), 0, A_GIMME, 0);
class_addsymbol(strlen_class, (t_method)strlen_anything);
post(". strlen . jasch . "__DATE__" ",0);
}
void *strlen_new(t_symbol *s, long n)
{
t_strlen *x;
x = (t_strlen *)pd_new(strlen_class);
x->s_outlet = outlet_new(&x->ob, gensym("float"));
return (x);
}
void strlen_anything(t_strlen *x, t_symbol *s, long argc, t_atom *argv)
{
x->s_length = strlen(s->s_name);
outlet_float(x->s_outlet,x->s_length);
}
void strlen_free(t_strlen *x)
{
// notify_free((t_object *)x);
}
\ No newline at end of file |