From efca4cf158603cdb15faac1eed5279a4d1d21c11 Mon Sep 17 00:00:00 2001
From: Mateo <mateo.dugas@ocamlpro.com>
Date: Mon, 5 Aug 2024 16:22:04 +0200
Subject: [PATCH] fix: remove mutal exclusion of Z and CS

The mutal exclusion of Z and CS as a floating insertion char is handled by the precedence grid
---
 src/lsp/cobol_data/data_picture.ml | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/lsp/cobol_data/data_picture.ml b/src/lsp/cobol_data/data_picture.ml
index b1ac5d5e..a890e1eb 100644
--- a/src/lsp/cobol_data/data_picture.ml
+++ b/src/lsp/cobol_data/data_picture.ml
@@ -764,12 +764,11 @@ let char_order_checker_for_pic_string config =
 (* Maybe not in ISO/IEC 2014: Z/CS *)
 let mutual_exclusions =
   SymbolsMap.of_seq @@ List.to_seq [
-    CS, Symbols.singleton Z;
     DecimalSep, Symbols.of_list [P; V];
     P, Symbols.singleton DecimalSep;
     Star, Symbols.singleton Z;
     V, Symbols.singleton DecimalSep;
-    Z, Symbols.of_list [Star; CS];
+    Z, Symbols.singleton Star;
   ]
 
 type exp_sequence_state =