Commit 63af4a64 authored by Bernd Paysan's avatar Bernd Paysan

Time delta fix for 32 bits

parent 34a8c229
......@@ -105,7 +105,7 @@ event: :>disconnect ( addr -- ) .disconnect-me ;
64Variable announced \ time for next announcement
: announced! ( -- )
ticks config:ekey-timeout& 2@ d>64 dup 5 64rshift 64- 64+ announced 64! ;
ticks config:ekey-timeout& 2@ d>64 64dup 5 64rshift 64- 64+ announced 64! ;
: announced? ( -- flag ) announced 64@ ticks 64u>= ;
: subme ( -- ) announced? IF dht-connect sub-me THEN ;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment