mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-04-05 20:37:47 +02:00
13 lines
468 B
C++
13 lines
468 B
C++
|
|
V:=value;
|
|
AssertEquals('ToString',ValueAsString,V.ToString);
|
|
AssertEquals('ToBoolean',True,V.ToBoolean);
|
|
V:=0;
|
|
AssertEquals('ToBoolean (false)',False,V.ToBoolean);
|
|
V:=value;
|
|
AssertEquals('ToHexString',ValueAshex,V.ToHexString);
|
|
AssertEquals('ToHexString(digits)',ValueAsHexDigString,V.ToHexString(ValueAsHexDig));
|
|
AssertEquals('ToDouble',Double(Value+0.0),V.ToDouble,0.00001);
|
|
AssertEquals('ToExtended',Extended(Value+0.0),V.ToExtended,0.00001);
|
|
|