BeOS has times() tick of 1000000, not CLK_TCK (1000)

(this showed up in Benchmark.t)

p4raw-id: //depot/perl@13896

diff --git a/pp_sys.c b/pp_sys.c
index 771f913..a8a60bb 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -4312,6 +4312,10 @@ PP(pp_time)
    it's supported.    --AD  9/96.
 */
 
+#ifdef __BEOS__
+#  define HZ 1000000
+#endif
+
 #ifndef HZ
 #  ifdef CLK_TCK
 #    define HZ CLK_TCK