moonlight-delta-0.1.0.0: test/epoch/EpochSupport/Expected.hs

module EpochSupport.Expected
  ( viewProjection,
  )
where

import Moonlight.Delta.Epoch (ContextView (..), Version)

viewProjection :: ContextView observed section -> (Version, observed, section)
viewProjection contextView =
  (cvVersion contextView, cvObservedKeys contextView, cvSection contextView)