Difference between revisions of "Unix tools/yes"

Latest revision as of 03:24, 26 April 2021

A simple utility to repeatedly print "y" to standard output.

Here are some various ways this small program can be written:

main = let y = putStrLn "y" >> y in y

main = putStrLn $ concat $ repeat "y\n"

main = let y = 'y' : '\n' : y in putStrLn y

main = putStrLn "y" >> main

main = putStrLn $ cycle "y\n"

@@ Line 1: / Line 1: @@
 == yes ==
-A simple utility to repeatedly print y to standard out.
+A simple utility to repeatedly print <code>"y"</code> to standard output.
+Here are some various ways this small program can be written:
-<haskell>
-  main = let y = putStrLn "y" >> y in y
+{|
+|<haskell>
+main = let y = putStrLn "y" >> y in y
+</haskell>
+|}
+{|
+|<haskell>
+main = putStrLn $ concat $ repeat "y\n"
+</haskell>
+|}
+{|
+|<haskell>
+main = let y = 'y' : '\n' : y in putStrLn y
+</haskell>
+|}
+{|
+|<haskell>
+main = putStrLn "y" >> main
+</haskell>
+|}
+{|
+|<haskell>
+main = putStrLn $ cycle "y\n"
 </haskell>
+|}