github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 01:47:01 +03:00
Code Issues Projects Releases Wiki Activity

Note that you don’t want new instances of HasDeclarationWithStrategy.

Browse Source
This commit is contained in:
Rob Rix 2017-10-06 11:29:10 -04:00
parent 88477db7fa
commit c474b15ee2
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Renderer/TOC.hs
View File

@ -169,6 +169,8 @@ instance Apply HasDeclaration fs => CustomHasDeclaration (Union fs) where
data Strategy = Default | Custom
-- | Produce a 'Declaration' for a syntax node using either the 'Default' or 'Custom' strategy.
--
-- You should probably be using 'CustomHasDeclaration' instead of this class; and you should not define new instances of this class.
class HasDeclarationWithStrategy (strategy :: Strategy) syntax where
toDeclarationWithStrategy :: (Foldable whole, HasField fields Range, HasField fields Span) => proxy strategy -> Blob -> Record fields -> RAlgebra syntax (Term whole (Record fields)) (Maybe Declaration)