Move program builder to uplc crate

crates/uplc/src/program_builder/tests.rs

@@ -0,0 +1,64 @@
+use super::*;
+use crate::parser;
+
+#[test]
+fn build_named__with_const() {
+    let code = r"(program
+                       11.22.33
+                       (con integer 11)
+                     )";
+    let expected = parser::program(code).unwrap();
+    let actual = Builder::new(11, 22, 33).with_constant_int(11).build_named();
+    assert_eq!(expected, actual);
+}
+
+#[test]
+fn build_named__with_different_const() {
+    let code = r"(program
+                       11.22.33
+                       (con integer 22)
+                     )";
+    let expected = parser::program(code).unwrap();
+    let actual = Builder::new(11, 22, 33).with_constant_int(22).build_named();
+    assert_eq!(expected, actual);
+}
+
+#[test]
+fn build_named__with_const_different_version() {
+    let code = r"(program
+                       44.55.66
+                       (con integer 11)
+                     )";
+    let expected = parser::program(code).unwrap();
+    let actual = Builder::new(44, 55, 66).with_constant_int(11).build_named();
+    assert_eq!(expected, actual);
+}
+
+#[test]
+fn build_named__with_lam() {
+    let code = r"(program
+                       1.2.3
+                       (lam i_0 (con integer 1))
+                     )";
+    let expected = parser::program(code).unwrap();
+    let actual = Builder::new(1, 2, 3)
+        .with_lambda("i_0")
+        .with_constant_int(1)
+        .build_named();
+    assert_eq!(expected, actual);
+}
+
+#[test]
+fn build_named__with_nested_lam() {
+    let code = r"(program
+                       1.2.3
+                       (lam i_0 (lam i_1 (con integer 1)))
+                     )";
+    let expected = parser::program(code).unwrap();
+    let actual = Builder::new(1, 2, 3)
+        .with_lambda("i_0")
+        .with_lambda("i_1")
+        .with_constant_int(1)
+        .build_named();
+    assert_eq!(expected, actual);
+}