pike.git / src / language.yacc

version» Context lines:

pike.git/src/language.yacc:164:   %left F_LSH F_RSH   %left '+' '-'   %left '*' '%' '/'   %right F_NOT '~'   %nonassoc F_INC F_DEC      %{   /* This is the grammar definition of Pike. */      #include "global.h" - RCSID("$Id: language.yacc,v 1.86 1998/04/20 02:35:28 hubbe Exp $"); + RCSID("$Id: language.yacc,v 1.87 1998/04/20 18:43:52 grubba Exp $");   #ifdef HAVE_MEMORY_H   #include <memory.h>   #endif      #include "interpret.h"   #include "array.h"   #include "object.h"   #include "stralloc.h"   #include "las.h"   #include "interpret.h"
pike.git/src/language.yacc:1480:    $$=index_node($1, $3->u.sval.u.string);    free_node($1);    if(last_identifier) free_string(last_identifier);    copy_shared_string(last_identifier, $3->u.sval.u.string);    free_node($3);    }    | '.' F_IDENTIFIER    {    node *tmp;    push_text("."); -  ref_push_string(lex.current_line); +  ref_push_string(lex.current_file);    SAFE_APPLY_MASTER("handle_import",2);    tmp=mkconstantsvaluenode(sp-1);    pop_stack();    $$=index_node(tmp, $2->u.sval.u.string);    free_node(tmp);    if(last_identifier) free_string(last_identifier);    copy_shared_string(last_identifier, $2->u.sval.u.string);    free_node($2);    }    | idents '.' bad_identifier {}