paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-04 17:50:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* internalerror in case a stringdef manages to get through to

Browse Source 
tjvmvecnode.pass_generate_code() (should be handled earlier)

git-svn-id: branches/jvmbackend@18573 -
This commit is contained in:
Jonas Maebe 2011-08-20 08:11:43 +00:00
parent 564b8a2cf7
commit 207a4a32d3
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/jvm/njvmmem.pas
View File

@ -199,13 +199,8 @@ implementation
var
newsize: tcgsize;
begin
{$ifndef nounsupported}
if left.resultdef.typ=stringdef then
begin
location:=left.location;
exit;
end;
{$endif}
internalerror(2011052702);
{ This routine is not used for Strings, as they are a class type and
you have to use charAt() there to load a character (and you cannot