{-# options_haddock prune #-}

-- |Description: PtyResources ADT, Internal
module Polysemy.Process.Data.PtyResources where

import System.IO (Handle)
import System.Posix (Fd)
import System.Posix.Pty (Pty)

-- |The resources used by the default interpreter for 'Polysemy.Process.Pty'.
data PtyResources =
  PtyResources {
    PtyResources -> Fd
primary :: Fd,
    PtyResources -> Fd
secondary :: Fd,
    PtyResources -> Handle
handle :: Handle,
    PtyResources -> Pty
pty :: Pty
  }