github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-03 00:16:52 +03:00
Code Issues Projects Releases Wiki Activity

Moves

Browse Source
This commit is contained in:
Rick Winfrey 2016-10-24 10:30:08 -05:00
parent 881d68dc2c
commit ddd0536cc3
1 changed files with 9 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/Renderer/JSON.hs
View File

@ -78,30 +78,28 @@ termFields info syntax = "range" .= characterRange info : "category" .= category
S.MemberAccess memberId value -> [ "memberIdentifier" .= memberId ] <> [ "value" .= value ]
S.MethodCall targetId methodId args -> [ "targetIdentifier" .= targetId ] <> [ "methodId" .= methodId ] <> [ "args" .= args ]
S.Args c -> childrenFields c
S.Operator c -> childrenFields c
S.If expr clause maybeClause -> [ "if" .= expr ] <> [ "ifBody" .= clause ] <> [ "elseBody" .= maybeClause ]
S.For exprs body -> [ "forExpressions" .= exprs ] <> [ "forBody" .= body ]
S.While expr body -> [ "whileExpr" .= expr ] <> [ "whileBody" .= body ]
S.DoWhile expr body -> [ "doWhileExpr" .= expr ] <> [ "doWhileBody" .= body ]
S.Switch expr cases -> [ "switchExpression" .= expr ] <> [ "cases" .= cases ]
S.Case expr body -> [ "caseExpression" .= expr ] <> [ "caseStatement" .= body ]
S.Operator syntaxes -> [ "operatorSyntaxes" .= syntaxes ]
S.VarDecl decl -> [ "variableDeclaration" .= decl ]
S.VarAssignment id value -> [ "varIdentifier" .= id ] <> [ "value" .= value ]
S.MathAssignment id value -> [ "mathIdentifier" .= id ] <> [ "value" .= value ]
S.Operator syntaxes -> [ "operatorSyntaxes" .= syntaxes ]
S.SubscriptAccess id property -> [ "subscriptId" .= id ] <> [ "property" .= property ]
S.Switch expr cases -> [ "switchExpression" .= expr ] <> [ "cases" .= cases ]
S.Case expr body -> [ "caseExpression" .= expr ] <> [ "caseStatement" .= body ]
S.Object pairs -> childrenFields pairs
S.Pair a b -> childrenFields [a, b]
S.Return expr -> [ "returnExpression" .= expr ]
S.Constructor expr -> [ "constructorExpression" .= expr ]
S.Comment _ -> []
S.Commented comments child -> childrenFields (comments <> maybeToList child)
S.Error c -> childrenFields c
S.For exprs body -> [ "forExpressions" .= exprs ] <> [ "forBody" .= body ]
S.DoWhile expr body -> [ "doWhileExpr" .= expr ] <> [ "doWhileBody" .= body ]
S.While expr body -> [ "whileExpr" .= expr ] <> [ "whileBody" .= body ]
S.Return expr -> [ "returnExpression" .= expr ]
S.Throw c -> [ "throwExpression" .= c ]
S.Constructor expr -> [ "constructorExpression" .= expr ]
S.Try body catch finally -> [ "tryBody" .= body ] <> [ "tryCatch" .= catch ] <> [ "tryFinally" .= finally ]
S.Array c -> childrenFields c
S.Class identifier superclass definitions -> [ "classIdentifier" .= identifier ] <> [ "superclass" .= superclass ] <> [ "definitions" .= definitions ]
S.Method identifier params definitions -> [ "methodIdentifier" .= identifier ] <> [ "params" .= params ] <> [ "definitions" .= definitions ]
S.If expr clause maybeClause -> [ "if" .= expr ] <> [ "ifBody" .= clause ] <> [ "elseBody" .= maybeClause ]
S.Module identifier definitions-> [ "moduleIdentifier" .= identifier ] <> [ "definitions" .= definitions ]
S.Import identifier expr -> [ "importIdentifier" .= identifier ] <> [ "importStatements" .= expr ]
S.Export identifier expr -> [ "exportIdentifier" .= identifier ] <> [ "exportStatements" .= expr ]