paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 20:29:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

* changed shortstring llvm representation to a plain array of bytes, so

Browse Source 
it can be directly indexed rather than that we need to separately
    select the byte or data (just like at the Pascal level, and how it
    is/will be handled in the code generator)

git-svn-id: branches/hlcgllvm@27015 -
This commit is contained in:
Jonas Maebe 2014-03-06 21:42:21 +00:00
parent 0fd172ddf6
commit 7d61ecf5ba
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/llvm/llvmdef.pas
View File

@ -160,9 +160,9 @@ implementation
st_shortstring:
{ length byte followed by string bytes }
if tstringdef(def).len>0 then
encodedstr:=encodedstr+'{i8, ['+tostr(tstringdef(def).len)+' x i8]}'
encodedstr:=encodedstr+'['+tostr(tstringdef(def).len+1)+' x i8]}'
else
encodedstr:=encodedstr+'{i8, [0 x i8]}';
encodedstr:=encodedstr+'[0 x i8]';
else
internalerror(2013100201);
end;