Branch: Tag:

2001-06-08

2001-06-08 21:06:06 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Bugfix.

Rev: src/interpret.c:1.203

5:   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.202 2001/06/08 16:25:48 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.203 2001/06/08 21:06:06 grubba Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
1655:    (i = find_identifier(fun, compat->prog)) != -1) {    safe_apply_low(compat, i, args);    } else { -  SAFE_APPLY_MASTER(fun, args); +  struct object *master_obj = master(); +  i = find_identifier(fun, master_obj->prog); +  safe_apply_low(master_obj, i, args);    }   }