Re: [PATCH] 5.004_04 or 5.004_64: Benchmark.pm: add run-for-some-time
[p5sagit/p5-mst-13.2.git] / intrpvar.h
index b724e41..59f7e09 100644 (file)
@@ -51,7 +51,7 @@ PERLVAR(Istatusvalue, I32)            /* $? */
 PERLVAR(Istatusvalue_vms,      U32)            
 #endif
 
-PERLVAR(Istatcache,    struct stat)    /* _ */
+PERLVAR(Istatcache,    Stat_t) /* _ */
 PERLVAR(Istatgv,       GV *)           
 PERLVARI(Istatname,    SV *,   Nullsv) 
 
@@ -138,8 +138,6 @@ PERLVAR(Isortcop,   OP *)           /* user defined sort routine */
 PERLVAR(Isortstash,    HV *)           /* which is in some package or other */
 PERLVAR(Ifirstgv,      GV *)           /* $a */
 PERLVAR(Isecondgv,     GV *)           /* $b */
-PERLVAR(Isortstack,    AV *)           /* temp stack during pp_sort() */
-PERLVAR(Isignalstack,  AV *)           /* temp stack during sighandler() */
 PERLVAR(Imystrk,       SV *)           /* temp key string for do_each() */
 PERLVAR(Idumplvl,      I32)            /* indentation level on syntax tree dump */
 PERLVAR(Ioldlastpm,    PMOP *)         /* for saving regexp context during debugger */
@@ -156,4 +154,5 @@ PERLVAR(Iofmt,              char *)         /* $# */
 
 #ifdef USE_THREADS
 PERLVAR(Ithrsv,                SV *)           /* holds struct perl_thread for main thread */
+PERLVARI(Ithreadnum,   U32,    0)      /* incremented each thread creation */
 #endif /* USE_THREADS */