Function: hanoi-unix-64

hanoi-unix-64 is an autoloaded, interactive and byte-compiled function defined in hanoi.el.gz.

Signature

(hanoi-unix-64)

Documentation

Like hanoi-unix, but with a 64-bit clock.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/play/hanoi.el.gz
;;;###autoload
(defun hanoi-unix-64 ()
  "Like `hanoi-unix', but with a 64-bit clock."
  (interactive)
  (let* ((start (time-convert nil 'integer))
	 (bits (nreverse (cl-loop repeat 64
				  for x = start then (ash x -1)
				  collect (logand x 1))))
	 (hanoi-move-period 1))
    (hanoi-internal 64 bits start)))