Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Untypeast: define untype_expression, untype_pattern (#9920) 

Convenience functions that have been defined in merlin for a while.
master
Thomas Refis 2020-09-16 20:49:05 +02:00 committed by GitHub
parent fb0b2c5cd1
commit 9ca9df88c0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
typing/untypeast.ml
View File

@ -887,3 +887,9 @@ let untype_structure ?(mapper=default_mapper) structure =
let untype_signature ?(mapper=default_mapper) signature =
mapper.signature mapper signature
let untype_expression ?(mapper=default_mapper) expression =
mapper.expr mapper expression
let untype_pattern ?(mapper=default_mapper) pattern =
mapper.pat mapper pattern

2
typing/untypeast.mli
View File

@ -81,5 +81,7 @@ val default_mapper : mapper
val untype_structure : ?mapper:mapper -> Typedtree.structure -> structure
val untype_signature : ?mapper:mapper -> Typedtree.signature -> signature
val untype_expression : ?mapper:mapper -> Typedtree.expression -> expression
val untype_pattern : ?mapper:mapper -> _ Typedtree.general_pattern -> pattern
val constant : Asttypes.constant -> Parsetree.constant