unsafeNetworkAddressFromString :: String -> NetworkAddress
unsafeNetworkAddressFromString str =
    case Parsec.parse addrParser "" str of
        Left err ->
            error $ "Tried to convert a 'String' to a 'NetworkAddress' but failed: "
                <> toText str <> ", " <> show err
        Right addr ->
            addr
unsafeNetworkAddressFromString :: String -> NetworkAddress
unsafeNetworkAddressFromString str =
    case Parsec.parse addrParser "" str of
        Left err ->
            error $ "Tried to convert a 'String' to a 'NetworkAddress' but failed: "
                <> toText str <> ", " <> show err
        Right addr ->
            addr
unsafeNetworkAddressFromString str =
    case Parsec.parse addrParser "" str of
        Left err ->
            error $ "Tried to convert a 'String' to a 'NetworkAddress' but failed: "
                <> toText str <> ", " <> show err
        Right addr ->
            addr