From 103d89664441e690a24c6fc95b582d1becdda2de Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 13 Sep 1999 15:19:15 -0700
Subject: [PATCH] small optimization

Rev: lib/modules/Crypto/randomness.pmod:1.12
---
 lib/modules/Crypto/randomness.pmod | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/lib/modules/Crypto/randomness.pmod b/lib/modules/Crypto/randomness.pmod
index 7a6f3e7a71..06baaaa5dc 100644
--- a/lib/modules/Crypto/randomness.pmod
+++ b/lib/modules/Crypto/randomness.pmod
@@ -1,4 +1,4 @@
-/* $Id: randomness.pmod,v 1.11 1999/08/25 17:32:54 grubba Exp $
+/* $Id: randomness.pmod,v 1.12 1999/09/13 22:19:15 hubbe Exp $
  */
 
 //! module Crypto
@@ -82,8 +82,19 @@ class pike_random {
   //!	Returns a string of length len with pseudo random values.
   string read(int len)
   {
+#if 1 // 30% optimization /Hubbe
+    string ret="";
+    if(len>=16384)
+    {
+      array x=allocate(16384,random);
+      for(int e=0;e<(len/16384);e++) ret+=(string)x(256);
+    }
+    ret+=(string)allocate(len % 16384, random)(256);
+    return ret;
+#else
     if (len > 16384) return read(len/2)+read(len-len/2);
     return (string)allocate(len, random)(256);
+#endif
   }
 }
 
-- 
GitLab