mirror of https://github.com/voidlizard/hbs2
ncq:test:ncq:fuckup-recovery1
This commit is contained in:
parent
ff65d8e15d
commit
63f4e69bbb
|
@ -112,7 +112,7 @@ testNCQFuckupRecovery1 prefix = flip runContT pure do
|
|||
let ncqDir = tmp </> "ncq-test-data"
|
||||
|
||||
ContT $ bracket none $ const do
|
||||
none
|
||||
rm tmp
|
||||
|
||||
(cur,ha,h0) <- lift $ withNCQ id ncqDir $ \ncq -> do
|
||||
let sto = AnyStorage ncq
|
||||
|
|
Loading…
Reference in New Issue