I hereby claim:
- I am aostiles on github.
- I am aostiles (https://keybase.io/aostiles) on keybase.
- I have a public key ASDqIb3V3ByqG5-gDeSSTYkZzGnOtqXvZytfvPmim9MNeQo
To claim this, I am signing this object:
module IHaskell.Eval.RIO (RIO(), runRIO, IHaskell.Eval.RIO.putStrLn, IHaskell.Eval.RIO.putStr,MyGhcMonad) where | |
import qualified System.IO | |
import GHC | |
-- Notice that symbol UnsafeRIO is not exported from this module! | |
newtype RIO a = UnsafeRIO { runRIO :: IO a } | |
type MyGhcMonad = GhcT RIO |
module IHaskell.Eval.RIO (RIO(), runRIO, IHaskell.Eval.RIO.putStrLn, IHaskell.Eval.RIO.putStr,MyGhcMonad) where | |
import qualified System.IO | |
import GHC | |
import MonadUtils | |
import Exception | |
-- Notice that symbol UnsafeRIO is not exported from this module! | |
newtype RIO a = UnsafeRIO { runRIO :: IO a } |
module IHaskell.Eval.RIO (RIO(), runRIO, IHaskell.Eval.RIO.putStrLn, IHaskell.Eval.RIO.putStr,MyGhcMonad) where | |
import qualified System.IO | |
import GHC | |
import MonadUtils | |
import Exception | |
-- Notice that symbol UnsafeRIO is not exported from this module! | |
newtype RIO a = UnsafeRIO { runRIO :: IO a } |
qsort [] = [] | |
qsort (x:xs) = (qsort lesser) ++ [x] ++ (qsort greater) | |
where | |
lesser = filter (<x) xs | |
greater = filter (>=x) xs | |
main = qsort [3,1,2,3] |
I hereby claim:
To claim this, I am signing this object: