From 3963ce44f084d24ce462c98603fc7f1a703a30cf Mon Sep 17 00:00:00 2001 From: Scott Lystig Fritchie Date: Sun, 16 Feb 2014 20:19:51 +0900 Subject: [PATCH] More sanity checking for fill() in smoke test --- prototype/corfurl/src/corfurl.erl | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/prototype/corfurl/src/corfurl.erl b/prototype/corfurl/src/corfurl.erl index dc88b9a..d50dbeb 100644 --- a/prototype/corfurl/src/corfurl.erl +++ b/prototype/corfurl/src/corfurl.erl @@ -372,7 +372,14 @@ smoke1_test() -> %% Read repair should fix it. error_trimmed = read_page(P1, 7), [error_trimmed = corfurl_flu:read(flu_pid(X), Epoch, 7) || X <- Chain7], + %% scan_forward shouldn't see it either + {ok, 8, false, [{6,Pg6}]} = scan_forward(P1, 6, 10), + [F8a|_] = Chain8 = project_to_chain(8, P1), + ok = corfurl_flu:fill(flu_pid(F8a), Epoch, 8), + %% No read before scan, scan_forward shouldn't see 8 either, + %% but the next seq should be 9 + {ok, 9, false, [{6,Pg6}]} = scan_forward(P1, 6, 10), ok after