k0001 / network-simple

Haskell library abstracting common network sockets usage patterns.
BSD 3-Clause "New" or "Revised" License
33 stars 9 forks source link

support crypton-x509 #37

Closed juhp closed 10 months ago

juhp commented 1 year ago

Consider porting to the new crypton-x509 libraries:


       Building library for network-simple-tls-0.4.1..                                                                  [349/167012]
       [1 of 1] Compiling Network.Simple.TCP.TLS                                                                                    

       /var/stackage/work/unpack-dir/unpacked/network-simple-tls-0.4.1-d58780e70a0e06d26698340fedc13999145b848efc23d93758c5478a5849d
f1b/src/Network/Simple/TCP/TLS.hs:214:50: error: [GHC-83865]                                                                        
           • Couldn't match expected type ‘crypton-x509-store-1.6.9:Data.X509.CertificateStore.CertificateStore’
                         with actual type ‘X.CertificateStore’
             NB: ‘crypton-x509-store-1.6.9:Data.X509.CertificateStore.CertificateStore’
                   is defined in ‘Data.X509.CertificateStore’
                       in package ‘crypton-x509-store-1.6.9’
                 ‘X.CertificateStore’
                   is defined in ‘Data.X509.CertificateStore’
                       in package ‘x509-store-1.6.9’
           • In the expression: cStore
             In a record update at field ‘T.sharedCAStore’,
             with type constructor ‘T.Shared’
             and data constructor ‘T.Shared’.
             In the expression: def {T.sharedCAStore = cStore}
           |
       214 |       , T.clientShared = def { T.sharedCAStore = cStore }
           |                                                  ^^^^^^

       /var/stackage/work/unpack-dir/unpacked/network-simple-tls-0.4.1-d58780e70a0e06d26698340fedc13999145b848efc23d93758c5478a5849d
f1b/src/Network/Simple/TCP/TLS.hs:216:35: error: [GHC-83865]
           • Couldn't match type ‘X.CertificateStore’
                            with ‘crypton-x509-store-1.6.9:Data.X509.CertificateStore.CertificateStore’
             Expected: T.OnServerCertificate
               Actual: X.CertificateStore
                       -> X.ValidationCache
                       -> X.ServiceID
                       -> X.CertificateChain
                       -> IO [X.FailedReason]
             NB: ‘crypton-x509-store-1.6.9:Data.X509.CertificateStore.CertificateStore’
                   is defined in ‘Data.X509.CertificateStore’
                       in package ‘crypton-x509-store-1.6.9’
                 ‘X.CertificateStore’
                   is defined in ‘Data.X509.CertificateStore’
                       in package ‘x509-store-1.6.9’
           • In the expression: X.validateDefault
             In a record update at fields ‘T.onServerCertificate’,
                                          ‘T.onCertificateRequest’,
             with type constructor ‘T.ClientHooks’
k0001 commented 10 months ago

Done.