From e68b8467b69fb218c87aa705958cf4477c1d9822 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Wed, 6 Jul 2016 06:13:08 +0000
Subject: [PATCH]  Use 'debug watcom all' if -g, without dwarf option is used

git-svn-id: trunk@34077 -
---
 compiler/systems/t_msdos.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/compiler/systems/t_msdos.pas b/compiler/systems/t_msdos.pas
index 5eaf4f1b32..4755fc39ff 100644
--- a/compiler/systems/t_msdos.pas
+++ b/compiler/systems/t_msdos.pas
@@ -266,7 +266,9 @@ begin
   LinkRes.Add('option quiet');
 
   if target_dbg.id in [dbg_dwarf2,dbg_dwarf3,dbg_dwarf4] then
-    LinkRes.Add('debug dwarf');
+    LinkRes.Add('debug dwarf')
+  else if cs_debuginfo in current_settings.moduleswitches then
+    LinkRes.Add('debug watcom all');
 
   { add objectfiles, start with prt0 always }
   case current_settings.x86memorymodel of