Commits

Bryan O'Sullivan  committed 4acdbf7

We get a 1.5% speedup by inlining jstring_

  • Participants
  • Parent commits f3314ac

Comments (0)

Files changed (1)

File Data/Aeson/Parser.hs

   if backslash `B.elem` s
     then decodeUtf8 <$> reparse unescape s
     else return (decodeUtf8 s)
+{-# INLINE jstring_ #-}
 
 reparse :: Parser a -> ByteString -> Parser a
 reparse p s = case (case parse p s of {Partial k -> k ""; r -> r}) of