/packages/openssl/examples/test1.pas
Pascal | 14 lines | 9 code | 4 blank | 1 comment | 1 complexity | ad42e809bc42744c76393624318760b0 MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
1program test1; 2 3{$mode objfpc}{$H+} 4 5uses 6 OpenSSL; 7 8begin 9 if InitSSLInterface then 10 Writeln('Success') 11 else 12 Writeln('Holy shit!'); 13end. 14