Commit 1ae6ddc0 authored by Albert Gräf's avatar Albert Gräf
Browse files

Backport rev. 5a58ca2b by msp from vanilla: patch 1990599 - allow recursive...

Backport rev. 5a58ca2b by msp from vanilla: patch 1990599 - allow recursive calls of new_anything().
parent 63a5ae55
......@@ -599,6 +599,7 @@ static t_symbol *addfileextent(t_symbol *s)
return (gensym(namebuf));
}
#define MAXOBJDEPTH 1000
static int tryingalready;
void canvas_popabstraction(t_canvas *x);
......@@ -613,14 +614,17 @@ int pd_setloadingabstraction(t_symbol *sym);
doesn't know. Pd tries to load it as an extern, then as an abstraction. */
void new_anything(void *dummy, t_symbol *s, int argc, t_atom *argv)
{
if (tryingalready) return;
if (tryingalready>MAXOBJDEPTH){
error("maximum object loading depth %d reached", MAXOBJDEPTH);
return;
}
newest = 0;
class_loadsym = s;
if (sys_load_lib(canvas_getcurrent(), s->s_name))
{
tryingalready = 1;
tryingalready++;
typedmess(dummy, s, argc, argv);
tryingalready = 0;
tryingalready--;
return;
}
class_loadsym = 0;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment