aboutsummaryrefslogtreecommitdiff
path: root/desiredata/src/kernel.c
diff options
context:
space:
mode:
authorN.N. <matju@users.sourceforge.net>2009-05-29 00:13:55 +0000
committerN.N. <matju@users.sourceforge.net>2009-05-29 00:13:55 +0000
commit79b1d181c50174936a7e69da0142d1417d2e402e (patch)
treea266ee4797c5cac711920745612c4a95455235ba /desiredata/src/kernel.c
parente393ca104ab104dbe597c5ba74776f5b37d16efb (diff)
can now load zexy (re: class_new can take null as a t_symbol*
svn path=/trunk/; revision=11554
Diffstat (limited to 'desiredata/src/kernel.c')
-rw-r--r--desiredata/src/kernel.c10
1 files changed, 4 insertions, 6 deletions
diff --git a/desiredata/src/kernel.c b/desiredata/src/kernel.c
index a4d64167..99e1209a 100644
--- a/desiredata/src/kernel.c
+++ b/desiredata/src/kernel.c
@@ -901,7 +901,7 @@ t_symbol *qualified_name(t_symbol *s) {
find out how this is handled. */
t_class *class_new2(const char *ss, t_newmethod newmethod, t_method freemethod,
size_t size, int flags, const char *sig) {
- t_symbol *s = gensym(ss);
+ t_symbol *s = ss?gensym(ss):0;
int typeflag = flags & CLASS_TYPEMASK;
if (!typeflag) typeflag = CLASS_PATCHABLE;
#ifdef QUALIFIED_NAME
@@ -941,10 +941,8 @@ size_t size, int flags, const char *sig) {
c->externdir = class_extern_dir;
c->savefn = (typeflag == CLASS_PATCHABLE ? text_save : class_nosavefn);
#ifdef QUALIFIED_NAME
- c->helpname = gensym(ss);
// like a class_addcreator
- if (pd_library_name && newmethod)
- class_addmethod2(pd_objectmaker._class, (t_method)newmethod, ss, sig);
+ if (pd_library_name && newmethod) class_addmethod2(pd_objectmaker._class, (t_method)newmethod, ss, sig);
#endif
c->onsubscribe = gobj_onsubscribe;
class_table->set(c->name, c);
@@ -1024,10 +1022,10 @@ phooey:
*f=0; va_end(ap);
t_class *class_new(t_symbol *s, t_newmethod newmethod, t_method freemethod, size_t size, int flags, t_atomtypearg arg1, ...) {
- COMMON(0); return class_new2(s->name,newmethod,freemethod,size,flags,fmt);
+ COMMON(0); return class_new2(s?s->name:0,newmethod,freemethod,size,flags,fmt);
}
void class_addcreator(t_newmethod newmethod, t_symbol *s, t_atomtypearg arg1, ...) {
- COMMON(); class_addcreator2(s->name,newmethod,fmt);
+ COMMON(); class_addcreator2(s?s->name:0,newmethod,fmt);
}
void class_addmethod(t_class *c, t_method fn, t_symbol *sel, t_atomtypearg arg1, ...) {
COMMON(); class_addmethod2(c,fn,sel->name,fmt);