| %% -*- mode: erlang;erlang-indent-level: 4;indent-tabs-mode: nil -*- | |
| %% ex: ts=4 sw=4 ft=erlang et | |
| case crypto:start() of | |
| {error, {already_started, crypto}} -> | |
| ok; | |
| ok -> | |
| ok | |
| end, | |
| case erlang:function_exported(crypto, strong_rand_bytes, 1) of | |
| true -> | |
| {value, {erl_opts, ErlOpts}} = lists:keysearch(erl_opts, 1, CONFIG), | |
| NewErlOpts = [{d, 'HAVE_CRYPTO_STRONG_RAND_BYTES'}] ++ ErlOpts, | |
| lists:keyreplace(erl_opts, 1, CONFIG, {erl_opts, NewErlOpts}); | |
| false -> | |
| CONFIG | |
| end. |