From d4c58eddc5838a75e87f9d6275538809ebeaefbc Mon Sep 17 00:00:00 2001
From: Jean-Paul Calderone <exarkun@twistedmatrix.com>
Date: Fri, 19 May 2023 13:58:43 -0400
Subject: [PATCH] remove some spurious comments
This functionality moved in to readShareFromBucket
---
test/Spec.hs | 7 -------
1 file changed, 7 deletions(-)
diff --git a/test/Spec.hs b/test/Spec.hs
index 7ecb548..176fe88 100644
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -224,13 +224,6 @@ knownCorrectRoundTrip n = do
-- predictable size.
bucket <- LB.readFile ("test/data/3of10." <> show n)
shareData <- readShareFromBucket bucket
- -- let withoutPrefix = LB.drop (32 + 20 + 32 + 8 + 8 + 368) bucket
- -- dataSize = LB.length withoutPrefix - 4
- -- shareData = LB.take dataSize withoutPrefix
- -- suffix = LB.drop dataSize withoutPrefix
-
- -- -- Our assumption about the data we're working on...
- -- assertEqual "Cannot account for extra leases" suffix "\0\0\0\0"
let decoded = decode' shareData
let encoded = (Binary.encode :: Tahoe.SDMF.Share -> LB.ByteString) <$> decoded
--
GitLab