Welcome to the CHICKEN Scheme pasting service

no title added by anonymous on Sun Feb 10 19:19:01 2013

cpu-peg.scm:
-----
(use srfi-27 entropy-unix)

(define (make-secret-generator)
  (let ((source (make-entropy-source-urandom-device)))
    (lambda (byte-width)
       (entropy-source-u8vector source byte-width))))

((make-secret-generator) 12)

-----

csi -n cpu-peg.scm &
top

-----

Wait for a minute or so. Eventually csi takes up 99.9% of CPU.
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Name of the CHICKEN extension manager:
Visually impaired? Let me spell it for you (wav file) download WAV