checksums.openssl: make evp-md-context private.

char-rename
John Benediktsson 2016-06-29 14:31:32 -07:00
parent 0feed3c35d
commit d9f17317e3
1 changed files with 2 additions and 2 deletions

View File

@ -17,6 +17,8 @@ INSTANCE: openssl-checksum stream-checksum
C: <openssl-checksum> openssl-checksum
<PRIVATE
TUPLE: evp-md-context < disposable handle ;
: <evp-md-context> ( -- ctx )
@ -26,8 +28,6 @@ TUPLE: evp-md-context < disposable handle ;
M: evp-md-context dispose*
handle>> EVP_MD_CTX_destroy ;
<PRIVATE
: digest-named ( name -- md )
dup EVP_get_digestbyname
[ ] [ unknown-digest ] ?if ;