"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "bcrc64.pas" between
peazip-7.7.0.src.zip and peazip-7.7.1.src.zip

About: PeaZip is an OS-portable graphical file archiver, acting as frontend for various open source archiving utilities (incl. its native Pea archive format).

bcrc64.pas  (peazip-7.7.0.src):bcrc64.pas  (peazip-7.7.1.src)
skipping to change at line 41 skipping to change at line 41
3.01 17.12.05 we Force $I- in bCRC64File 3.01 17.12.05 we Force $I- in bCRC64File
3.02 07.08.06 we $ifdef BIT32: (const fname: shortstring...) 3.02 07.08.06 we $ifdef BIT32: (const fname: shortstring...)
3.03 10.02.07 we bCRC64File: no eof, XL and filemode via $ifdef 3.03 10.02.07 we bCRC64File: no eof, XL and filemode via $ifdef
3.04 04.10.07 we FPC: {$asmmode intel} 3.04 04.10.07 we FPC: {$asmmode intel}
3.05 12.11.08 we uses BTypes, Ptr2Inc and/or Str255 3.05 12.11.08 we uses BTypes, Ptr2Inc and/or Str255
3.06 19.07.09 we D12 fix: assign with typecast string(fname) 3.06 19.07.09 we D12 fix: assign with typecast string(fname)
3.07 08.03.12 we {$ifndef BIT16} instead of {$ifdef WIN32} 3.07 08.03.12 we {$ifndef BIT16} instead of {$ifdef WIN32}
3.08 26.12.12 we D17 and PurePascal 3.08 26.12.12 we D17 and PurePascal
3.09 28.03.17 we No '$asmmode intel' for CPUARM 3.09 28.03.17 we No '$asmmode intel' for CPUARM
3.10 29.11.17 we bCRC64File - fname: string 3.10 29.11.17 we bCRC64File - fname: string
3.11 17.01.21 gt CPUAARCH64 disable Intel ASM
**************************************************************************) **************************************************************************)
(*------------------------------------------------------------------------- (*-------------------------------------------------------------------------
(C) Copyright 2002-2017 Wolfgang Ehrhardt (C) Copyright 2002-2017 Wolfgang Ehrhardt
This software is provided 'as-is', without any express or implied warranty. This software is provided 'as-is', without any express or implied warranty.
In no event will the authors be held liable for any damages arising from In no event will the authors be held liable for any damages arising from
the use of this software. the use of this software.
skipping to change at line 112 skipping to change at line 113
procedure bCRC64UpdateXL(var CRC: TCRC64b; Msg: pointer; Len: longint); procedure bCRC64UpdateXL(var CRC: TCRC64b; Msg: pointer; Len: longint);
{-update CRC64 with Msg data} {-update CRC64 with Msg data}
procedure bCRC64FullXL(var CRC: TCRC64b; Msg: pointer; Len: longint); procedure bCRC64FullXL(var CRC: TCRC64b; Msg: pointer; Len: longint);
{-CRC64 of Msg with init/update/final} {-CRC64 of Msg with init/update/final}
{$endif} {$endif}
implementation implementation
{$ifdef FPC} {$ifdef FPC}
{$ifndef CPUARM} {$if defined(CPUARM) or defined(CPUAARCH64)}
{$asmmode intel} {$asmmode intel}
{$endif} {$endif}
{$endif} {$endif}
(************************************************************************* (*************************************************************************
T_CTab64 - CRC64 table calculation (c) 2002-2004 W.Ehrhardt T_CTab64 - CRC64 table calculation (c) 2002-2004 W.Ehrhardt
Calculate CRC64 tables for polynomial: Calculate CRC64 tables for polynomial:
x^64 + x^62 + x^57 + x^55 + x^54 + x^53 + x^52 + x^47 + x^46 + x^45 + x^64 + x^62 + x^57 + x^55 + x^54 + x^53 + x^52 + x^47 + x^46 + x^45 +
 End of changes. 2 change blocks. 
1 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)