|
@@ -68,7 +68,7 @@ interface
|
|
|
record consisting of 4 longints must be returned as a record consisting of
|
|
|
two int64's on x86-64. This function is used to create (and reuse)
|
|
|
temporary recorddefs for such purposes.}
|
|
|
- function llvmgettemprecorddef(fieldtypes: array of tdef; packrecords, recordalignmin, maxcrecordalign: shortint): trecorddef;
|
|
|
+ function llvmgettemprecorddef(const fieldtypes: array of tdef; packrecords, recordalignmin, maxcrecordalign: shortint): trecorddef;
|
|
|
|
|
|
{ get the llvm type corresponding to a parameter, e.g. a record containing
|
|
|
two integer int64 for an arbitrary record split over two individual int64
|
|
@@ -855,7 +855,7 @@ implementation
|
|
|
end;
|
|
|
|
|
|
|
|
|
- function llvmgettemprecorddef(fieldtypes: array of tdef; packrecords, recordalignmin, maxcrecordalign: shortint): trecorddef;
|
|
|
+ function llvmgettemprecorddef(const fieldtypes: array of tdef; packrecords, recordalignmin, maxcrecordalign: shortint): trecorddef;
|
|
|
var
|
|
|
i: longint;
|
|
|
res: PHashSetItem;
|