diff --git a/compiler/aggas.pas b/compiler/aggas.pas
index 177214afb3..1c3cc37977 100644
--- a/compiler/aggas.pas
+++ b/compiler/aggas.pas
@@ -1539,7 +1539,7 @@ implementation
       i: longint;
     begin
 {$ifdef EXTDEBUG}
-      if assigned(current_module.mainsource) then
+      if current_module.mainsource<>'' then
        Comment(V_Debug,'Start writing gas-styled assembler output for '+current_module.mainsource);
 {$endif}
 
@@ -1583,7 +1583,7 @@ implementation
 
       AsmLn;
 {$ifdef EXTDEBUG}
-      if assigned(current_module.mainsource) then
+      if current_module.mainsource<>'' then
        Comment(V_Debug,'Done writing gas-styled assembler output for '+current_module.mainsource);
 {$endif EXTDEBUG}
     end;