X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/fed3bacaa7e5da92ab4cf44995b5a2bc26a81faa..b60a32da0a15deb572474b1f66a6c63695ed7491:/lcorernd.pas?ds=sidebyside 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);