Attach comments to includes in structures

lpw25 · lpw25 · commit 779f8d093659 · 2015-06-05T17:31:12.000Z
git-svn-id: http://caml.inria.fr/svn/ocaml/version/4.02@16160 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
diff --git a/parsing/parser.mly b/parsing/parser.mly
@@ -780,7 +780,8 @@ structure_item:
 ;
 str_include_statement:
     INCLUDE module_expr post_item_attributes
-      { Incl.mk $2 ~attrs:$3 ~loc:(symbol_rloc()) }
+      { Incl.mk $2 ~attrs:$3
+                ~loc:(symbol_rloc()) ~docs:(symbol_docs ()) }
 ;
 module_binding_body:
     EQUAL module_expr

Original file line number	Diff line number	Diff line change
`@@ -780,7 +780,8 @@ structure_item:`
`780`	`780`	`;`
`781`	`781`	`str_include_statement:`
`782`	`782`	`INCLUDE module_expr post_item_attributes`
`783`		`- { Incl.mk $2 ~attrs:$3 ~loc:(symbol_rloc()) }`
	`783`	`+ { Incl.mk $2 ~attrs:$3`
	`784`	`+ ~loc:(symbol_rloc()) ~docs:(symbol_docs ()) }`
`784`	`785`	`;`
`785`	`786`	`module_binding_body:`
`786`	`787`	`EQUAL module_expr`