fix: Allow package in any location in rule

CHANGES.md

@@ -91,6 +91,9 @@ Unreleased
 - Support `(link_flags ...)` in `(cinaps ...)` stanza. (#7423, fixes #7416,
   @nojb)
 
+- Allow `(package ...)` in any position within `(rule ...)` stanza (#7445,
+  @Leonidas-from-XIV)
+
 3.7.0 (2023-02-17)
 ------------------
 

src/dune_rules/dune_file.ml

@@ -1728,6 +1728,7 @@ module Rule = struct
       ; ("aliases", Field)
       ; ("alias", Field)
       ; ("enabled_if", Field)
+      ; ("package", Field)
       ]
 
   let short_form =

test/blackbox-tests/test-cases/package-rule.t/dune

@@ -0,0 +1,12 @@
+(test
+ (name test)
+ (modules test test_a test_b)
+ (package a))
+
+(rule
+  (action (copy test_temp.ml test_a.ml))
+  (package a))
+
+(rule
+  (package a)
+  (action (copy test_temp.ml test_b.ml)))

test/blackbox-tests/test-cases/package-rule.t/dune-project

@@ -0,0 +1 @@
+(lang dune 2.0)

test/blackbox-tests/test-cases/package-rule.t/run.t

@@ -0,0 +1,5 @@
+When --only-packages is passed, it runs
+
+  $ dune build --only-packages a @runtest
+  A
+  A

test/blackbox-tests/test-cases/package-rule.t/test.ml

@@ -0,0 +1,2 @@
+module _ = Test_a
+module _ = Test_b

test/blackbox-tests/test-cases/package-rule.t/test_temp.ml

@@ -0,0 +1 @@
+let () = print_endline "A"