16 lines
282 B
Haskell
16 lines
282 B
Haskell
module Sources where
|
|
|
|
import Types
|
|
|
|
data Source a where
|
|
Data :: a -> Source a
|
|
|
|
instance SourceState FilePath where
|
|
stateOfSource = undefined
|
|
|
|
instance SourceState Image where
|
|
stateOfSource = undefined
|
|
|
|
instance SourceState (String, FilePath) where
|
|
stateOfSource = undefined
|