{-# OPTIONS_GHC -Wno-orphans #-}

module Test.Cardano.Base.TreeDiff where

import Cardano.Base.IP
import Data.TreeDiff

instance ToExpr IPv4 where
  toExpr :: IPv4 -> Expr
toExpr = IPv4 -> Expr
forall a. Show a => a -> Expr
defaultExprViaShow

instance ToExpr IPv6 where
  toExpr :: IPv6 -> Expr
toExpr = IPv6 -> Expr
forall a. Show a => a -> Expr
defaultExprViaShow