System.Console.Haskeline

module System.Console.Haskeline where

data Settings m
  = Settings {complete :: CompletionFunc m,
              historyFile :: Maybe FilePath,
              autoAddHistory :: Bool}

type CompletionFunc m =
  (String, String) -> m (String, [Completion])

data Completion
  = Completion {replacement :: String,
                display :: String,
                isFinished :: Bool}