@@ -14,7 +14,9 @@
// Normally, if an optimized version is available for OS/CPU, that will be used
// Define to force to use implementation in pascal
-{ $DEFINE SHA256PASCAL}
+{$ifdef OLD_ASSEMBLER}
+ {$DEFINE SHA256PASCAL}
+{$endif OLD_ASSEMBLER}
{$IFNDEF FPC_DOTTEDUNITS}
unit fpsha256;
@@ -15,7 +15,9 @@
// Define to use existing unoptimized implementation
-{ $DEFINE SHA1PASCAL}
+ {$DEFINE SHA1PASCAL}
unit sha1;