@@ -27,3 +27,5 @@ getCabalMacrosFile = do
27 return $ case filter ("dist-sandbox-" `isPrefixOf`) contents of
27 return $ case filter ("dist-sandbox-" `isPrefixOf`) contents of
28 [x] -> "dist" </> x </> rest
28 [x] -> "dist" </> x </> rest
29 [] -> "dist" </> rest
29 [] -> "dist" </> rest
30+ xs -> error $ "ran doctests with multiple dist/dist-sandbox-xxxxx's: \n"
31+ ++ show xs ++ "\nTry cabal clean"