New "i62" code for big integers with 64x64->128 opcodes; also improved "i31" modular...

[BearSSL] / src / x509 / asn1.t0

diff --git a/src/x509/asn1.t0 b/src/x509/asn1.t0
index 1b3313a..d6bb2e4 100644 (file)
--- a/src/x509/asn1.t0
+++ b/src/x509/asn1.t0
@@ -284,7 +284,7 @@ cc: get32 ( addr -- val ) {
        \ single integer.
        { n } 0
        begin n 0 > while n 1- >n
-               dup 0xFFFFFF > if ERR_X509_INNER_TRUNC fail then
+               dup 0x7FFFFF > if ERR_X509_INNER_TRUNC fail then
                8 << swap read8 rot +
        repeat ;