makeFileFacts :: Raw.VName -> SourcePath -> BS.ByteString -> NameAndEntries
makeFileFacts basevn origPath encodedContent =
      NameAndEntries filevn facts
    where
      facts = nodeFacts filevn FileNK
          [ nodeFact FileTextF encodedContent
          ]
      filevn = basevn
          -- Kythe conventions for file node.
          { vnLanguage  = ""
          , vnSignature = ""
          , vnPath      = unSourcePath origPath
          }

-- | Makes entries for an anchor referring some existing declaration.
makeFileFacts :: Raw.VName -> SourcePath -> BS.ByteString -> NameAndEntries
makeFileFacts basevn origPath encodedContent =
      NameAndEntries filevn facts
    where
      facts = nodeFacts filevn FileNK
          [ nodeFact FileTextF encodedContent
          ]
      filevn = basevn
          -- Kythe conventions for file node.
          { vnLanguage  = ""
          , vnSignature = ""
          , vnPath      = unSourcePath origPath
          }

-- | Makes entries for an anchor referring some existing declaration.
makeFileFacts basevn origPath encodedContent =
      NameAndEntries filevn facts
    where
      facts = nodeFacts filevn FileNK
          [ nodeFact FileTextF encodedContent
          ]
      filevn = basevn
          -- Kythe conventions for file node.
          { vnLanguage  = ""
          , vnSignature = ""
          , vnPath      = unSourcePath origPath
          }

-- | Makes entries for an anchor referring some existing declaration.