Branch: Tag:

1997-09-09

1997-09-09 03:36:13 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

foo->bar now finds the right function!

Rev: src/builtin_functions.c:1.43
Rev: src/docode.c:1.21
Rev: src/interpret.c:1.46
Rev: src/las.c:1.37
Rev: src/object.c:1.22
Rev: src/program.c:1.39
Rev: src/program.h:1.19
Rev: src/testsuite.in:1.51

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: las.c,v 1.36 1997/08/30 18:35:37 grubba Exp $"); + RCSID("$Id: las.c,v 1.37 1997/09/09 03:36:11 hubbe Exp $");      #include "language.h"   #include "interpret.h"
412:    copy_shared_string(res->type, ID_FROM_INT(&fake_program, i)->type);       /* FIXME */ -  if(IDENTIFIER_IS_CONSTANT(ID_FROM_INT(&fake_program, i)->flags)) +  if(IDENTIFIER_IS_CONSTANT(ID_FROM_INT(&fake_program, i)->identifier_flags))    {    res->node_info = OPT_EXTERNAL_DEPEND;    }else{
465:    setup_fake_program();    i=ID_FROM_INT(& fake_program, n->u.number);    -  if(IDENTIFIER_IS_CONSTANT(i->flags)) +  if(IDENTIFIER_IS_CONSTANT(i->identifier_flags))    {    push_svalue(PROG_FROM_INT(&fake_program, n->u.number)->constants +    i->func.offset);
1566:    {    struct identifier *id;    id=ID_FROM_INT(CAR(n)->u.sval.u.object->prog, i); -  if(IDENTIFIER_IS_VARIABLE(id->flags)) break; +  if(IDENTIFIER_IS_VARIABLE(id->identifier_flags)) break;    }    ref_push_object(CAR(n)->u.sval.u.object);    ref_push_string(CDR(n)->u.sval.u.string);