From: beware Date: Sat, 8 Jan 2022 21:57:19 +0000 (+0000) Subject: fixed that lcorernd would not compile if nolcorernd is defined, but should X-Git-Url: http://www.lcore.org/git/lcore.git/commitdiff_plain/2c3a30778bb5a281c10736470058b5a63575a516?ds=inline;hp=0c9341fb9508e6dc82fb3dd32324b26c74afe3fd 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 --- 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);