paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 04:49:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Moved comment to top of file for better visibility

Browse Source
This commit is contained in:
Michaël Van Canneyt 2021-11-19 09:48:19 +01:00
parent 92978caa2f
commit d3000c6174
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
packages/fcl-hash/src/fpecc.pp
View File

@ -9,6 +9,11 @@
but WITHOUT ANY WARRANTY; without even the implied warranty of but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
} }
{
Part of this code is based on earlier work by Wolfgang Erhardt.
}
{$mode delphi} {$mode delphi}
unit fpECC; unit fpECC;
@ -73,10 +78,6 @@ implementation
uses sysutils, fphashutils; uses sysutils, fphashutils;
{
This code is based on earlier work by Wolfgang Erhardt.
}
type type
UInt128 = record UInt128 = record
m_low: UInt64; m_low: UInt64;