add entropy to arvo with %wack

This commit is contained in:
Joe Bryan 2018-12-05 15:52:16 -05:00
parent de29eb602c
commit 511ff89f80
2 changed files with 14 additions and 0 deletions

View File

@ -1187,6 +1187,7 @@
# define c3__void c3_s4('v','o','i','d')
# define c3__vorp c3_s4('v','o','r','p')
# define c3__way c3_s3('w','a','y')
# define c3__wack c3_s4('w','a','c','k')
# define c3__wail c3_s4('w','a','i','l')
# define c3__wake c3_s4('w','a','k','e')
# define c3__wamp c3_s4('w','a','m','p')

View File

@ -1608,6 +1608,19 @@ sist_key(u3_noun des)
void
u3_sist_boot(void)
{
// iterate entropy
//
{
c3_w eny_w[16];
u3_noun eny;
c3_rand(eny_w);
eny = u3i_words(16, eny_w);
u3v_plan(u3nt(u3_blip, c3__arvo, u3_nul), u3nc(c3__wack, u3k(eny)));
u3z(eny);
}
if ( c3n == u3_Host.ops_u.nuu ) {
_sist_rest();