Nested function: Difference between revisions

m
→‎{{header|Haskell}}: Added a variant.
(Add Ecstasy example)
m (→‎{{header|Haskell}}: Added a variant.)
Line 823:
main :: IO ()
main = putStr $ makeList ". "</syntaxhighlight>
 
 
Or, importing a little less heavy machinery:
<syntaxhighlight lang="haskell">makeList :: String -> String
makeList separator =
let makeItem = (<>) . (<> separator) . show
in unlines $ zipWith makeItem [1 ..] ["First", "Second", "Third"]
 
main :: IO ()
main = putStrLn $ makeList ". "</syntaxhighlight>
{{Out}}
<pre>1. First
2. Second
3. Third</pre>
 
=={{header|Io}}==
9,655

edits