From 2c3a30778bb5a281c10736470058b5a63575a516 Mon Sep 17 00:00:00 2001 From: beware Date: Sat, 8 Jan 2022 21:57:19 +0000 Subject: [PATCH] fixed that lcorernd would not compile if nolcorernd is defined, but should git-svn-id: file:///svnroot/lcore/trunk@165 b1de8a11-f9be-4011-bde0-cc7ace90066a --- lcorernd.pas | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lcorernd.pas b/lcorernd.pas index 6f1fe48..b435305 100644 --- a/lcorernd.pas +++ b/lcorernd.pas @@ -145,6 +145,13 @@ uses {$endif} {$endif} fastmd5,sysutils; +{$endif} + +const + wordsizeshift=2; + wordsize=1 shl wordsizeshift; + +{$ifndef nolcorernd} {$ifdef unix}{$include unixstuff.inc}{$endif} @@ -170,8 +177,6 @@ type hashtype=tmd5; const - wordsizeshift=2; - wordsize=1 shl wordsizeshift; //wordsize check commented out for d3 compatibility //{ $if (wordsize <> sizeof(wordtype))}'wordsizeshift must be setcorrectly'{ $ifend} hashsize=sizeof(hashtype); -- 2.30.2