chore: move a test case to 049

examples/acceptance_tests/049/aiken.lock

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

examples/acceptance_tests/049/aiken.toml

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

examples/acceptance_tests/049/assets/foo/spend/mainnet.addr

@@ -0,0 +1 @@
+addr1w9z47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdcd0futm

examples/acceptance_tests/049/assets/foo/spend/payment_script.json

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

examples/acceptance_tests/049/assets/foo/spend/script.cbor

@@ -0,0 +1 @@
+4d01000022253335734944526161

examples/acceptance_tests/049/assets/foo/spend/testnet.addr

@@ -0,0 +1 @@
+addr_test1wpz47fyj9ffqck2fnld04k27zfe04wq6n9zj76u4ghu4xdck8aqy7

examples/acceptance_tests/049/lib/tests.ak

@@ -0,0 +1,9 @@
+pub fn when_tuple(a: (Int, Int)) -> Int {
+  when a is {
+    (a, b) -> a
+  }
+}
+
+test when_tuple_1() {
+  when_tuple((4, 1)) == 4
+}