Skip to content

Instantly share code, notes, and snippets.

@dch
Created March 27, 2012 20:00
Show Gist options
  • Save dch/2219748 to your computer and use it in GitHub Desktop.
Save dch/2219748 to your computer and use it in GitHub Desktop.
test erlang's NIF call of md5_init to openssl
-module(erlbork).
-export([start/0]).
%% run using
%% erl -run erlbork
%% with or without +K true +A4
%% code from @davisp with thanks
start() ->
spawn(fun() -> restarts() end),
loop().
restarts() ->
init:restart(),
timer:sleep(100),
restarts().
loop() ->
_Ctx = crypto:md5_init(),
loop().
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment