paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 13:59:55 +02:00
Code Issues Packages Projects Releases Wiki Activity

* also print method implementation when reusing a forward definition

Browse Source 
git-svn-id: branches/jvmbackend@18548 -
This commit is contained in:
Jonas Maebe 2011-08-20 08:09:26 +00:00
parent f187128428
commit 1b0b6a9d6d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/symcreat.pas
View File

@ -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