waalge
/
aiken
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix parsing of negative bigint

This commit is contained in:
Niels Mündler 2023-12-18 14:28:33 +01:00 committed by Lucas
parent 0cfcd78039
commit 1b1636ab0e
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
crates/uplc/src/parser.rs
View File

@ -256,7 +256,10 @@ peg::parser! {
/ _* "I" _+ n:big_number() { match n.to_i64() { / _* "I" _+ n:big_number() { match n.to_i64() {
Some(n) => PlutusData::BigInt(pallas_primitives::alonzo::BigInt::Int(n.into())), Some(n) => PlutusData::BigInt(pallas_primitives::alonzo::BigInt::Int(n.into())),
None => match n.sign() { None => match n.sign() {
Sign::Minus => PlutusData::BigInt(pallas_primitives::babbage::BigInt::BigNInt(n.to_bytes_be().1.into())), Sign::Minus => {
let m: BigInt = n+1;
PlutusData::BigInt(pallas_primitives::babbage::BigInt::BigNInt(m.to_bytes_be().1.into()))
},
_ => PlutusData::BigInt(pallas_primitives::babbage::BigInt::BigUInt(n.to_bytes_be().1.into())) _ => PlutusData::BigInt(pallas_primitives::babbage::BigInt::BigUInt(n.to_bytes_be().1.into()))
} }
} } } }