path: root/testsuite/tests/ghc-regress/ghci.debugger/scripts/print014.script

-- Test handling of extra fields in the representation due to existentials.

:set -XGADTs -XRank2Types
:l ../GADT

let e = Exist 1
:p e
seq _t1 ()
:p e