User:Ashley Y
From HaskellWiki
(Difference between revisions)
(→Haskell) |
(→Haskell) |
||
| Line 15: | Line 15: | ||
<haskell> | <haskell> | ||
| - | foo :: (Monad m) -> m Int | + | {- |
| - | foo = x where | + | My program |
| + | -} | ||
| + | |||
| + | import Foreign.C | ||
| + | |||
| + | foo :: (Monad m) -> m (Int,Int) | ||
| + | foo = (x-2,x + 1) where | ||
x = 3 | x = 3 | ||
| Line 23: | Line 29: | ||
main = do | main = do | ||
a <- foo | a <- foo | ||
| - | putStr ("And the answer is: " ++(show | + | putStr ("And the answer is: " ++(show (fst a))++"\n") |
</haskell> | </haskell> | ||
Revision as of 20:35, 7 March 2006
Ashley Yakeley
I hereby license all my contributions to this wiki under the simple permissive license on HaskellWiki:Copyrights. —Ashley Y 05:25, 14 January 2006 (UTC)
1 GeSHi Tests
1.1 C
<c> for (int a=0;a<3;a++)
printf ("%d\n",a);
</c>
1.2 Haskell
{- My program -} import Foreign.C foo :: (Monad m) -> m (Int,Int) foo = (x-2,x + 1) where x = 3 -- The main function main :: IO () main = do a <- foo putStr ("And the answer is: " ++(show (fst a))++"\n")
