flat encoding for list and pairs

Co-authored-by: rvcas <x@rvcas.dev>

crates/uplc/src/machine/error.rs

@@ -1,8 +1,6 @@
-use std::fmt::Display;
-
 use thiserror::Error;
 
-use crate::ast::{NamedDeBruijn, Term};
+use crate::ast::{NamedDeBruijn, Term, Type};
 
 use super::{ExBudget, Value};
 
@@ -31,24 +29,3 @@ pub enum Error {
     #[error("The evaluation never reached a final state")]
     MachineNeverReachedDone,
 }
-
-#[derive(Debug, Clone, PartialEq)]
-pub enum Type {
-    Bool,
-    Integer,
-    String,
-    ByteString,
-    Unit,
-}
-
-impl Display for Type {
-    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
-        match self {
-            Type::Bool => write!(f, "bool"),
-            Type::Integer => write!(f, "integer"),
-            Type::String => write!(f, "string"),
-            Type::ByteString => write!(f, "bytestring"),
-            Type::Unit => write!(f, "unit"),
-        }
-    }
-}

crates/uplc/src/machine/runtime.rs

@@ -1,8 +1,10 @@
-use crate::{ast::Constant, builtins::DefaultFunction};
+use crate::{
+    ast::{Constant, Type},
+    builtins::DefaultFunction,
+};
 
 use super::{
     cost_model::{BuiltinCosts, ExBudget},
-    error::Type,
     Error, Value,
 };