aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/RecordWildCards/do-tuple-as-pattern-deep.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE RecordWildCards #-}
{- Test deeply nested as-pattern in tuple -}
module DoTupleAsPatternDeep where

data T = T { field :: Int }

f mx = do
  (a, (b, c@T {..}), d) <- mx
  return undefined