-
Notifications
You must be signed in to change notification settings - Fork 463
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
Jsx ast #7286
base: master
Are you sure you want to change the base?
Jsx ast #7286
Conversation
|
||
(* | ||
* jsx-fragment ::= | ||
* | <> </> | ||
* | <> jsx-children </> | ||
*) | ||
and parse_jsx_fragment p = | ||
and parse_jsx_fragment start_pos p = |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
I prefer ranges to be accurate. The location should start at the opening <
token.
compiler/syntax/src/res_printer.ml
Outdated
Doc.group | ||
(Doc.concat | ||
[ | ||
line_sep; |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@shulhi this part isn't 100% correct.
I'm not familiar enough with this part of the codebase.
let z1 = <> <SectionHeader> {React.string("abc")} </SectionHeader> </>
will be formatted to
let z1 =
<>
<SectionHeader> {React.string("abc")} </SectionHeader>
</>
so I'm missing some indent here. Not sure how that part works.
Would love to hear your thoughts on this.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@nojaf I checked, the indentation is handled here,
rescript/compiler/syntax/src/res_printer.ml
Lines 2085 to 2103 in 9da9b19
let should_indent = | |
match opt_braces with | |
| Some _ -> false | |
| _ -> ( | |
ParsetreeViewer.is_binary_expression expr | |
|| | |
match vb.pvb_expr with | |
| { | |
pexp_attributes = [({Location.txt = "res.ternary"}, _)]; | |
pexp_desc = Pexp_ifthenelse (if_expr, _, _); | |
} -> | |
ParsetreeViewer.is_binary_expression if_expr | |
|| ParsetreeViewer.has_attributes if_expr.pexp_attributes | |
| {pexp_desc = Pexp_newtype _} -> false | |
| {pexp_attributes = [({Location.txt = "res.taggedTemplate"}, _)]} -> | |
false | |
| e -> | |
ParsetreeViewer.has_attributes e.pexp_attributes | |
|| ParsetreeViewer.is_array_access e) |
You might need to handle the case for Pexp_jsx_fragment
here.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Thanks, the old code will instead have matched ParsetreeViewer.has_attributes e.pexp_attributes
. Indentation now works as before.
@@ -1000,7 +1000,7 @@ Path Objects.Rec. | |||
|
|||
Complete src/Completion.res 120:7 | |||
posCursor:[120:7] posNoWhite:[120:6] Found expr:[119:11->123:1] | |||
posCursor:[120:7] posNoWhite:[120:6] Found expr:[120:5->122:5] | |||
posCursor:[120:7] posNoWhite:[120:6] Found expr:[120:5->123:0] |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Changes like this are to be expected as the range of a fragment spans from <>
till end </>
.
posCursor:[9:56] posNoWhite:[9:55] Found expr:[9:13->9:66] | ||
JSX <SectionHeader:[9:13->9:26] > _children:9:26 | ||
posCursor:[9:56] posNoWhite:[9:55] Found expr:__ghost__[9:10->9:67] |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
This ghost expression is a part of the AstHelper.make_list_expression
result.
It is no longer present in the new AST, but it also didn't serve any purpose.
I believe it is okay that this test is slightly different.
In the end the result didn't change.
(* [%id] *) | ||
(* . *) | ||
(* represents <> foo </> , the entire range is stored in the expression , we keep track of >, children and </ *) | ||
| Pexp_jsx_fragment of |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
The reason the store the >
and </
token is this edge case:
https://rescript-lang.org/try?version=v12.0.0-alpha.8&module=esmodule&code=DYUwLgBA+hC8ECgCQAeCB6AVBAzmATgIYB2A5iBJuhAHzJIDeASiIQMZgB0e+AlmQAoARAFsQACyEBKAL7IU1LBEIiIASQh9S4yFVpA
If we ever want to restore comments I suppose we need the proper anchors.
Map child expressions Initial mapping of Pexp_jsx_fragment to 0 Correct location in mapping Update analysis for jsx_fragment Remove unused code Print something for ml print Commit invalid test results for reference Try improve printing Correct fragment range, try and print comments Indent jsx Process comments from children inside fragment Attach comments to fragment tags Fix comment Improve comment formatting Print single element on same line Update comment WIP: Debug More debugging Works Fix some jsx printing Fix the test Clean up Update tests with location changes
Thank you @shulhi for fixing all the remaining formatter problem of the fragment node! |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Left some comments.
Just checking: is the conversion complete in that the representation of fragments is completely moved over to the new representation?
analysis/src/CompletionFrontEnd.ml
Outdated
@@ -1232,7 +1232,8 @@ let completionWithParser1 ~currentFile ~debug ~offset ~path ~posCursor | |||
then ValueOrField | |||
else Value); | |||
})) | |||
| Pexp_construct ({txt = Lident ("::" | "()")}, _) -> | |||
| Pexp_construct ({txt = Lident ("::" | "()")}, _) | Pexp_jsx_fragment _ |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Are ::
and ()
still used?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Yes, for JSX tag.
compiler/ml/ast_mapper_to0.ml
Outdated
@@ -407,6 +407,18 @@ module E = struct | |||
| Pexp_open (ovf, lid, e) -> | |||
open_ ~loc ~attrs ovf (map_loc sub lid) (sub.expr sub e) | |||
| Pexp_extension x -> extension ~loc ~attrs (sub.extension sub x) | |||
| Pexp_jsx_fragment (o, xs, c) -> |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
There should be a corresponding change in ast_mapper_from0
that inverts the conversion.
Also, some extension of the test cases in tests/tools_tests/ppx/TestPpx.res
to check that back and forth conversion works fine.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Alright, I think the new tests from #7318 prove this now.
Yes, that is the idea. The parser only produces jsx_fragment and not the old representation. |
tests/tools_tests/ppx/TestPpx.res
Outdated
@@ -61,3 +61,7 @@ let eq2 = 3 === 3 | |||
|
|||
let test = async () => 12 | |||
let f = async () => (await test()) + 1 | |||
|
|||
module Fragments = { | |||
let f1 = <> </> |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
This should be <></>
, no? (without the space).
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Sounds reasonable, although I do believe this is the current behavior. (Playground)
@cristianoc, anything else you can think of for |
This could be ready to go. Is the absence of changes in |
Would you add a changelog too? Assuming this change will go ahead, and the rest of the JSX investigated in a separate PR. |
Yes, I understand. Today, I made some necessary changes to ensure the tests remained consistent.
I would recommend investigating this in the same PR. There isn't much benefit to having just the fragments part. To avoid the risk of not completing a second PR, I would suggest keeping it as one. That being said, I would like to achieve a sense of completion for the fragments before taking on more changes. |
Sure continuing jsx sounds good. |
Hello @shulhi, I've made some progress with the new nodes for JSX elements. I've added some rough code to format these. If you have the bandwidth, could you help me out with this? I would like to focus on the AST mapping myself and finally get this over the finish line. Let me know if that works for you! |
Sure, I am happy to help. |
compiler/syntax/src/res_printer.ml
Outdated
and print_jsx_fragment ~state expr cmt_tbl = | ||
let opening = Doc.text "<>" in | ||
let closing = Doc.text "</>" in | ||
and print_jsx_unary_tag ~state tag_name props cmt_tbl = |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@shulhi this is incomplete.
Doc.nil; | ||
]) | ||
|
||
and print_jsx_container_tag ~state tag_name props |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@shulhi this is incomplete.
in | ||
let xs = exprs |> List.map (fun e -> Expression e) in | ||
walk_list xs t rest | ||
| Pexp_jsx_unary_element _ -> failwith "Pexp_jsx_unary_element 3" |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@shulhi this is incomplete.
@@ -707,9 +707,47 @@ module SexpAst = struct | |||
] | |||
| Pexp_extension ext -> | |||
Sexp.list [Sexp.atom "Pexp_extension"; extension ext] | |||
| Pexp_jsx_fragment (_, children, _) -> |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@cristianoc what should all this code be?
I'm not sure what the lore is here.
Any pointers?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Not really sure if debugger is even used anymore. @zth any ideas?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
I never use it at least. Void the new nodes in there and see if anyone misses them?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
@cristianoc what do you mean with debugger here?
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Following the use of the module, it seems to be used in the print tests here for the sexp
file:
$DUNE_BIN_DIR/res_parser $resIntf -print sexp $file > $sexpAst1
$DUNE_BIN_DIR/res_parser $resIntf -print res $file > $rescript1
which I believe are files only kept around when the roundtrip syntax tests fail.
Can't remember if they're actually useful, or the generated .res files are enough.
In any case, it's just something for debugging tests, so the details of how things are printed are not important.
Handle comments and printing for jsx_unary_tag
This is a part of #7283.
I'm introducing
Pexp_jsx_fragment
to represent fragment syntax<></>
.I found it insightful to just try it out and see what code changes are necessary.
In short a fragment is now parsed as:
after this change it becomes:
I'll add some comment to relevant changes.