diff --git a/1991.fs b/1991.fs index 77b9385..a7f034c 100644 --- a/1991.fs +++ b/1991.fs @@ -99,10 +99,10 @@ pubvar reqroute \ route we're trying to validate. >r routes wordlist-id @ \ Store xt and specify wordlist begin - dup + dup while - r@ over >r execute WHILE r> name>link - repeat r> + r@ over >r execute WHILE r> name>link + repeat r> then rdrop ?dup if