From 30a856c8dc61f6ae8458ca73d41386fc48df72db Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Basile=20Cl=C3=A9ment?= <bc@ocamlpro.com>
Date: Fri, 22 Sep 2023 09:44:51 +0200
Subject: [PATCH] Fix parsing for rounding_mode

---
 src/lsp/cobol_parser/grammar.mly | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/lsp/cobol_parser/grammar.mly b/src/lsp/cobol_parser/grammar.mly
index 15e154143..b055ec581 100644
--- a/src/lsp/cobol_parser/grammar.mly
+++ b/src/lsp/cobol_parser/grammar.mly
@@ -2581,10 +2581,10 @@ let rounding_mode :=
  | NEAREST_AWAY_FROM_ZERO;   {NearestAwayFromZero}
  | NEAREST_EVEN;             {NearestEven}
  | NEAREST_TOWARD_ZERO;      {NearestTowardZero}
- | PROHIBITED;               {TowardGreater}
- | TOWARD_GREATER;           {TowardLesser}
- | TOWARD_LESSER;            {Truncation}
- | TRUNCATION;               {Prohibited}
+ | PROHIBITED;               {Prohibited}
+ | TOWARD_GREATER;           {TowardGreater}
+ | TOWARD_LESSER;            {TowardLesser}
+ | TRUNCATION;               {Truncation}