Oops, I put "sierpinsky", not "sierpinski". So much for spelling. With that typo fixed, clisp should work. On Jul 19, 2011, at 1:53 AM, Joerg Arndt <arndt@jjj.de> wrote:
* Robert Smith <quadricode@gmail.com> [Jul 19. 2011 08:47]:
Silly Mr. Arndt, the proper de-obfuscation is clearly this:
(defun sierpinski (n) (do ((r n (1- r))) ((minusp r)) (princ (make-string (1+ r) :initial-element #\space)) (dotimes (c (- n r) (terpri)) (format t "~:[ #~; `~]" (zerop (logand c r))))))
(sierpinsky 32)
;-)
(eval (stupidp (me (how-could ((miss that) self)))))
8-))
Seriously, how to I run that code? % clisp lisp-obf.el *** - EVAL: undefined function SIERPINSKY
And emacs, upon M-x eval-buffer, says: call-interactively: Invalid read syntax: "#"
Sincerely yours,
Robert Smith
[...]
_______________________________________________ math-fun mailing list math-fun@mailman.xmission.com http://mailman.xmission.com/cgi-bin/mailman/listinfo/math-fun