Fixed BigInt multiplication test cases
This commit is contained in:
parent
7630bdddeb
commit
62887ad1d7
|
@ -628,7 +628,7 @@ begin
|
||||||
s := TBigInt.FromHexadecimalString(AHexValueProduct);
|
s := TBigInt.FromHexadecimalString(AHexValueProduct);
|
||||||
AssertTrue('Product of BigInt from ''' + AHexValueLeft + ''' and from ''' + AHexValueRight
|
AssertTrue('Product of BigInt from ''' + AHexValueLeft + ''' and from ''' + AHexValueRight
|
||||||
+ ''' was not equal to the BigInt from ''' + AHexValueProduct + '''.',
|
+ ''' was not equal to the BigInt from ''' + AHexValueProduct + '''.',
|
||||||
s = a + b);
|
s = a * b);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TBigIntProductTestCase.TestShort;
|
procedure TBigIntProductTestCase.TestShort;
|
||||||
|
|
Loading…
Reference in New Issue