pike.git/ src/ las.c

1997-01-27

1997-01-27 01:19:01 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 45e8a8ea8b91ca36f02f4ef2215fa5198760ffb4 (18 lines) (+7/-11) ^{[ Show | Annotate ]}
  Branch: 7.9

constants are now in an automaticallu used module

Rev: src/language.yacc:1.19
Rev: src/las.c:1.14

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: las.c,v 1.13 1997/01/22 05:19:45 hubbe Exp $"); + RCSID("$Id: las.c,v 1.14 1997/01/27 01:19:01 hubbe Exp $");      #include "language.h"   #include "interpret.h"
363:      node *mkefuncallnode(char *function, node *args)   { -  struct efun *fun; +     struct pike_string *name; -  +  node *n;    name = findstring(function); -  if(!name) +  if(!name || !find_module_identifier(name))    {    my_yyerror("Internally used efun undefined: %s",function);    return mkintnode(0);    } -  -  fun = lookup_efun(name); -  if(!fun) -  { -  my_yyerror("Internally used efun undefined: %s",function); -  return mkintnode(0); +  n=mkapplynode(mksvaluenode(sp-1), args); +  pop_stack(); +  return n;   } -  return mkapplynode(mksvaluenode(&fun->function), args); - } +       node *mkopernode(char *oper_id, node *arg1, node *arg2)   {