Import hs-plugins cvs
This commit is contained in:
13
examples/makewith/unsafeio/api/API.hs
Normal file
13
examples/makewith/unsafeio/api/API.hs
Normal file
@ -0,0 +1,13 @@
|
||||
{-# OPTIONS -fglasgow-exts #-}
|
||||
|
||||
module API where
|
||||
|
||||
import Data.Dynamic
|
||||
|
||||
data Unsafe = Unsafe {
|
||||
field :: String
|
||||
}
|
||||
deriving (Typeable, Show)
|
||||
|
||||
unsafe :: Unsafe
|
||||
unsafe = Unsafe { field = "default value" }
|
Reference in New Issue
Block a user