diff options
| author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-02-07 20:42:45 +0000 |
|---|---|---|
| committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-02-07 20:42:45 +0000 |
| commit | aacc32fbfa4bc2ef13fa288cc20b0b7640f439e7 (patch) | |
| tree | 66296c12a47b20d8b40baa4c65da0d9b3b1a5501 /packages/hash | |
| parent | 99fa5067ea4d1e1b672fdb2a39ea432640ed03ae (diff) | |
| download | fpc-aacc32fbfa4bc2ef13fa288cc20b0b7640f439e7.tar.gz | |
* fixed compilation with range checking switched on
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12700 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/hash')
| -rw-r--r-- | packages/hash/src/crc.pas | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/packages/hash/src/crc.pas b/packages/hash/src/crc.pas index 64c7c5dd82..781db5060e 100644 --- a/packages/hash/src/crc.pas +++ b/packages/hash/src/crc.pas @@ -298,6 +298,9 @@ end; { ======================================================================== Table of CRC-64's of all single-byte values (made by make_crc64_table) } +{$push} +{$r-} + {local} const crc64_table : array[Byte] of QWord = ( @@ -346,6 +349,8 @@ const $A6DF411FBFB21CA3,$DC0731D78F8795DA,$536FA08FDFD90E51,$29B7D047EFEC8728 ); +{$pop} + {$ENDIF} function get_crc64_table : {const} PQWord; |