From 346aa84536fcc5594e5fde3996dc7e729a32a97a Mon Sep 17 00:00:00 2001 From: "Jose L. Bellod Cisneros" Date: Sun, 31 Mar 2019 07:16:36 +0200 Subject: [PATCH] removes unnecessary welps --- tests/sys/hoon/qeu.hoon | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/tests/sys/hoon/qeu.hoon b/tests/sys/hoon/qeu.hoon index 5e47f905c1..b52b4bf0b9 100644 --- a/tests/sys/hoon/qeu.hoon +++ b/tests/sys/hoon/qeu.hoon @@ -16,6 +16,7 @@ |% ++ unqueue |= [queue=(qeu @) test=(list @)] + ^- tang %- zing |- ^- (list tang) ?~ test ~ @@ -31,20 +32,20 @@ ++ test-descending-sorted-list ^- tang :: =+ queue=(~(gas to `(qeu @)`~) descending) - ;:(welp (unqueue [queue descending])) + (unqueue [queue descending]) :: ++ test-ascending-sorted-list ^- tang :: =+ queue=(~(gas to `(qeu @)`~) ascending) - ;:(welp (unqueue [queue ascending])) + (unqueue [queue ascending]) :: ++ test-unsorted-list ^- tang :: =+ queue=(~(gas to `(qeu @)`~) unsorted) - ;:(welp (unqueue [queue unsorted])) + (unqueue [queue unsorted]) :: ++ test-duplicates-list ^- tang :: =+ queue=(~(gas to `(qeu @)`~) duplicates) - ;:(welp (unqueue [queue duplicates])) + (unqueue [queue duplicates]) --