X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/64a44dc0899e92d8c1b708fb754ad1b2126c67fe..16465a9ab10d41506006aa27499513a42d2b7de6:/src/openssl.sml diff --git a/src/openssl.sml b/src/openssl.sml index df63276..d309a61 100644 --- a/src/openssl.sml +++ b/src/openssl.sml @@ -53,7 +53,8 @@ fun ssl_err s = if C.Ptr.isNull reason then () else - print (ZString.toML reason) + print (ZString.toML reason); + print "\n" end val readBuf : (C.uchar, C.rw) C.obj C.ptr' = C.alloc' C.S.uchar (Word.fromInt Config.bufSize)