pike.git/ src/ language.yacc

1999-10-10

1999-10-10 00:49:15 by Fredrik Noring <noring@nocrew.org>

• ee2f2059addea72d2324d993736eb10f636ed6d2 (23 lines) (+13/-10) ^{[ Show | Annotate ]}
  Branch: 7.9

gauge now returns the number of seconds as a float.

Rev: lib/modules/LR.pmod/parser.pike:1.20
Rev: src/language.yacc:1.126
Rev: src/testsuite.in:1.201
Rev: tutorial/tutorial.wmml:1.158

182:   /* This is the grammar definition of Pike. */      #include "global.h" - RCSID("$Id: language.yacc,v 1.125 1999/10/09 23:28:58 hubbe Exp $"); + RCSID("$Id: language.yacc,v 1.126 1999/10/10 00:49:12 noring Exp $");   #ifdef HAVE_MEMORY_H   #include <memory.h>   #endif
1830:   gauge: F_GAUGE catch_arg    {   #ifdef HAVE_GETHRVTIME -  $$=mkopernode("`-", +  $$=mkefuncallnode("abs",    mkopernode("`/",    mkopernode("`-", mkefuncallnode("gethrvtime",0),    mknode(F_ARG_LIST,$2,    mkefuncallnode("gethrvtime",0))), -  mkintnode(1000)), 0); +  mkfloatnode((FLOAT_TYPE)1000000.0)));   #else -  $$=mkopernode("`-", +  $$=mkefuncallnode("abs", +  mkopernode("`/",    mkopernode("`-",    mknode(F_INDEX,mkefuncallnode("rusage",0),    mkintnode(GAUGE_RUSAGE_INDEX)),    mknode(F_ARG_LIST,$2,    mknode(F_INDEX,mkefuncallnode("rusage",0), -  mkintnode(GAUGE_RUSAGE_INDEX)))),0); +  mkintnode(GAUGE_RUSAGE_INDEX)))), +  mkfloatnode((FLOAT_TYPE)1000.0)));   #endif    };