From 00086c3dfc3063c8273afbf66d323e95961c6af9 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Sat, 20 Aug 2011 08:12:48 +0000 Subject: [PATCH] * don't give an internalerror when encountering an invalid type while creating procdef's JVM mangled name, because this situation can also arise in case there's a simple error in the source code git-svn-id: branches/jvmbackend@18586 - --- compiler/symdef.pas | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/compiler/symdef.pas b/compiler/symdef.pas index ac42443d2a..fc7cc9a302 100644 --- a/compiler/symdef.pas +++ b/compiler/symdef.pas @@ -4531,8 +4531,8 @@ implementation tmpresult:=tmpresult+'['; { Add the parameter type. } if not jvmaddencodedtype(vs.vardef,false,tmpresult,signature,founderror) then - { should be checked earlier on } - internalerror(2010122604); + { an internalerror here is also triggered in case of errors in the source code } + tmpresult:=''; end; end; tmpresult:=tmpresult+')'; @@ -4541,7 +4541,8 @@ implementation if (proctypeoption in [potype_constructor,potype_class_constructor]) then jvmaddencodedtype(voidtype,false,tmpresult,signature,founderror) else if not jvmaddencodedtype(returndef,false,tmpresult,signature,founderror) then - internalerror(2010122610); + { an internalerror here is also triggered in case of errors in the source code } + tmpresult:=''; result:=tmpresult; end;