Verified Commit a37bedd3 authored by Camil Staps's avatar Camil Staps 🚀

Cleanup parse.patch; update submodules

parent 393afb03
Subproject commit 7b51a8ac1859f530b013411a3ef251589ce6fdd5
Subproject commit c5382195226ec6baa7887f953702c176cd185c40
Subproject commit dc782524f6fbfc7b386c24d03190ca5cfa1b99ee
Subproject commit ee27627ea6924fd439c1b41e10ffb742baa1f6d5
......@@ -44,13 +44,13 @@
+ = mergeDocumentation (parseList (tryDefinition parseContext) pState)
+where
+ mergeDocumentation :: ([ParsedDefinition], ParseState) -> ([ParsedDefinition], ParseState)
+ mergeDocumentation ([PD_Documentation DocBlock doc:f=:PD_Function pos id is_infix args rhs kind:rest], pState=:{ps_hash_table})
+ mergeDocumentation ([PD_Documentation DocBlock doc:f=:PD_Function pos id is_infix args rhs kind:rest], pState)
+ = mergeDocumentation ([f:rest], saveDocu id doc pState)
+ mergeDocumentation ([PD_Documentation DocBlock doc:f=:PD_TypeSpec pos id prio type specials:rest], pState=:{ps_hash_table})
+ mergeDocumentation ([PD_Documentation DocBlock doc:f=:PD_TypeSpec pos id prio type specials:rest], pState)
+ = mergeDocumentation ([f:rest], saveDocu id doc pState)
+ mergeDocumentation ([PD_Documentation DocBlock doc:c=:PD_Class cd pds:rest], pState=:{ps_hash_table})
+ mergeDocumentation ([PD_Documentation DocBlock doc:c=:PD_Class cd pds:rest], pState)
+ = mergeDocumentation ([c:rest], saveDocu cd.class_ident doc pState)
+ mergeDocumentation ([PD_Documentation DocBlock doc:c=:PD_Type ptd:rest], pState=:{ps_hash_table})
+ mergeDocumentation ([PD_Documentation DocBlock doc:c=:PD_Type ptd:rest], pState)
+ = mergeDocumentation ([c:rest], saveDocu ptd.td_ident doc pState)
+ mergeDocumentation ([PD_Class c pds:rest], pState)
+ # (pds,pState) = mergeDocumentation (pds, pState)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment