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

Unify construction of PlutusData objects from int + fields

This commit is contained in:
Niels Mündler 2023-12-31 11:48:47 +01:00 committed by Kasey
parent 742a728d53
commit cda1716d47
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
crates/uplc/src/machine/runtime.rs
View File

@ -3,10 +3,10 @@ use std::{mem::size_of, ops::Deref, rc::Rc};
use num_bigint::BigInt; use num_bigint::BigInt;
use num_integer::Integer; use num_integer::Integer;
use once_cell::sync::Lazy; use once_cell::sync::Lazy;
use pallas_primitives::babbage::{Constr, Language, PlutusData}; use pallas_primitives::babbage::{Language, PlutusData};
use crate::{ use crate::{
ast::{Constant, Type}, ast::{Constant, Data, Type},
builtins::DefaultFunction, builtins::DefaultFunction,
plutus_data_to_bytes, plutus_data_to_bytes,
}; };
@ -752,11 +752,7 @@ impl DefaultFunction {
let i: u64 = i.try_into().unwrap(); let i: u64 = i.try_into().unwrap();
let constr_data = PlutusData::Constr(Constr { let constr_data = Data::constr(i, data_list);
tag: convert_constr_to_tag(i).unwrap_or(ANY_TAG),
any_constructor: convert_constr_to_tag(i).map_or(Some(i), |_| None),
fields: data_list,
});
let value = Value::data(constr_data); let value = Value::data(constr_data);