소스 검색

Fix namespace unit case.

Margers 5 달 전
부모
커밋
1a1ca72067
1개의 변경된 파일2개의 추가작업 그리고 4개의 파일을 삭제
  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);