From 01465717d300f68ccdcf582a47b83a0ec8eba778 Mon Sep 17 00:00:00 2001 From: "C. Guy Yarvin" Date: Tue, 3 Jun 2014 14:01:40 -0700 Subject: [PATCH] IPv4 lanes now have a timestamp. --- arvo/ames.hoon | 8 +++----- arvo/zuse.hoon | 2 +- 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/arvo/ames.hoon b/arvo/ames.hoon index f0fb4aa051..c03bea8479 100644 --- a/arvo/ames.hoon +++ b/arvo/ames.hoon @@ -523,9 +523,7 @@ ?: ?| ?=(~ lun.wod.dur) ?=([%ix *] u.lun.wod.dur) ?& ?=([%if *] u.lun.wod.dur) - ?| !=(q.ryn p.u.lun.wod.dur) - !=(r.ryn q.u.lun.wod.dur) - == + (gth p.ryn (add ~s10 p.u.lun.wod.dur)) == == [~ ryn] @@ -647,7 +645,7 @@ ++ gur :: default door |= her=ship ^- door - =+ def=?.((lth her 256) ~ [~ %if 0 (mix her .0.0.1.0)]) + =+ def=?.((lth her 256) ~ [~ %if ~2000.1.1 0 (mix her .0.0.1.0)]) [[~2100.1.1 def ~] ~ *cask] :: ++ myx :: door by ship @@ -1262,7 +1260,7 @@ =+ ^= lyn ^- lane ?~ q.fud ryn ?. ?=(%if -.u.q.fud) u.q.fud - [%ix now +.u.q.fud] + [%ix +.u.q.fud] :: u.q.fud ?: =(our p.fud) (emit %mead lyn r.fud) diff --git a/arvo/zuse.hoon b/arvo/zuse.hoon index bd7dee9bcd..764636586a 100644 --- a/arvo/zuse.hoon +++ b/arvo/zuse.hoon @@ -2388,7 +2388,7 @@ [| p=twig] :: manual == :: ++ lane :: packet route - $% [%if p=@ud q=@if] :: IP4/public UDP/addr + $% [%if p=@da q=@ud r=@if] :: IP4/public UDP/addr [%is p=@ud q=(unit lane) r=@is] :: IPv6 w/alternates [%ix p=@da q=@ud r=@if] :: IPv4 provisional == ::