Light Your Pipe,

================


launch some 1970's psychedelia and enjoy!

4 comments:

  1. A little hint from anonymous :-)

    > ; secret statement redefining something

    > (+ 2 2)
    5
    > (+ 1 2 3)
    7
    > (+ 0)
    1
    >

    ReplyDelete
  2. You could redefine the println function:

    (define ([println])
    (map print (0 -1 (args)))
    (print (+ 1 ((args) -1)) ))

    (constant 'println [println])

    but I bet you didn't do that...

    ReplyDelete
  3. Using things I learned from this blog:

    (set 't (sym "(+ 2 2)"))
    (set 'i t)
    (set i 5)
    (println i " = " (eval i))

    ReplyDelete
  4. Yap, anonymous, you are right. :-)

    ReplyDelete