basis/io/sockets/secure/secure-tests.factor

   1 USING: accessors io.sockets io.sockets.secure
   2 io.sockets.secure.debug kernel system tools.test ;
   3
   4 { "hello" 24 } [ "hello" 24 <inet> "hello" <secure> [ host>> ] [ port>> ] bi ] unit-test
   5
   6 { } [
   7     [ ] with-test-context
   8 ] unit-test
   9
  10 { t } [ os windows? ssl-certificate-verification-supported? or ] unit-test