Explorar el Código

* fixed datadef for untyped string constants (terminating #0 is one
character, not two)

git-svn-id: branches/hlcgllvm@28320 -

Jonas Maebe hace 11 años
padre
commit
4f906fb9c9
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      compiler/llvm/nllvmcon.pas

+ 1 - 1
compiler/llvm/nllvmcon.pas

@@ -69,7 +69,7 @@ implementation
                   constants (-> excludes terminating #0) and pchars (-> includes
                   terminating #0). The resultdef excludes the #0 while the data
                   includes it -> insert typecast from datadef to resultdef }
-                datadef:=getarraydef(cansichartype,len+2);
+                datadef:=getarraydef(cansichartype,len+1);
               cst_shortstring:
                 { the resultdef of the string constant is the type of the
                   string to which it is assigned, which can be longer or shorter