From 8c490555ffbe0c5b736a233323e7d162bcf30506 Mon Sep 17 00:00:00 2001
From: Timothy Clem <timothy.clem@gmail.com>
Date: Wed, 22 Feb 2017 15:15:32 -0800
Subject: [PATCH] RIP Cost

---
 test/IntegrationSpec.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/IntegrationSpec.hs b/test/IntegrationSpec.hs
index 9a87ec3f4..816425480 100644
--- a/test/IntegrationSpec.hs
+++ b/test/IntegrationSpec.hs
@@ -98,7 +98,7 @@ testParse path expectedOutput = do
   expected <- (Verbatim . stripWhitespace) <$> readFile expectedOutput
   actual `shouldBe` expected
 
-testDiff :: Renderer (Record '[Cost, Range, Category, SourceSpan]) -> Both FilePath -> FilePath -> Expectation
+testDiff :: Renderer (Record '[Range, Category, SourceSpan]) -> Both FilePath -> FilePath -> Expectation
 testDiff renderer paths diff = do
   sources <- sequence $ readAndTranscodeFile <$> paths
   diff' <- diffFiles parser renderer (sourceBlobs sources)
@@ -106,7 +106,7 @@ testDiff renderer paths diff = do
   expected <- (Verbatim . stripWhitespace) <$> readFile diff
   actual `shouldBe` expected
   where
-    parser = parserWithCost (fst paths)
+    parser = parserForFilepath (fst paths)
     sourceBlobs sources = Source.SourceBlob <$> sources <*> pure mempty <*> paths <*> pure (Just Source.defaultPlainBlob)
 
 stripWhitespace :: Text -> Text