Przeglądaj źródła

* changed shortstring llvm representation to a plain array of bytes, so
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 -

Jonas Maebe 11 lat temu
rodzic
commit
7d61ecf5ba
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      compiler/llvm/llvmdef.pas

+ 2 - 2
compiler/llvm/llvmdef.pas

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