Skip to content

Instantly share code, notes, and snippets.

@jainmickey

jainmickey/quine.hs

Forked from jgoosey/quine.hs
Created May 24, 2013 17:40
Show Gist options
  • Save jainmickey/5645193 to your computer and use it in GitHub Desktop.
Save jainmickey/5645193 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
quine.hs
--Haskell Quine
--Implementation 1
import Control.Monad
import Control.Monad.Instances
main = (putStr . ap (++) show)
"--Haskell Quine\n--Implementation 1\nimport Control.Monad\nimport Control.Monad.Instances\nmain = (putStr . ap (++) show) "
--Implementation 2
--main = putStrLn (s ++ show s) where s =
-- "--Haskell Quine\n--Implementation 2\nmain = putStrLn (s ++ show s) where s ="
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment