Validate: Normalize num/int/uint to Perl numeric types + add 64bit limit to int/uint

Normalization may be undone by later validations, but this should work
in most cases.
This commit is contained in:
Yorhel 2025-03-30 13:51:14 +02:00
parent 2f50736782
commit 13661b46f9
2 changed files with 10 additions and 9 deletions

View file

@ -209,8 +209,8 @@ t { num => 1 }, '1', '1';
f { num => 1 }, '1.1.', nerr '1.1.';
f { num => 1 }, '1.-1', nerr '1.-1';
f { num => 1 }, '.1', nerr '.1';
t { num => 1 }, '0.1e5', '0.1e5';
t { num => 1 }, '0.1e+5', '0.1e+5';
t { num => 1 }, '0.1e5', 10000;
t { num => 1 }, '0.1e+5', 10000;
f { num => 1 }, '0.1e5.1', nerr '0.1e5.1';
t { int => 1 }, 0, 0;
t { int => 1 }, -123, -123;