{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE PatternSynonyms, ViewPatterns, ImplicitParams #-} module Rlp.Parse.Associate {-# WARNING "temporarily unimplemented" #-} ( associate ) where -------------------------------------------------------------------------------- import Data.HashMap.Strict qualified as H import Data.Functor.Foldable import Data.Functor.Const import Lens.Micro import Rlp.Parse.Types import Rlp.Syntax -------------------------------------------------------------------------------- associate x y = y {-# WARNING associate "temporarily undefined" #-}