mirror of
https://github.com/snoyberg/keter.git
synced 2024-12-14 08:05:40 +03:00
12 lines
272 B
Haskell
12 lines
272 B
Haskell
{-# LANGUAGE OverloadedStrings #-}
|
|
import Keter.TempFolder
|
|
|
|
main :: IO ()
|
|
main = do
|
|
tf <- setup "temp"
|
|
getFolder tf "foo" >>= print
|
|
getFolder tf "foo" >>= print
|
|
getFolder tf "bar" >>= print
|
|
getFolder tf "bar" >>= print
|
|
getFolder tf "foo" >>= print
|