Add new acceptance test scenario 048

This commit is contained in:
KtorZ 2023-01-21 17:49:44 +01:00
parent 5d7585cc05
commit a926a1a2d4
No known key found for this signature in database
GPG Key ID: 33173CB6F77F4277
7 changed files with 49 additions and 0 deletions

View File

@ -0,0 +1,5 @@
# This file was generated by Aiken
# You typically do not need to edit this file
requirements = []
packages = []

View File

@ -0,0 +1,3 @@
name = 'aiken-lang/acceptance_test_048'
version = '0.0.0'
description = ''

View File

@ -0,0 +1 @@
addr1w9z47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdcd0futm

View File

@ -0,0 +1,5 @@
{
"type": "PlutusScriptV2",
"description": "Generated by Aiken",
"cborHex": "4e4d01000022253335734944526161"
}

View File

@ -0,0 +1 @@
4d01000022253335734944526161

View File

@ -0,0 +1 @@
addr_test1wpz47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdck8aqy7

View File

@ -0,0 +1,33 @@
test foo_1() {
let a = False
when a is {
a if a -> False
_ -> True
}
}
test foo_2() {
let point = (14, 42)
when point is {
(x, _) if x > 100 -> False
(x, _) if x > 10 -> True
_ -> False
}
}
test foo_3() {
let point = (14, 42)
when point is {
(x, y) if x == 14 && y <= 100 -> True
_ -> False
}
}
test foo_4() {
let a = False
let point = (14, 42)
when point is {
(x, y) if !a -> x + y == 56
_ -> False
}
}