summaryrefslogtreecommitdiff
path: root/kiki.hs
diff options
context:
space:
mode:
Diffstat (limited to 'kiki.hs')
-rw-r--r--kiki.hs8
1 files changed, 0 insertions, 8 deletions
diff --git a/kiki.hs b/kiki.hs
index 4126a93..6a62312 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -1020,14 +1020,6 @@ parseKeySpecs = map $ \specfile -> do
1020 let cmd = (drop 1 . reverse . drop 1) bdmcb 1020 let cmd = (drop 1 . reverse . drop 1) bdmcb
1021 Just (spec,file,cmd) 1021 Just (spec,file,cmd)
1022 1022
1023buildStreamInfo :: KeyFilter -> FileType -> StreamInfo
1024buildStreamInfo rtyp ftyp = StreamInfo { typ = ftyp
1025 , fill = rtyp
1026 , spill = KF_All
1027 , access = AutoAccess
1028 , initializer =NoCreate
1029 , transforms = [] }
1030
1031data Export = Export | NoExport deriving Eq 1023data Export = Export | NoExport deriving Eq
1032data Import = Import | NoImport deriving Eq 1024data Import = Import | NoImport deriving Eq
1033data Secret = Secret | NoSecret deriving Eq 1025data Secret = Secret | NoSecret deriving Eq