Parcourir la source

Fix namespace unit case.

Margers il y a 5 mois
Parent
commit
1a1ca72067
1 fichiers modifiés avec 2 ajouts et 4 suppressions
  1. 2 4
      packages/hash/src/sha1.pp

+ 2 - 4
packages/hash/src/sha1.pp

@@ -52,12 +52,10 @@ implementation
 
 {$IFDEF FPC_DOTTEDUNITS}
 uses System.SysUtils,System.SysConst
-{$if defined(x86_64) or defined(CPU386)},System.Cpu{$endif}
-;
+{$if defined(x86_64) or defined(CPU386)},System.CPU{$endif};
 {$ELSE FPC_DOTTEDUNITS}
 uses sysutils,sysconst
-{$if defined(x86_64) or defined(CPU386)},cpu{$endif}
-;
+{$if defined(x86_64) or defined(CPU386)},cpu{$endif};
 {$ENDIF FPC_DOTTEDUNITS}
 
 procedure SHA1Init(out ctx: TSHA1Context);