Branch: Tag:

2000-03-09

2000-03-09 15:19:05 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Moved handling of this_program to before the import lookup.

Rev: src/program.c:1.211

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.210 2000/03/09 15:02:27 grubba Exp $"); + RCSID("$Id: program.c,v 1.211 2000/03/09 15:19:05 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
387:    }    }    +  /* Handle this_program */ +  if (ident == this_program_string) { +  struct svalue s; +  s.type=T_PROGRAM; +  s.u.program=new_program; +  return mkconstantsvaluenode(&s); +  }       if(resolve_cache)    {
437:    if(ret) return ret;    }    -  /* Handle this_program */ -  if (ident == this_program_string) { -  struct svalue s; -  s.type=T_PROGRAM; -  s.u.program=new_program; -  return mkconstantsvaluenode(&s); -  } -  +     return 0;   }