From 113c80e966c61493850a5ffb379980bf547612b1 Mon Sep 17 00:00:00 2001 From: Paulo Meira <10246101+PMeira@users.noreply.github.com> Date: Thu, 1 Feb 2024 05:50:59 -0300 Subject: [PATCH] Obj: use INT32_MAX for NA values --- src/CAPI/CAPI_Obj.pas | 4 ++-- src/Common/DSSClass.pas | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/CAPI/CAPI_Obj.pas b/src/CAPI/CAPI_Obj.pas index 13bab2a67..b389ccca0 100644 --- a/src/CAPI/CAPI_Obj.pas +++ b/src/CAPI/CAPI_Obj.pas @@ -1715,7 +1715,7 @@ procedure Batch_SetInt32Array(batch: TDSSObjectPtr; batchSize: Integer; Index: I // Faster path for i := 1 to batchSize do begin - if (allowNA) or (Value^ <> $80000000) then + if (allowNA) or (Value^ <> $7fffffff) then begin // check for each element, in case the element is being edited somewhere else singleEdit := not (Flg.EditingActive in batch^.Flags); @@ -1738,7 +1738,7 @@ procedure Batch_SetInt32Array(batch: TDSSObjectPtr; batchSize: Integer; Index: I for i := 1 to batchSize do begin - if (allowNA) or (Value^ <> $80000000) then + if (allowNA) or (Value^ <> $7fffffff) then batch^.SetInteger(Index, Value^, setterFlags); inc(batch); inc(Value) diff --git a/src/Common/DSSClass.pas b/src/Common/DSSClass.pas index 8b1294694..80f79155f 100644 --- a/src/Common/DSSClass.pas +++ b/src/Common/DSSClass.pas @@ -92,7 +92,7 @@ interface // for other components if we think it fits. AvoidFullRecalc = 1, - // For batch operations, skip NA values -- values of NaN for float64, INT32_MIN (0x80000000) for int32, null pointers for strings. + // For batch operations, skip NA values -- values of NaN for float64, INT32_MAX (0x7fffffff) for int32, null pointers for strings. SkipNA = 2, Reserved3 = 3,