* Write not-loaded functions in case of load fail

git-svn-id: trunk@32805 -

packages/openssl/examples/test1.pas

@@ -9,6 +9,6 @@ begin
   if InitSSLInterface then
     Writeln('Success')
   else
-    Writeln('Holy shit!');
+    Writeln('Load failed, missing functions: ',OpenSSL_unavailable_functions);
 end.