github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-26 09:07:39 +03:00
Code Issues Projects Releases Wiki Activity

Just use top level benchmarks

Browse Source
This commit is contained in:
Timothy Clem 2020-07-06 14:04:27 -07:00
parent fe69bdf5d8
commit f8d2a2d617
2 changed files with 0 additions and 45 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
semantic-tags/bench/Main.hs
View File

@ -1,33 +0,0 @@
module Main (main) where
import Tags.Tagging.Precise
import qualified Data.ByteString as B
import Gauge
import Source.Loc (Loc (..))
import Source.Range
import Source.Source as Source
import Source.Span (Pos (..), Span (..))
import Data.Char (ord)
main :: IO ()
main = do
bytes <- fmap fromUTF8 $ B.readFile "/Users/tclem/github/github/app/models/user.rb"
-- bytes <- fmap fromUTF8 $ B.readFile "/Users/tclem/Downloads/jquery-3.5.1.min.js"
-- let lineIndexes = B.elemIndices (toEnum (ord '\n')) (Source.bytes bytes)
defaultMain
-- [ baselineCalculateLine bytes
-- , calculateLinePRVersion bytes
[ calculateLineWithMap bytes
]
-- baselineCalculateLine :: Source -> Benchmark
-- baselineCalculateLine bytes = bench "baseline calculateLineAndSpans" $ do
-- nf (baselineCalculateLineAndSpans bytes) (Loc (Range 73754 73757) (Span (Pos 1 73669) (Pos 1 73672)))
-- calculateLinePRVersion :: Source -> Benchmark
-- calculateLinePRVersion bytes = bench "calculateLineAndSpansPRVersion " $ do
-- nf (calculateLineAndSpansPRVersion bytes) (Loc (Range 73754 73757) (Span (Pos 1 73669) (Pos 1 73672)))
calculateLineWithMap :: Source -> Benchmark
calculateLineWithMap src = bench "calculateLineAndSpansWithIndexes" $ do
nf (calculateLineAndSpans src (LineIndices mempty)) (Loc (Range 73754 73757) (Span (Pos 1 73669) (Pos 1 73672)))

12
semantic-tags/semantic-tags.cabal
View File

@ -66,15 +66,3 @@ test-suite test
, tasty-hedgehog ^>= 1.0.0.1
, tasty-hunit >= 0.10 && <1
, text
benchmark benchmarks
import: haskell
hs-source-dirs: bench
type: exitcode-stdio-1.0
main-is: Main.hs
ghc-options: -threaded -static -rtsopts
build-depends: base
, bytestring ^>= 0.10.8.2
, semantic-tags
, semantic-source
, gauge ^>= 0.2.5