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

update tests to account for new verbose tracing

This commit is contained in:
microproofs 2024-01-24 15:49:06 -05:00 committed by Kasey
parent 00e1942999
commit ae0b428658
9 changed files with 245 additions and 131 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__generics.snap
View File

@ -10,8 +10,8 @@ description: "Code:\n\ntype Either<left, right> {\n Left(left)\n Right(rig
"$ref": "#/definitions/test_module~1Either$ByteArray_test_module~1Interval$Int" "$ref": "#/definitions/test_module~1Either$ByteArray_test_module~1Interval$Int"
} }
}, },
"compiledCode": "59011a010000323232323232323232223253330064a22930a99803a4811856616c696461746f722072657475726e65642066616c73650013656323253330073370e900000089919299980698078010a4c2a660140082c6eb8c034004c01401054ccc01ccdc3a400400226464a66601a601e0042649319299980519b87480000044c8c94ccc040c048008526153300d00716375a602000260100042a66601466e1d20020011533300e3008002149854cc02c0145854cc02c01458c02000454cc02801058c034004c01401054cc02000858c01400d24012a72656465656d65723a204569746865723c4279746541727261792c20496e74657276616c3c496e743e3e00230063754002460086ea80055cd2b9c5573aaae7955cfaba157441", "compiledCode": "59018201000032323232323232323232223253330064a22930a99803a4811856616c696461746f722072657475726e65642066616c73650013656323253330073370e900000089929998060008a998048018b099299980698078010a4c2a660140082c64a6666660200022a660140082c2a660140082c2a660140082c2a660140082c26eb8004c034004c01401054ccc01ccdc3a4004002264a6660180022a660120062c264a66601a601e0042649319299980519b87480000044c94ccc03c00454cc030018584c94ccc040c048008526153300d00716325333333013001153300d00716153300d00716153300d007161375a0022a6601a00e2c602000260100042a66601466e1d20020011533300e3008002149854cc02c0145854cc02c01458c02000454cc02801058c034004c01401054cc02000858c01400d2412a72656465656d65723a204569746865723c4279746541727261792c20496e74657276616c3c496e743e3e00230063754002460086ea80055cd2b9c5573aaae7955cfaba15744ae901",
"hash": "a7f32d9d3ceada0a98ad4d125680692fa368de7504c9616f053cbcc2", "hash": "0f87c0d85728455ce7f0abccf44821d0a717377ea2508a8f98098ef3",
"definitions": { "definitions": {
"ByteArray": { "ByteArray": {
"dataType": "bytes" "dataType": "bytes"

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__list_2_tuples_as_map.snap
View File

@ -10,8 +10,8 @@ description: "Code:\n\ntype Dict<key, value> {\n inner: List<(ByteArray, valu
"$ref": "#/definitions/test_module~1Dict$test_module~1UUID_Int" "$ref": "#/definitions/test_module~1Dict$test_module~1UUID_Int"
} }
}, },
"compiledCode": "58bc01000032323232323232223253330044a22930a99802a4811856616c696461746f722072657475726e65642066616c73650013656323253330053370e9000000899192999805980680109924c646600200200444a66601a00229309919801801980800119191bad300e002375c6018002601c0022a660100082c6eacc02c004c020dd50020a998030010b18031baa00349011972656465656d65723a20446963743c555549442c20496e743e005734ae7155ceaab9e5573eae855d11", "compiledCode": "59012f0100003232323232323232223253330044a22930a99802a4811856616c696461746f722072657475726e65642066616c73650013656323253330053370e900000089929998050008a998038018b0992999805980680109924c646600200200444a66601a00229309919801801980800119191929999998098008a998068048b0a998068048b0a998068048b09bad001153300d00916300e002325333333012001153300c00816153300c00816153300c00816153300c008161375c0026018002601c0022a660100082c64a66666601c0022a660100082c26eac00454cc0200105854cc0200105854cc02001058c02c004c020dd50020a998030010b18031baa00349011972656465656d65723a20446963743c555549442c20496e743e005734ae7155ceaab9e5573eae855d12ba41",
"hash": "764465e16d4d85649f7e6bd982bb3620ca0ff51a54d442bc6c54147a", "hash": "63cbda46a8c3ae7caf82b5f5d9811244d9a7fc0a78c3a533b58a98ec",
"definitions": { "definitions": {
"ByteArray": { "ByteArray": {
"dataType": "bytes" "dataType": "bytes"

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__nested_data.snap
View File

@ -16,8 +16,8 @@ description: "Code:\n\npub type Foo {\n foo: Data\n}\n\nvalidator {\n fn nes
"$ref": "#/definitions/Int" "$ref": "#/definitions/Int"
} }
}, },
"compiledCode": "588701000032323232323232222323253330064a22930a99803a491856616c696461746f722072657475726e65642066616c73650013656375a0066464a66600c66e1d200000113232533300c300e002149854cc02401058c030004c024dd50028a998038010b18039baa00449010a646174756d3a20466f6f005734ae7155ceaab9e5573eae855d11", "compiledCode": "58c6010000323232323232323232222323253330074a22930a998042491856616c696461746f722072657475726e65642066616c73650013656533333300d0031533007005161533007005161533007005161375a0062a6600e00a2c6464a66600e66e1d2000001132533300c001153300900316132533300d300f002149854cc02801058c034004c028dd50028a998040010b18041baa0044910a646174756d3a20466f6f0049010d72656465656d65723a20496e74005734ae7155ceaab9e5573eae855d12ba41",
"hash": "7cec07afed8610f8ffea541bedaaef8598f4ea254e440315b325bb82", "hash": "a1640e0737853990f7e3eefcb90aeca0341dcfb233c6678118c44aa0",
"definitions": { "definitions": {
"Data": { "Data": {
"title": "Data", "title": "Data",

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__opaque_singleton_variants.snap
View File

@ -10,8 +10,8 @@ description: "Code:\n\npub opaque type Dict<key, value> {\n inner: List<(Byte
"$ref": "#/definitions/test_module~1Dict$test_module~1UUID_Int" "$ref": "#/definitions/test_module~1Dict$test_module~1UUID_Int"
} }
}, },
"compiledCode": "58700100003232323232323222323253330054a22930a9980324811856616c696461746f722072657475726e65642066616c73650013656323300100100222533300a00114984c8cc00c00cc034008c8c8dd698058011bae3009001300b0013756004ae695ce2ab9d5573caae7d5d0aba201", "compiledCode": "58f201000032323232323232323222323253330064a22930a99803a4811856616c696461746f722072657475726e65642066616c73650013656323300100100222533300b00114984c8cc00c00cc038008c8c8c94cccccc04400454cc02c0245854cc02c0245854cc02c024584dd68008a998058048b18060011929999998080008a998050040b0a998050040b0a998050040b0a998050040b09bae001300a001300c001533333300b002153300500316137560042a6600a0062c2a6600a0062c2a6600a0062c9211972656465656d65723a20446963743c555549442c20496e743e005734ae7155ceaab9e5573eae855d12ba41",
"hash": "8a89baa6035d083e7d59575b8fa1e8bd3fe485df94d0af356557b224", "hash": "434a25b2c808d3bf02e9cc4e4d22d0973288de5c7e9ee48bfe0c9b5b",
"definitions": { "definitions": {
"ByteArray": { "ByteArray": {
"dataType": "bytes" "dataType": "bytes"

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__recursive_generic_types.snap
View File

@ -16,8 +16,8 @@ description: "Code:\n\npub type LinkedList<a> {\n Cons(a, LinkedList<a>)\n Nil
"$ref": "#/definitions/test_module~1LinkedList$Int" "$ref": "#/definitions/test_module~1LinkedList$Int"
} }
}, },
"compiledCode": "5901dd01000032323232323232323222232323253330094a22930a998052491856616c696461746f722072657475726e65642066616c73650013656330020044911972656465656d65723a204c696e6b65644c6973743c496e743e00323253330093370e9000000899192999807980880109924c64660020020044464a66601c66e1d200000113232323253330163018002132498cc01c01c00454cc04c02c58c058004c058008cdc3a400460226ea8c050004c03000854ccc038cdc3a40040022a66602460180042930a998078038b0a998078038b18060008a998060020b180780098038030a99980499b87480080044c8c8c8c94ccc044c04c0084c9263232323300100100222533301500114984c8cc00c00cc060008cc02cc058004028dd618088011bae300f001153300e0061632337606024002602460260026eb0c044004c044008dd6980780098038030a998050010b1803802a490a646174756d3a20466f6f002232330010010032232533300b3370e90000008991919192999809980a80109924c6600e00e0022a660200102c602600260260046eb4c044004c02400854ccc02ccdc3a40040022a66601e60120042930a998060020b0a998060020b1804800918031baa001230043754002ae695ce2ab9d5573caae7d5d0aba201", "compiledCode": "5902f90100003232323232323232323222232323253330094a22930a998052491856616c696461746f722072657475726e65642066616c73650013656330020044911972656465656d65723a204c696e6b65644c6973743c496e743e00323253330093370e900000089929998070008a998058018b0992999807980880109924c64660020020044464a66601c66e1d20000011325333013001153301000816132325333015001153301200a1613253330163018002132498cc01c01c00454cc04c02c58c058004c058008c94cccccc05c0044cdc3a400460246ea800454cc0440245854cc0440245854cc0440245854cc04402458c050004c03000854ccc038cdc3a40040022a66602460180042930a998078038b0a998078038b18060008a998060020b180780098038030a99980499b87480080044c94ccc03800454cc02c00c584c8c94ccc04000454cc034014584c94ccc044c04c0084c9263232323300100100222533301500114984c8cc00c00cc060008cc02cc058004028c94cccccc05800454cc0400205854cc040020584dd60008a998080040b0a998080040b180880119299999980a8008a998078038b0a998078038b0a998078038b0a998078038b09bae001300f001153300e00616325333333014001153300e00616153300e00616132337606026002602660280026eb000454cc0380185854cc03801858c044004c044008c94cccccc04800454cc0300105854cc0300105854cc030010584dd68008a998060020b180780098038030a998050010b1803802a490a646174756d3a20466f6f002232330010010032232533300b3370e900000089929998080008a998068028b0991929998090008a998078038b0992999809980a80109924c6600e00e0022a660200102c6026002602600464a6666660280022a6601c00c2c2a6601c00c2c2a6601c00c2c26eb400454cc03801858c044004c02400854ccc02ccdc3a40040022a66601e60120042930a998060020b0a998060020b1804800918031baa001230043754002ae695ce2ab9d5573caae7d5d0aba257481",
"hash": "1b1cf024d6b864069416563b74b21c2e02dc8eef089c202f402b63ce", "hash": "be4c1ac3ac62d11a76267c4cb2dc85a8f5fff33f3370556f94e45a14",
"definitions": { "definitions": {
"Bool": { "Bool": {
"title": "Bool", "title": "Bool",

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__recursive_types.snap
View File

@ -10,8 +10,8 @@ description: "Code:\n\npub type Expr {\n Val(Int)\n Sum(Expr, Expr)\n Mul(Exp
"$ref": "#/definitions/test_module~1Expr" "$ref": "#/definitions/test_module~1Expr"
} }
}, },
"compiledCode": "5901060100003232323232323232223253330054a22930a9980324811856616c696461746f722072657475726e65642066616c73650013656323233001001004223253330083370e900000089919299980718080010a4c2a6601600c2c6eb4c038004c01c00854ccc020cdc3a4004002264646464a6660206024004264649319804004001198038038018a998068040b18080009808001180700098038010a99980419b87480100044c8c8c8c94ccc040c0480084c8c9263300800800233007007003153300d0081630100013010002300e00130070021533009004163009375400292010e72656465656d65723a204578707200230053754002ae695ce2ab9d5573caae7d5d0aba21", "compiledCode": "590164010000323232323232323232223253330054a22930a9980324811856616c696461746f722072657475726e65642066616c73650013656323233001001004223253330083370e900000089929998068008a998050028b099299980718080010a4c2a6601600c2c64a6666660220022a6601600c2c2a6601600c2c2a6601600c2c26eb400454cc02c01858c038004c01c00854ccc020cdc3a4004002264a66601a0022a6601400a2c26464a66601e0022a6601800e2c264a6660206024004264649319804004001198038038018a998068040b18080009808001180700098038010a99980419b87480100044c94ccc03400454cc028014584c8c94ccc03c00454cc03001c584c94ccc040c0480084c8c9263300800800233007007003153300d0081630100013010002300e00130070021533009004163009375400292010e72656465656d65723a204578707200230053754002ae695ce2ab9d5573caae7d5d0aba257481",
"hash": "2f1489f27f8ba5f0fb9530cf06162816e8bd250aaa50e4a8aa093f27", "hash": "10058db856dc8c56ff2567280a4ae4031af4e0a0dff3cdc398a4dde7",
"definitions": { "definitions": {
"Int": { "Int": {
"dataType": "integer" "dataType": "integer"

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__simplified_hydra.snap
View File

@ -16,8 +16,8 @@ description: "Code:\n\n/// On-chain state\ntype State {\n /// The contestatio
"$ref": "#/definitions/test_module~1Input" "$ref": "#/definitions/test_module~1Input"
} }
}, },
"compiledCode": "59015c010000323232323232323232222323253330084a22930a99804a491856616c696461746f722072657475726e65642066616c73650013656323253330093370e90000008a99980698038028a4c2a660140042c2a66601266e1d20020011533300d3007005149854cc0280085854ccc024cdc3a40080022a66601a600e00a2930a998050010b0a998050010b18038022490f72656465656d65723a20496e70757400323253330083370e900000089919191919192999809180a0010991924c646600200200a44a66602a00229309919801801980c0011bae301600132533300f3370e900000089919299980a980b8010a4c2a660240162c6eb4c054004c03401854cc04002458c03401454cc03c02058dd7180900098090011bac30100013010002300e0013006005153300900216300600449010c646174756d3a20537461746500230063754002460086ea80055cd2b9c5573aaae7955cfaba157441", "compiledCode": "59021301000032323232323232323232222323253330084a22930a99804a491856616c696461746f722072657475726e65642066616c73650013656323253330093370e90000008a99980698038028a4c2a660140042c2a66601266e1d20020011533300d3007005149854cc0280085854ccc024cdc3a40080022a66601a600e00a2930a998050010b0a998050010b18038022490f72656465656d65723a20496e70757400323253330083370e900000089929998068008a998050018b0991929998078008a998060028b0991929998088008a998070038b0992999809180a0010991924c646600200200a44a66602a00229309919801801980c00119299999980c8008a998098060b0a998098060b0a998098060b0a998098060b09bae001301600132533300f3370e9000000899299980a0008a998088050b099299980a980b8010a4c2a660240162c64a6666660300022a660240162c2a660240162c2a660240162c26eb400454cc04802c58c054004c03401854cc04002458c03401454cc03c02058c94cccccc05400454cc03c0205854cc03c0205854cc03c0205854cc03c020584dd7000980900098090011929999998098008a998068030b0a998068030b09bac001153300d00616153300d0061630100013010002300e0013006005153300900216300600449010c646174756d3a20537461746500230063754002460086ea80055cd2b9c5573aaae7955cfaba15744ae901",
"hash": "1aaeefe08859ba932c33615d0c3ccd7e63472ae2815c5dc4bc40d994", "hash": "d0abafee4c5e09143061189570374cbda2f606a4ad1c7b9ff02d8283",
"definitions": { "definitions": {
"ByteArray": { "ByteArray": {
"dataType": "bytes" "dataType": "bytes"

4
crates/aiken-project/src/blueprint/snapshots/aiken_project__blueprint__validator__tests__tuples.snap
View File

@ -16,8 +16,8 @@ description: "Code:\n\nvalidator {\n fn tuples(datum: (Int, ByteArray), redeeme
"$ref": "#/definitions/Tuple$Int_Int_Int" "$ref": "#/definitions/Tuple$Int_Int_Int"
} }
}, },
"compiledCode": "58ac010000323232323232322223232323253330084a22930a99804a491856616c696461746f722072657475726e65642066616c73650013656323232323253330103012002149854cc03524011972656465656d65723a2028496e742c20496e742c20496e74290016375a602000260200046eb4c038004c038008dd698060009bac00432375c60120046eb4c01c004c8cdd81805000980518058009bac0035734ae7155ceaab9e5573eae855d11", "compiledCode": "5901d50100003232323232323232323222232323232533300a4a22930a99805a491856616c696461746f722072657475726e65642066616c73650013656533300d001153300a0081613232533300f001153300c00a16132325333011001153300e00c1613253330123014002149854cc03c03458c94cccccc05400454cc03c0345854cc03c0345854cc03c034584dd68008a998078068b180900098090011929999998098008a998068058b0a998068058b0a998068058b09bad001153300d00b1630100013010002325333333011001153300b00916153300b00916153300b009161375a0022a660160122c601c002a66666601e0082a6601200e2c2a6601200e2c26eb001054cc02401c5854cc02401c58c8c94cccccc04000454cc02801c5854cc02801c5854cc02801c5854cc02801c584dd700098058011929999998078008a998048030b0a998048030b0a998048030b09bad0011533009006163009001533333300d0031533007004161533007004161323376060180026018601a0026eb000c54cc01c0105854cc01c0105924117646174756d3a2028496e742c20427974654172726179290049011972656465656d65723a2028496e742c20496e742c20496e7429005734ae7155ceaab9e5573eae855d12ba41",
"hash": "57605cf52e1d8a0d787d798282021853265d8d4c5dd99460b55e125d", "hash": "7a6bce99a2547d4ab078307472e0a4d45ede02e87cd0c5f73f981653",
"definitions": { "definitions": {
"ByteArray": { "ByteArray": {
"dataType": "bytes" "dataType": "bytes"

236
crates/aiken-project/src/tests/gen_uplc.rs
View File

@ -3203,6 +3203,9 @@ fn when_tuple_deconstruction() {
.apply(Term::integer(0.into())) .apply(Term::integer(0.into()))
.apply(Term::var("subject")) .apply(Term::var("subject"))
.delayed_if_then_else( .delayed_if_then_else(
Term::var("red_constr_fields")
.delayed_choose_list(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::tail_list() Term::tail_list()
.apply(Term::var("red_constr_fields")) .apply(Term::var("red_constr_fields"))
.delayed_choose_list( .delayed_choose_list(
@ -3210,9 +3213,26 @@ fn when_tuple_deconstruction() {
Term::Error.delayed_trace(Term::var("param_msg")), Term::Error.delayed_trace(Term::var("param_msg")),
) )
.lambda("field_1") .lambda("field_1")
.apply(Term::un_i_data().apply( .apply(
Term::head_list().apply(Term::var("red_constr_fields")), Term::var("__val")
)) .delayed_choose_data(
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::un_i_data().apply(Term::var("__val")),
Term::Error
.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(
Term::head_list()
.apply(Term::var("red_constr_fields")),
),
),
)
.lambda("red_constr_fields") .lambda("red_constr_fields")
.apply( .apply(
Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("red")), Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("red")),
@ -3249,6 +3269,9 @@ fn when_tuple_deconstruction() {
.apply(Term::integer(0.into())) .apply(Term::integer(0.into()))
.apply(Term::var("subject")) .apply(Term::var("subject"))
.delayed_if_then_else( .delayed_if_then_else(
Term::var("dat_constr_fields")
.delayed_choose_list(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::tail_list() Term::tail_list()
.apply(Term::var("dat_constr_fields")) .apply(Term::var("dat_constr_fields"))
.delayed_choose_list( .delayed_choose_list(
@ -3260,7 +3283,11 @@ fn when_tuple_deconstruction() {
Term::Error.delayed_trace(Term::var("param_msg")), Term::Error.delayed_trace(Term::var("param_msg")),
) )
.lambda("field_1") .lambda("field_1")
.apply(Term::head_list().apply(Term::var("dat_constr_fields"))) .apply(
Term::head_list()
.apply(Term::var("dat_constr_fields")),
),
)
.lambda("dat_constr_fields") .lambda("dat_constr_fields")
.apply( .apply(
Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("dat")), Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("dat")),
@ -3289,6 +3316,9 @@ fn when_tuple_deconstruction() {
.apply(Term::integer(0.into())) .apply(Term::integer(0.into()))
.apply(Term::var("subject")) .apply(Term::var("subject"))
.delayed_if_then_else( .delayed_if_then_else(
Term::var("field_1_constr_fields")
.delayed_choose_list(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::tail_list() Term::tail_list()
.apply(Term::var("field_1_constr_fields")) .apply(Term::var("field_1_constr_fields"))
.delayed_choose_list( .delayed_choose_list(
@ -3296,9 +3326,27 @@ fn when_tuple_deconstruction() {
Term::Error.delayed_trace(Term::var("param_msg")), Term::Error.delayed_trace(Term::var("param_msg")),
) )
.lambda("idx") .lambda("idx")
.apply(Term::un_i_data().apply( .apply(
Term::head_list().apply(Term::var("field_1_constr_fields")), Term::var("__val")
)) .delayed_choose_data(
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::un_i_data().apply(Term::var("__val")),
Term::Error
.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(
Term::head_list().apply(Term::var(
"field_1_constr_fields",
)),
),
),
)
.lambda("field_1_constr_fields") .lambda("field_1_constr_fields")
.apply( .apply(
Term::var(CONSTR_FIELDS_EXPOSER) Term::var(CONSTR_FIELDS_EXPOSER)
@ -5548,8 +5596,89 @@ fn opaque_value_in_datum() {
} }
"#; "#;
let expect_on_tail = Term::tail_list()
.apply(Term::var("tail_1"))
.delayed_choose_list(
Term::unit().lambda("_").apply(
Term::var("expect_on_list").apply(Term::var("a")).apply(
Term::var("expect_on_list")
.apply(Term::var("pair_snd_outer"))
.apply(
Term::var("__val")
.delayed_choose_data(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::un_i_data().apply(Term::var("__val")),
Term::Error.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(Term::snd_pair().apply(Term::var("pair")))
.lambda("pair_fst")
.apply(
Term::var("__val")
.delayed_choose_data(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::un_b_data().apply(Term::var("__val")),
)
.lambda("__val")
.apply(Term::fst_pair().apply(Term::var("pair"))),
)
.lambda("pair"),
)
.lambda("pair_snd_outer")
.apply(
Term::var("__val")
.delayed_choose_data(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::unmap_data().apply(Term::var("__val")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(Term::snd_pair().apply(Term::var("pair_outer"))),
)
.lambda("pair_fst_outer")
.apply(
Term::var("__val")
.delayed_choose_data(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::un_b_data().apply(Term::var("__val")),
)
.lambda("__val")
.apply(Term::fst_pair().apply(Term::var("pair_outer"))),
)
.lambda("pair_outer"),
),
),
Term::Error.delayed_trace(Term::var("param_msg")),
)
.lambda("a")
.apply(
Term::var("__val")
.delayed_choose_data(
Term::Error.delayed_trace(Term::var("param_msg")),
Term::unmap_data().apply(Term::var("__val")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
Term::Error.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(Term::head_list().apply(Term::var("tail_1"))),
);
assert_uplc( assert_uplc(
src, src,
Term::var("val")
.delayed_choose_list(
Term::Error.delayed_trace(Term::var("expect[(_,amount)]=val.inner.inner")),
Term::tail_list() Term::tail_list()
.apply(Term::var("val")) .apply(Term::var("val"))
.delayed_choose_list( .delayed_choose_list(
@ -5565,12 +5694,14 @@ fn opaque_value_in_datum() {
)])) )]))
.lambda("amount") .lambda("amount")
.apply( .apply(
Term::unmap_data().apply(Term::snd_pair().apply(Term::var("tuple_item_0"))), Term::unmap_data()
.apply(Term::snd_pair().apply(Term::var("tuple_item_0"))),
), ),
Term::Error.delayed_trace(Term::string("expect [(_, amount)] = val.inner.inner")), Term::Error.delayed_trace(Term::var("expect[(_,amount)]=val.inner.inner")),
) )
.lambda("tuple_item_0") .lambda("tuple_item_0")
.apply(Term::head_list().apply(Term::var("val"))) .apply(Term::head_list().apply(Term::var("val"))),
)
.lambda("val") .lambda("val")
.apply( .apply(
Term::unmap_data().apply( Term::unmap_data().apply(
@ -5595,61 +5726,35 @@ fn opaque_value_in_datum() {
.apply(Term::integer(0.into())) .apply(Term::integer(0.into()))
.apply(Term::var("subject")) .apply(Term::var("subject"))
.delayed_if_then_else( .delayed_if_then_else(
Term::tail_list() Term::var("dat_fields")
.apply(Term::var("tail_1"))
.delayed_choose_list( .delayed_choose_list(
Term::unit().lambda("_").apply(
Term::var("expect_on_list")
.apply(Term::var("a"))
.apply(
Term::var("expect_on_list")
.apply(Term::var("pair_snd_outer"))
.apply(
Term::un_i_data()
.apply(
Term::snd_pair()
.apply(Term::var("pair")),
)
.lambda("pair_fst")
.apply(
Term::un_b_data().apply(
Term::fst_pair().apply(
Term::var("pair"),
),
),
)
.lambda("pair"),
)
.lambda("pair_snd_outer")
.apply(
Term::unmap_data()
.apply(Term::snd_pair().apply(
Term::var("pair_outer"),
)),
)
.lambda("pair_fst_outer")
.apply(
Term::un_b_data()
.apply(Term::fst_pair().apply(
Term::var("pair_outer"),
)),
)
.lambda("pair_outer"),
),
),
Term::Error.delayed_trace(Term::var("param_msg")), Term::Error.delayed_trace(Term::var("param_msg")),
) Term::var("tail_1")
.lambda("a") .delayed_choose_list(
.apply( Term::Error.delayed_trace(Term::var("param_msg")),
Term::unmap_data() expect_on_tail,
.apply(Term::head_list().apply(Term::var("tail_1"))),
) )
.lambda("tail_1") .lambda("tail_1")
.apply(Term::tail_list().apply(Term::var("dat_fields"))) .apply(Term::tail_list().apply(Term::var("dat_fields")))
.lambda("c") .lambda("c")
.apply( .apply(
Term::un_i_data().apply( Term::var("__val")
Term::head_list().apply(Term::var("dat_fields")), .delayed_choose_data(
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::Error
.delayed_trace(Term::var("param_msg")),
Term::un_i_data().apply(Term::var("__val")),
Term::Error
.delayed_trace(Term::var("param_msg")),
)
.lambda("__val")
.apply(
Term::head_list()
.apply(Term::var("dat_fields")),
),
), ),
) )
.lambda("dat_fields") .lambda("dat_fields")
@ -5696,6 +5801,8 @@ fn opaque_value_in_datum() {
.lambda("ctx") .lambda("ctx")
.lambda("red") .lambda("red")
.lambda("dat") .lambda("dat")
.lambda("expect[(_,amount)]=val.inner.inner")
.apply(Term::string("expect [(_, amount)] = val.inner.inner"))
.constr_fields_exposer() .constr_fields_exposer()
.lambda("dat:Dat") .lambda("dat:Dat")
.apply(Term::string("dat: Dat")) .apply(Term::string("dat: Dat"))
@ -5744,6 +5851,9 @@ fn opaque_value_in_test() {
assert_uplc( assert_uplc(
src, src,
Term::var("val")
.delayed_choose_list(
Term::Error.delayed_trace(Term::var("expect[(_,amount)]=val.inner.inner")),
Term::tail_list() Term::tail_list()
.apply(Term::var("val")) .apply(Term::var("val"))
.delayed_choose_list( .delayed_choose_list(
@ -5759,12 +5869,14 @@ fn opaque_value_in_test() {
)])) )]))
.lambda("amount") .lambda("amount")
.apply( .apply(
Term::unmap_data().apply(Term::snd_pair().apply(Term::var("tuple_item_0"))), Term::unmap_data()
.apply(Term::snd_pair().apply(Term::var("tuple_item_0"))),
), ),
Term::Error.delayed_trace(Term::string("expect [(_, amount)] = val.inner.inner")), Term::Error.delayed_trace(Term::var("expect[(_,amount)]=val.inner.inner")),
) )
.lambda("tuple_item_0") .lambda("tuple_item_0")
.apply(Term::head_list().apply(Term::var("val"))) .apply(Term::head_list().apply(Term::var("val"))),
)
.lambda("val") .lambda("val")
.apply(Term::unmap_data().apply(Term::head_list().apply( .apply(Term::unmap_data().apply(Term::head_list().apply(
Term::tail_list().apply(Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("dat"))), Term::tail_list().apply(Term::var(CONSTR_FIELDS_EXPOSER).apply(Term::var("dat"))),
@ -5794,6 +5906,8 @@ fn opaque_value_in_test() {
)])) )]))
.into(), .into(),
)])) )]))
.lambda("expect[(_,amount)]=val.inner.inner")
.apply(Term::string("expect [(_, amount)] = val.inner.inner"))
.constr_fields_exposer(), .constr_fields_exposer(),
false, false,
); );