Fix comments in seed()

private-msgid: 199704141758.TAA06895@bombur2.uio.no

diff --git a/pp.c b/pp.c
index 357f91e..4effd28 100644 (file)
--- a/pp.c
+++ b/pp.c
@@ -1392,9 +1392,10 @@ seed()
     U32 u;
 #ifdef VMS
 #  include <starlet.h>
+    /* when[] = (low 32 bits, high 32 bits) of time since epoch
+     * in 100-ns units, typically incremented ever 10 ms.        */
     unsigned int when[2];
     _ckvmssts(sys$gettim(when));
-    /* Please tell us:  Which value is seconds and what is the other here? */
     u = (U32)SEED_C1 * when[0] + (U32)SEED_C2 * when[1];
 #else
 #  ifdef HAS_GETTIMEOFDAY