add failing test + fix for enabled_if with <= operator

CHANGES.md

@@ -1,6 +1,9 @@
 Unreleased
 ----------
 
+- Fix parsing of the `<=` operator in *blang* expressions of `dune` files.
+  Previously, the operator would be interpreted as `,`. (#6928, @tatchi)
+
 - Fix `--trace-file` output. Dune now emits a single *complete* event for every
   executed process. Unterminated *async* events are no longer written. (#6892,
   @rgrinberg)

src/dune_rules/blang.ml

@@ -68,7 +68,7 @@ let rec to_dyn =
       [ Op.to_dyn o; String_with_vars.to_dyn s1; String_with_vars.to_dyn s2 ]
 
 let ops =
-  [ ("=", Op.Eq); (">=", Gte); ("<=", Lt); (">", Gt); ("<", Lt); ("<>", Neq) ]
+  [ ("=", Op.Eq); (">=", Gte); ("<=", Lte); (">", Gt); ("<", Lt); ("<>", Neq) ]
 
 let decode_gen decode_string =
   let open Dune_lang.Decoder in

test/blackbox-tests/test-cases/enabled_if/eif-ocaml_version_lte.t/dune

@@ -0,0 +1,20 @@
+(library
+ (name lte414caml)
+ (modules lte414caml)
+ (enabled_if
+  (<= %{ocaml_version} %{ocaml_version})))
+
+(rule
+ (with-stdout-to
+  lte414caml.ml
+  (echo "")))
+
+(rule
+ (with-stdout-to
+  main.ml
+  (echo "")))
+
+(executable
+ (name main)
+ (modules main)
+ (libraries lte414caml))

test/blackbox-tests/test-cases/enabled_if/eif-ocaml_version_lte.t/dune-project

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

test/blackbox-tests/test-cases/enabled_if/eif-ocaml_version_lte.t/run.t

@@ -0,0 +1 @@
+  $ dune build