Browse Source

* also print method implementation when reusing a forward definition

git-svn-id: branches/jvmbackend@18548 -
Jonas Maebe 14 years ago
parent
commit
1b0b6a9d6d
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/symcreat.pas

+ 1 - 1
compiler/symcreat.pas

@@ -149,7 +149,7 @@ implementation
       if ((status.verbosity and v_debug)<>0) then
         begin
            if assigned(usefwpd) then
-             Message1(parser_d_internal_parser_string,usefwpd.customprocname([pno_proctypeoption,pno_paranames,pno_noclassmarker,pno_noleadingdollar]))
+             Message1(parser_d_internal_parser_string,usefwpd.customprocname([pno_proctypeoption,pno_paranames,pno_noclassmarker,pno_noleadingdollar])+str)
            else
              begin
                if is_classdef then