Sunday, June 27, 2010

A Couple of Haskell Quines

A simple little quine. A quaint quine.
main=let q x=putStr x>>print x in q"main=let q x=putStr x>>print x in q"
view raw basicquine.hs hosted with ❤ by GitHub

Fancier applicative version, because it's more hardcore.
import Control.Applicative;main=liftA2(>>)putStr print"import Control.Applicative;main=liftA2(>>)putStr print"
view raw fancyapplicativequine.hs hosted with ❤ by GitHub
Posted by at
Labels:

1 comment:

  1. BerengalJune 27, 2010 at 10:22 AM

    import Control.Applicative;main=putStrLn$((++)<*>show)"import Control.Applicative;main=putStrLn$((++)<*>show)"

    ReplyDelete

Subscribe to: Post Comments (Atom)