From fdb95809ff442207de8ee15c61d209de22eb3d51 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 4 Feb 2023 09:53:53 +0100
Subject: mcode/ortho_jit.adb: add option --be-g

---
 src/ortho/mcode/ortho_jit.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/ortho/mcode/ortho_jit.adb b/src/ortho/mcode/ortho_jit.adb
index 41777b1da..09413a960 100644
--- a/src/ortho/mcode/ortho_jit.adb
+++ b/src/ortho/mcode/ortho_jit.adb
@@ -103,7 +103,7 @@ package body Ortho_Jit is
    is
       Opt : constant String (1 .. Option'Length) := Option;
    begin
-      if Opt = "-g" then
+      if Opt = "-g" or else Opt = "--be-g" then
          Flag_Debug := Debug_Dwarf;
          return True;
       elsif Opt = "-g0" then
-- 
cgit v1.2.3