Searched refs:failedlock (Results 1 – 2 of 2) sorted by relevance
152 let failedlock st = do function177 _ -> failedlock tmpst
473 ( guardUsable repo failedlock $ do481 , failedlock487 | otherwise = failedlock517 failedlock526 failedlock529 failedlock = giveup "can't lock content" function