Branch: Tag:

1998-01-23

1998-01-23 01:20:05 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

tailrecurse fixed

Rev: src/interpret.c:1.59

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.58 1998/01/14 07:53:52 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.59 1998/01/23 01:20:05 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
1627:    if(function->func.offset == -1)    error("Calling undefined function '%s'.\n",function->name->str);    +  tailrecurse=-1;    switch(function->identifier_flags & (IDENTIFIER_FUNCTION | IDENTIFIER_CONSTANT))    {    case IDENTIFIER_C_FUNCTION: