diff --git a/tzt_reference_test_suite/LICENSE b/tzt_reference_test_suite/LICENSE new file mode 100644 index 0000000000000000000000000000000000000000..56ac86e54ef0f268094199f0d1db945459f3838f --- /dev/null +++ b/tzt_reference_test_suite/LICENSE @@ -0,0 +1,60 @@ +============================================================================== +The Michelson Semantics in K Release License +============================================================================== +University of Illinois/NCSA +Open Source License + +Copyright (c) 2019-2020 Runtime Verification, Inc. +All rights reserved. + +Developed by: + + K Team (http://kframework.org) + with members from: + + * University of Illinois at Urbana-Champaign (http://fsl.cs.illinois.edu/) + * Runtime Verification, Inc (https://www.runtimeverification.com) + * University Alexandru-Ioan Cuza, Romania (https://fmse.info.uaic.ro) + +Permission is hereby granted, free of charge, to any person obtaining a copy of +this software and associated documentation files (the "Software"), to deal with +the Software without restriction, including without limitation the rights to +use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies +of the Software, and to permit persons to whom the Software is furnished to do +so, subject to the following conditions: + + + * Redistributions of source code must retain the above copyright notice, + this list of conditions and the following disclaimers. + + * Redistributions in binary form must reproduce the above copyright notice, + this list of conditions and the following disclaimers in the + documentation and/or other materials provided with the distribution. + + * Neither the names of the K Team, Runtime Verification, the University of + Illinois at Urbana-Champaign, the University Alexandru-Ioan Cuza, nor + the names of its contributors may be used to endorse or promote products + derived from this Software without specific prior written permission. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +CONTRIBUTORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS WITH THE +SOFTWARE. + +============================================================================== +Copyrights and Licenses for Third Party Software Distributed with the +Michelson Semantics in K: +============================================================================== +The Michelson Semantics in K software contains code written by third parties. +Such software will have its own individual license file(s) in the directory in +which it appears. The file(s) will describe the copyrights, license, and +restrictions which apply to that code. + +The disclaimer of warranty in the University of Illinois Open Source License +applies to all code in the Michelson Semantics in K Distribution, and nothing +in any of the other licenses gives permission to use the names of the K Team, +Runtime Verification, the University of Illinois, or the University +Alexandru-Ioan Cuza to endorse or promote products derived from this Software. diff --git a/tzt_reference_test_suite/abs_00.tzt b/tzt_reference_test_suite/abs_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4bccd72c94e79fb1d35042292a0c656beb4da523 --- /dev/null +++ b/tzt_reference_test_suite/abs_00.tzt @@ -0,0 +1,3 @@ +code { ABS } ; +input { Stack_elt int -5 } ; +output { Stack_elt nat 5 } diff --git a/tzt_reference_test_suite/abs_01.tzt b/tzt_reference_test_suite/abs_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c4f9df37f0b6bf86bccc3cb8d8ab39a7868a8da4 --- /dev/null +++ b/tzt_reference_test_suite/abs_01.tzt @@ -0,0 +1,3 @@ +code { ABS } ; +input { Stack_elt int 5 } ; +output { Stack_elt nat 5 } diff --git a/tzt_reference_test_suite/abs_02.tzt b/tzt_reference_test_suite/abs_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f2c976ed6f7c5c5c32c640d51edd8b58bbecafb0 --- /dev/null +++ b/tzt_reference_test_suite/abs_02.tzt @@ -0,0 +1,3 @@ +code { ABS } ; +input { Stack_elt int 0 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/add_00.tc.tzt b/tzt_reference_test_suite/add_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..95a8f2dba0905510080a50e80248486aea8c3030 --- /dev/null +++ b/tzt_reference_test_suite/add_00.tc.tzt @@ -0,0 +1,3 @@ +code { ADD }; +input { Stack_elt unit Unit; Stack_elt unit Unit }; +output (StaticError _) diff --git a/tzt_reference_test_suite/add_01.tc.tzt b/tzt_reference_test_suite/add_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5cda99cfa6cdd98e0bac66be0106f592db6a462b --- /dev/null +++ b/tzt_reference_test_suite/add_01.tc.tzt @@ -0,0 +1,3 @@ +code { ADD }; +input { Stack_elt int 1 }; +output (StaticError _) diff --git a/tzt_reference_test_suite/add_int-int_00.tzt b/tzt_reference_test_suite/add_int-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d5faf76e124d912107933e25108a3843802bfebf --- /dev/null +++ b/tzt_reference_test_suite/add_int-int_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt int 5 ; Stack_elt int 5 } ; +output { Stack_elt int 10 } diff --git a/tzt_reference_test_suite/add_int-nat_00.tzt b/tzt_reference_test_suite/add_int-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..72722e1de0824987eee4deb1bf89e0424423b06a --- /dev/null +++ b/tzt_reference_test_suite/add_int-nat_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt int 5 ; Stack_elt nat 5 } ; +output { Stack_elt int 10 } diff --git a/tzt_reference_test_suite/add_int-nat_01.tzt b/tzt_reference_test_suite/add_int-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4b6c224325baa910ff1103058910f7e11e64a05d --- /dev/null +++ b/tzt_reference_test_suite/add_int-nat_01.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt int -5 ; Stack_elt nat 2 } ; +output { Stack_elt int -3 } diff --git a/tzt_reference_test_suite/add_int-timestamp_00.tzt b/tzt_reference_test_suite/add_int-timestamp_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5229b9af6a55211c86cbae79ba49949b66fae6bf --- /dev/null +++ b/tzt_reference_test_suite/add_int-timestamp_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt int 5 ; Stack_elt timestamp 5 } ; +output { Stack_elt timestamp 10 } diff --git a/tzt_reference_test_suite/add_mutez-mutez_00.tzt b/tzt_reference_test_suite/add_mutez-mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2a5a006f1ab873cf882f8924b2e777d70c090e10 --- /dev/null +++ b/tzt_reference_test_suite/add_mutez-mutez_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt mutez 5 ; Stack_elt mutez 12 } ; +output { Stack_elt mutez 17 } diff --git a/tzt_reference_test_suite/add_mutez-mutez_01.tzt b/tzt_reference_test_suite/add_mutez-mutez_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a4c929f57f67c2a3f4bd784063e106ef201580c9 --- /dev/null +++ b/tzt_reference_test_suite/add_mutez-mutez_01.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt mutez 9223372036854775807 ; Stack_elt mutez 1 } ; +output (MutezOverflow 9223372036854775807 1) diff --git a/tzt_reference_test_suite/add_nat-int_00.tzt b/tzt_reference_test_suite/add_nat-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..db3e6344495a18cf7a7b56498cb60e4e69d1c6a7 --- /dev/null +++ b/tzt_reference_test_suite/add_nat-int_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt nat 5 ; Stack_elt int 5 } ; +output { Stack_elt int 10 } diff --git a/tzt_reference_test_suite/add_nat-nat_00.tzt b/tzt_reference_test_suite/add_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ac69e81dcaad84c4f3c1cb1b701fc9f316f4e1af --- /dev/null +++ b/tzt_reference_test_suite/add_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt nat 5 ; Stack_elt nat 5 } ; +output { Stack_elt nat 10 } diff --git a/tzt_reference_test_suite/add_timestamp-int_00.tzt b/tzt_reference_test_suite/add_timestamp-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..762e7c841cee2f7f11a61fd8d60a2062bef66ee1 --- /dev/null +++ b/tzt_reference_test_suite/add_timestamp-int_00.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt timestamp 5 ; Stack_elt int 5 } ; +output { Stack_elt timestamp 10 } diff --git a/tzt_reference_test_suite/add_timestamp-int_01.tzt b/tzt_reference_test_suite/add_timestamp-int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..36feb3aaa2a0481cf4ba59d01a8028ff29014c9e --- /dev/null +++ b/tzt_reference_test_suite/add_timestamp-int_01.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt timestamp 100 ; Stack_elt int 100 } ; +output { Stack_elt timestamp 200 } diff --git a/tzt_reference_test_suite/add_timestamp-int_02.tzt b/tzt_reference_test_suite/add_timestamp-int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..576713a2498dff572cb21e3c8ae742e6d0733ec7 --- /dev/null +++ b/tzt_reference_test_suite/add_timestamp-int_02.tzt @@ -0,0 +1,3 @@ +code { ADD } ; +input { Stack_elt timestamp 100 ; Stack_elt int -100 } ; +output { Stack_elt timestamp 0 } diff --git a/tzt_reference_test_suite/add_timestamp-int_03.tzt b/tzt_reference_test_suite/add_timestamp-int_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0848ed7110b10e1b166bf99ffb7407112c3010a6 --- /dev/null +++ b/tzt_reference_test_suite/add_timestamp-int_03.tzt @@ -0,0 +1,3 @@ +code { } ; +input { Stack_elt timestamp 0 } ; +output { Stack_elt timestamp "1970-01-01T00:00:00Z" } diff --git a/tzt_reference_test_suite/address_00.tc.tzt b/tzt_reference_test_suite/address_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b2127af56d15091799234460a7efec27d923dc2e --- /dev/null +++ b/tzt_reference_test_suite/address_00.tc.tzt @@ -0,0 +1,3 @@ +code { ADDRESS } ; +input { Stack_elt unit Unit } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/address_00.tzt b/tzt_reference_test_suite/address_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d6a4a02b597a36afbf1bd59eebbfaa81d895116e --- /dev/null +++ b/tzt_reference_test_suite/address_00.tzt @@ -0,0 +1,4 @@ +code { ADDRESS } ; +input { Stack_elt (contract unit) "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" unit } diff --git a/tzt_reference_test_suite/address_01.tzt b/tzt_reference_test_suite/address_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3b4fcf9430fb12fde77f1cd95ce4cb60d7d6c0fc --- /dev/null +++ b/tzt_reference_test_suite/address_01.tzt @@ -0,0 +1,3 @@ +code { ADDRESS } ; +input { Stack_elt (contract unit) "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt address "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; diff --git a/tzt_reference_test_suite/address_02.tzt b/tzt_reference_test_suite/address_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dc12811aae862bad51c9bad508eb9abfe30fdea1 --- /dev/null +++ b/tzt_reference_test_suite/address_02.tzt @@ -0,0 +1,4 @@ +code { ADDRESS } ; +input { Stack_elt (contract nat) "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" nat } diff --git a/tzt_reference_test_suite/amount_00.tzt b/tzt_reference_test_suite/amount_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9042e27e05e8b2925303b06babd567486d226a02 --- /dev/null +++ b/tzt_reference_test_suite/amount_00.tzt @@ -0,0 +1,4 @@ +code { AMOUNT } ; +input { } ; +output { Stack_elt mutez 10 } ; +amount 10 diff --git a/tzt_reference_test_suite/and_bool-bool_00.tzt b/tzt_reference_test_suite/and_bool-bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8821a342da99a5eee6de465f17ee9a93877cf7a3 --- /dev/null +++ b/tzt_reference_test_suite/and_bool-bool_00.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bool False ; Stack_elt bool False } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/and_bool-bool_01.tzt b/tzt_reference_test_suite/and_bool-bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0ce46b9ad3f958e29b439765eecec976539d7f67 --- /dev/null +++ b/tzt_reference_test_suite/and_bool-bool_01.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bool False ; Stack_elt bool True } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/and_bool-bool_02.tzt b/tzt_reference_test_suite/and_bool-bool_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d66ea8a525e98a1b6629d8920dcd11b76fee74ae --- /dev/null +++ b/tzt_reference_test_suite/and_bool-bool_02.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bool True ; Stack_elt bool False } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/and_bool-bool_03.tzt b/tzt_reference_test_suite/and_bool-bool_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2a1bff4ac3bc05f5b16d5dd154577fccf85d2af7 --- /dev/null +++ b/tzt_reference_test_suite/and_bool-bool_03.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bool True ; Stack_elt bool True } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/and_bytes-bytes_00.tzt b/tzt_reference_test_suite/and_bytes-bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c8872bfa90d7a9c8110c64ff8ce5b6d7383b445c --- /dev/null +++ b/tzt_reference_test_suite/and_bytes-bytes_00.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bytes 0x0C ; Stack_elt bytes 0x05 } ; +output { Stack_elt bytes 0x04 } diff --git a/tzt_reference_test_suite/and_bytes-bytes_01.tzt b/tzt_reference_test_suite/and_bytes-bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3e25ecb7e68d1f3ac47d07a355ae2fe30fcadb0a --- /dev/null +++ b/tzt_reference_test_suite/and_bytes-bytes_01.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bytes 0xAB4C ; Stack_elt bytes 0xC5CD } ; +output { Stack_elt bytes 0x814c } diff --git a/tzt_reference_test_suite/and_bytes-bytes_02.tzt b/tzt_reference_test_suite/and_bytes-bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..97b94f24f8c9debdcb2cc6f8fccd9d92a3cc2fc6 --- /dev/null +++ b/tzt_reference_test_suite/and_bytes-bytes_02.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bytes 0x05 ; Stack_elt bytes 0x0C } ; +output { Stack_elt bytes 0x04 } diff --git a/tzt_reference_test_suite/and_bytes-bytes_03.tzt b/tzt_reference_test_suite/and_bytes-bytes_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..45367f8d7bb8dea68d92d6be69d7f8940c0bc3c5 --- /dev/null +++ b/tzt_reference_test_suite/and_bytes-bytes_03.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt bytes 0x ; Stack_elt bytes 0x10 } ; +output { Stack_elt bytes 0x } diff --git a/tzt_reference_test_suite/and_int-nat_00.tzt b/tzt_reference_test_suite/and_int-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0a0bbd1136275de08040370cbec007f19c7edd66 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_00.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int -1 ; Stack_elt nat 12 } ; +output { Stack_elt nat 12 } diff --git a/tzt_reference_test_suite/and_int-nat_01.tzt b/tzt_reference_test_suite/and_int-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..36212631357277fdf641ea0f87de25fa29bb6743 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_01.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int -5 ; Stack_elt nat 12 } ; +output { Stack_elt nat 8 } diff --git a/tzt_reference_test_suite/and_int-nat_02.tzt b/tzt_reference_test_suite/and_int-nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..062417b22be5f2f003dfcf950d66fa4395113c32 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_02.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int 5 ; Stack_elt nat 12 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/and_int-nat_03.tzt b/tzt_reference_test_suite/and_int-nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2e13be93d2363c99145b19238f7be93edd6597d0 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_03.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int 12 ; Stack_elt nat 5 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/and_int-nat_04.tzt b/tzt_reference_test_suite/and_int-nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..758de49f452eae7a9934b01a443874f70bcf6b78 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_04.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int 12 ; Stack_elt nat 0 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/and_int-nat_05.tzt b/tzt_reference_test_suite/and_int-nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b28a01c64159f8b0c237925cb8b59f25f80cde02 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_05.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int 0 ; Stack_elt nat 5 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/and_int-nat_06.tzt b/tzt_reference_test_suite/and_int-nat_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f6b95758c4fd90635bcf31dc08860cffbc73ac89 --- /dev/null +++ b/tzt_reference_test_suite/and_int-nat_06.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt int 1 ; Stack_elt nat 2 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/and_nat-nat_00.tzt b/tzt_reference_test_suite/and_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..22f7f1347d9e8b25167a4b7ab2b743f779e4ea0d --- /dev/null +++ b/tzt_reference_test_suite/and_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt nat 5 ; Stack_elt nat 3 } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/and_nat-nat_01.tzt b/tzt_reference_test_suite/and_nat-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..94fae639ff0398a964bd5207ec027d7d2bd85754 --- /dev/null +++ b/tzt_reference_test_suite/and_nat-nat_01.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt nat 6 ; Stack_elt nat 5 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/and_nat-nat_02.tzt b/tzt_reference_test_suite/and_nat-nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7417a23c73f1df3f5fa85dbbad68a96d5f0b824c --- /dev/null +++ b/tzt_reference_test_suite/and_nat-nat_02.tzt @@ -0,0 +1,3 @@ +code { AND } ; +input { Stack_elt nat 5 ; Stack_elt nat 6 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/apply_00.tzt b/tzt_reference_test_suite/apply_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c3100bd309e260b59d15cc36d5ffee8a8e0ff767 --- /dev/null +++ b/tzt_reference_test_suite/apply_00.tzt @@ -0,0 +1,3 @@ +code { APPLY } ; +input { Stack_elt string "Hi" ; Stack_elt (lambda (pair string int) nat) { DROP ; PUSH nat 1 } } ; +output { Stack_elt (lambda int nat) { PUSH string "Hi" ; PAIR ; { DROP ; PUSH nat 1 } } } diff --git a/tzt_reference_test_suite/balance_00.tzt b/tzt_reference_test_suite/balance_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..10fe039f4e796154e9695e63f5d58dc676518987 --- /dev/null +++ b/tzt_reference_test_suite/balance_00.tzt @@ -0,0 +1,4 @@ +code { BALANCE } ; +input { } ; +output { Stack_elt mutez 22 } ; +balance 22 diff --git a/tzt_reference_test_suite/car_00.tc.tzt b/tzt_reference_test_suite/car_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..af90583f97dd9c7251c8f974432e374ec2b8b3c4 --- /dev/null +++ b/tzt_reference_test_suite/car_00.tc.tzt @@ -0,0 +1,3 @@ +code { CAR } ; +input { Stack_elt int 42 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/car_00.tzt b/tzt_reference_test_suite/car_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d70e76c7cd4143a0af4b180f9f038bdbce1e6ae5 --- /dev/null +++ b/tzt_reference_test_suite/car_00.tzt @@ -0,0 +1,3 @@ +code { CAR } ; +input { Stack_elt (pair string string) (Pair "first" "second") } ; +output { Stack_elt string "first" } diff --git a/tzt_reference_test_suite/car_01.tzt b/tzt_reference_test_suite/car_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ff3e9b6db6799ca8672655bb8cbf910f61e330d3 --- /dev/null +++ b/tzt_reference_test_suite/car_01.tzt @@ -0,0 +1,3 @@ +code { CAR } ; +input { Stack_elt (pair int int) (Pair 0 1) } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/cdr_00.tc.tzt b/tzt_reference_test_suite/cdr_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a96833b08b3d51fbc263ecde15e4ff3b43839c2a --- /dev/null +++ b/tzt_reference_test_suite/cdr_00.tc.tzt @@ -0,0 +1,3 @@ +code { CDR } ; +input { Stack_elt int 42 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/cdr_00.tzt b/tzt_reference_test_suite/cdr_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..42b7e7c3f42483d3bde1b23d269a3126d9cb20a6 --- /dev/null +++ b/tzt_reference_test_suite/cdr_00.tzt @@ -0,0 +1,3 @@ +code { CDR } ; +input { Stack_elt (pair string string) (Pair "first" "second") } ; +output { Stack_elt string "second" } diff --git a/tzt_reference_test_suite/cdr_01.tzt b/tzt_reference_test_suite/cdr_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..caff220569076e3cd24313685a7533228c7f8d57 --- /dev/null +++ b/tzt_reference_test_suite/cdr_01.tzt @@ -0,0 +1,3 @@ +code { CDR } ; +input { Stack_elt (pair int int) (Pair 0 1) } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/chain_id_00.tzt b/tzt_reference_test_suite/chain_id_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c10c66affb6a78a0b95e86353d243220ea8ce5d1 --- /dev/null +++ b/tzt_reference_test_suite/chain_id_00.tzt @@ -0,0 +1,4 @@ +code { CHAIN_ID } ; +input { } ; +output { Stack_elt chain_id 0x00000000 } ; +chain_id 0x00000000 diff --git a/tzt_reference_test_suite/chain_id_01.tzt b/tzt_reference_test_suite/chain_id_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2f96b59947fe7292950af38b0c11c317adee1c20 --- /dev/null +++ b/tzt_reference_test_suite/chain_id_01.tzt @@ -0,0 +1,4 @@ +code { CHAIN_ID } ; +input { } ; +output { Stack_elt chain_id 0x7a06a770 } ; +chain_id 0x7a06a770 diff --git a/tzt_reference_test_suite/checksignature_00.tc.tzt b/tzt_reference_test_suite/checksignature_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d95acec2f40ee35ebe34fdc414bb3c526309bc44 --- /dev/null +++ b/tzt_reference_test_suite/checksignature_00.tc.tzt @@ -0,0 +1,5 @@ +code { CHECK_SIGNATURE } ; +input { Stack_elt unit Unit ; + Stack_elt signature "spsig1CzQigtXJRFdtX2p6xBQZ3KVmx6gx8gozcytf8einfzwXrpfuU8YwvhYMYTSpZGVo7KzVstPzvGZWMVXa1TW68zpJEzyPw" ; + Stack_elt bytes 0x12 } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/checksignature_00.tzt b/tzt_reference_test_suite/checksignature_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..675731c943034190885121ed4985006582930334 --- /dev/null +++ b/tzt_reference_test_suite/checksignature_00.tzt @@ -0,0 +1,5 @@ +code { CHECK_SIGNATURE } ; +input { Stack_elt key "sppk7aQvNqSBYg2JJa7PAkrSNXuLmktaPdYUtgQSTQzdueqTjut9UXX" ; + Stack_elt signature "spsig1CzQigtXJRFdtX2p6xBQZ3KVmx6gx8gozcytf8einfzwXrpfuU8YwvhYMYTSpZGVo7KzVstPzvGZWMVXa1TW68zpJEzyPw" ; + Stack_elt bytes 0x12 } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/checksignature_01.tzt b/tzt_reference_test_suite/checksignature_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..57a4e73c1e3909536e5755cc6be071a36c1fd876 --- /dev/null +++ b/tzt_reference_test_suite/checksignature_01.tzt @@ -0,0 +1,5 @@ +code { CHECK_SIGNATURE } ; +input { Stack_elt key "sppk7aQvNqSBYg2JJa7PAkrSNXuLmktaPdYUtgQSTQzdueqTjut9UXX" ; + Stack_elt signature "spsig1CzQigtXJRFdtX2p6xBQZ3KVmx6gx8gozcytf8einfzwXrpfuU8YwvhYMYTSpZGVo7KzVstPzvGZWMVXa1TW68zpJEzyPw" ; + Stack_elt bytes 0x1234 } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/compare_00.tc.tzt b/tzt_reference_test_suite/compare_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..15df443c6bd54aa59b72bde09e6a62a2a08c211e --- /dev/null +++ b/tzt_reference_test_suite/compare_00.tc.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt (list int) { 42 }; Stack_elt (list int) { 42 } } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/compare_01.tc.tzt b/tzt_reference_test_suite/compare_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2606731b15a47ca7f9828caf4c497a2bd2e128fe --- /dev/null +++ b/tzt_reference_test_suite/compare_01.tc.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 42; Stack_elt nat 42 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/compare_02.tc.tzt b/tzt_reference_test_suite/compare_02.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fccf09880a845ccc1d9c3a4cb893fb976d593403 --- /dev/null +++ b/tzt_reference_test_suite/compare_02.tc.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 42 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/compare_bool_00.tzt b/tzt_reference_test_suite/compare_bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c916550416c0287f848e7752d0cfa0864cb9ba7b --- /dev/null +++ b/tzt_reference_test_suite/compare_bool_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bool True ; Stack_elt bool True } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_bool_01.tzt b/tzt_reference_test_suite/compare_bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5ab5db3f8ae4d40e7df7e43d3ba0d8c7fae7394e --- /dev/null +++ b/tzt_reference_test_suite/compare_bool_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bool False ; Stack_elt bool False } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_bool_02.tzt b/tzt_reference_test_suite/compare_bool_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..114c208130274560ce14d3ea205f832d4efd77b8 --- /dev/null +++ b/tzt_reference_test_suite/compare_bool_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bool True ; Stack_elt bool False } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_bool_03.tzt b/tzt_reference_test_suite/compare_bool_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..17d98a4ec2a10341b404b432e71ffde187069328 --- /dev/null +++ b/tzt_reference_test_suite/compare_bool_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bool False ; Stack_elt bool True } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_bytes_00.tzt b/tzt_reference_test_suite/compare_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fe90427330b99f0079426ef15d059b1a1ccb830a --- /dev/null +++ b/tzt_reference_test_suite/compare_bytes_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bytes 0xaabbcc ; Stack_elt bytes 0xAABBCC } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_bytes_01.tzt b/tzt_reference_test_suite/compare_bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5ca896baa62f49997be3323e95c16cfb6daecc65 --- /dev/null +++ b/tzt_reference_test_suite/compare_bytes_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bytes 0x ; Stack_elt bytes 0x } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_bytes_02.tzt b/tzt_reference_test_suite/compare_bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..575abadb00d6e6146185791ce25ebdd3ea3db645 --- /dev/null +++ b/tzt_reference_test_suite/compare_bytes_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bytes 0x01 ; Stack_elt bytes 0x } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_bytes_03.tzt b/tzt_reference_test_suite/compare_bytes_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ffd46a570dda9fcb777aa520d255258620b0a4ff --- /dev/null +++ b/tzt_reference_test_suite/compare_bytes_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bytes 0x02 ; Stack_elt bytes 0x01 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_bytes_04.tzt b/tzt_reference_test_suite/compare_bytes_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..76f35c3d62714ba14a3774d548f9dbf4ded2360b --- /dev/null +++ b/tzt_reference_test_suite/compare_bytes_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt bytes 0x01 ; Stack_elt bytes 0x02 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_int_00.tzt b/tzt_reference_test_suite/compare_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c79baa9fca73322f4e44ed79430b52cc3762b0da --- /dev/null +++ b/tzt_reference_test_suite/compare_int_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 1 ; Stack_elt int 1 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_int_01.tzt b/tzt_reference_test_suite/compare_int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..aefa73eb3694cafe74fed3a0994352c61eb0e868 --- /dev/null +++ b/tzt_reference_test_suite/compare_int_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 1 ; Stack_elt int 2 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_int_02.tzt b/tzt_reference_test_suite/compare_int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fe59a8692765df3b11a20822df42ca23a8a5650e --- /dev/null +++ b/tzt_reference_test_suite/compare_int_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 3 ; Stack_elt int 2 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_int_03.tzt b/tzt_reference_test_suite/compare_int_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0eccaf876eeb5b7d365cbbee5db15ffd073ecd9b --- /dev/null +++ b/tzt_reference_test_suite/compare_int_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 5 ; Stack_elt int 10 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_int_04.tzt b/tzt_reference_test_suite/compare_int_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0c2e7eecf2187f8c52afbab963f96c98ef2138c7 --- /dev/null +++ b/tzt_reference_test_suite/compare_int_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt int 1923 ; Stack_elt int 4 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_keyhash_00.tzt b/tzt_reference_test_suite/compare_keyhash_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..12b7a46db97b5fc985b18188ea3e83616368c952 --- /dev/null +++ b/tzt_reference_test_suite/compare_keyhash_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt key_hash "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" ; Stack_elt key_hash "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_keyhash_01.tzt b/tzt_reference_test_suite/compare_keyhash_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4115976f427d8e3a86e814dc2561dfdb5f3bf816 --- /dev/null +++ b/tzt_reference_test_suite/compare_keyhash_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt key_hash "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" ; Stack_elt key_hash "tz1ddb9NMYHZi5UzPdzTZMYQQZoMub195zgv" } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_keyhash_02.tzt b/tzt_reference_test_suite/compare_keyhash_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9025c218fa2be34d0bc632fb2b453fdcbad0f333 --- /dev/null +++ b/tzt_reference_test_suite/compare_keyhash_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt key_hash "tz1ddb9NMYHZi5UzPdzTZMYQQZoMub195zgv" ; Stack_elt key_hash "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_mutez_00.tzt b/tzt_reference_test_suite/compare_mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fbb28f7a97d8b51ddbf725d925e8a1ecbadb4a61 --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 1 ; Stack_elt mutez 1 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_mutez_01.tzt b/tzt_reference_test_suite/compare_mutez_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..42bb933687d36fd03bcce7816461cdffb050787d --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 1 ; Stack_elt mutez 2 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_mutez_02.tzt b/tzt_reference_test_suite/compare_mutez_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4b5e1b591950c52b103f735b622c6beafb64d049 --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 2 ; Stack_elt mutez 1 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_mutez_03.tzt b/tzt_reference_test_suite/compare_mutez_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fbb28f7a97d8b51ddbf725d925e8a1ecbadb4a61 --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 1 ; Stack_elt mutez 1 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_mutez_04.tzt b/tzt_reference_test_suite/compare_mutez_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9df92a3438689259488153fdc5141549974e09a0 --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 5 ; Stack_elt mutez 10 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_mutez_05.tzt b/tzt_reference_test_suite/compare_mutez_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cf70112a890bed10cf8fc026a0bfa390e3724a49 --- /dev/null +++ b/tzt_reference_test_suite/compare_mutez_05.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt mutez 1923 ; Stack_elt mutez 5 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_nat_00.tzt b/tzt_reference_test_suite/compare_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e7ce1ebdefb03e5e05c67df7cd0127c19fa70559 --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 1 ; Stack_elt nat 1 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_nat_01.tzt b/tzt_reference_test_suite/compare_nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e5524010503b37272fd2d0c24598e9fda461f27f --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 1 ; Stack_elt nat 2 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_nat_02.tzt b/tzt_reference_test_suite/compare_nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b8c3282ad8243f4e34967201b33d385376eb8d79 --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 2 ; Stack_elt nat 1 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_nat_03.tzt b/tzt_reference_test_suite/compare_nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e7ce1ebdefb03e5e05c67df7cd0127c19fa70559 --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 1 ; Stack_elt nat 1 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_nat_04.tzt b/tzt_reference_test_suite/compare_nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..333464c67417514c2fe2f9416d9cd81622584fd8 --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 5 ; Stack_elt nat 10 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_nat_05.tzt b/tzt_reference_test_suite/compare_nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f99f191b7d9bf21f3619f421abfd5284c1d08beb --- /dev/null +++ b/tzt_reference_test_suite/compare_nat_05.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt nat 1923 ; Stack_elt nat 4 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_pairintint_00.tzt b/tzt_reference_test_suite/compare_pairintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..27e0d6eabad6bac61c16e00c2b83df3f4fc111d1 --- /dev/null +++ b/tzt_reference_test_suite/compare_pairintint_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt (pair int int) (Pair 1 1) ; Stack_elt (pair int int) (Pair 1 1) } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_pairintint_01.tzt b/tzt_reference_test_suite/compare_pairintint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f0702240a342d3a89b1a67dc2b3fc2db31129c99 --- /dev/null +++ b/tzt_reference_test_suite/compare_pairintint_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt (pair int int) (Pair 2 1) ; Stack_elt (pair int int) (Pair 1 1) } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_pairintint_02.tzt b/tzt_reference_test_suite/compare_pairintint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c5a3035f4e6b8cd454681662fbd10afe5efda53d --- /dev/null +++ b/tzt_reference_test_suite/compare_pairintint_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt (pair int int) (Pair 1 2) ; Stack_elt (pair int int) (Pair 1 1) } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_pairintint_03.tzt b/tzt_reference_test_suite/compare_pairintint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..93c691430e1c6dc732f003021796bfc50b21fa99 --- /dev/null +++ b/tzt_reference_test_suite/compare_pairintint_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt (pair int int) (Pair 2 1) ; Stack_elt (pair int int) (Pair 3 1) } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_string_00.tzt b/tzt_reference_test_suite/compare_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..df3739a167b7c1bbc35dc70ae20d3f596eba169a --- /dev/null +++ b/tzt_reference_test_suite/compare_string_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt string "a" ; Stack_elt string "a" } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_string_01.tzt b/tzt_reference_test_suite/compare_string_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..298fa983dc007f34f43ca95104ad2047de22b28d --- /dev/null +++ b/tzt_reference_test_suite/compare_string_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt string "a" ; Stack_elt string "b" } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_string_02.tzt b/tzt_reference_test_suite/compare_string_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..910dc7cb3ecae5c8abcbe68c829db8809dda48eb --- /dev/null +++ b/tzt_reference_test_suite/compare_string_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt string "d" ; Stack_elt string "b" } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_string_03.tzt b/tzt_reference_test_suite/compare_string_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bc117117eb064181ebca55b3873a3c45e45a0ac0 --- /dev/null +++ b/tzt_reference_test_suite/compare_string_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt string "" ; Stack_elt string "" } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_string_04.tzt b/tzt_reference_test_suite/compare_string_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e3597154fe3bbacb87122536ffcb92b102a7c940 --- /dev/null +++ b/tzt_reference_test_suite/compare_string_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt string "a" ; Stack_elt string "" } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_timestamp_00.tzt b/tzt_reference_test_suite/compare_timestamp_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..36698ef1cd432e21101f9d11fc7b1a9c0e03e785 --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_00.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "1" ; Stack_elt timestamp "1" } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_timestamp_01.tzt b/tzt_reference_test_suite/compare_timestamp_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..085e687dc1cfb88bb8b70f0ec1e2cb9cbde31c22 --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_01.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "1" ; Stack_elt timestamp "2" } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/compare_timestamp_02.tzt b/tzt_reference_test_suite/compare_timestamp_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f40de5bdbaa3fda950e0a717ee25e76d035c8f78 --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_02.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "2" ; Stack_elt timestamp "1" } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_timestamp_03.tzt b/tzt_reference_test_suite/compare_timestamp_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6b81471cf2c5cf8dbbcb7bd18214af523185088d --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_03.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "2019-09-16T08:38:05Z" ; Stack_elt timestamp "2019-09-16T08:38:05Z" } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/compare_timestamp_04.tzt b/tzt_reference_test_suite/compare_timestamp_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..677016feb37b306d297b6ec1e7e777eeacf3b050 --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_04.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "2019-09-16T08:38:05Z" ; Stack_elt timestamp "2017-09-16T08:38:05Z" } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/compare_timestamp_05.tzt b/tzt_reference_test_suite/compare_timestamp_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e85a2fe457988d419b97858b8241f86a3c040af0 --- /dev/null +++ b/tzt_reference_test_suite/compare_timestamp_05.tzt @@ -0,0 +1,3 @@ +code { COMPARE } ; +input { Stack_elt timestamp "2019-09-16T08:38:04Z" ; Stack_elt timestamp "2019-09-16T08:38:05Z" } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/concat_bytes_00.tzt b/tzt_reference_test_suite/concat_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..af35a5a2cafa47f4d26d37bbdf9a111cf27bf457 --- /dev/null +++ b/tzt_reference_test_suite/concat_bytes_00.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt bytes 0xFF ; Stack_elt bytes 0xcd } ; +output { Stack_elt bytes 0xffcd } diff --git a/tzt_reference_test_suite/concat_bytes_01.tzt b/tzt_reference_test_suite/concat_bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cc0452ca89481a887f310ddc61f6add4e8b3110d --- /dev/null +++ b/tzt_reference_test_suite/concat_bytes_01.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt bytes 0xFF ; Stack_elt bytes 0xaa } ; +output { Stack_elt bytes 0xffaa } diff --git a/tzt_reference_test_suite/concat_listbytes_00.tzt b/tzt_reference_test_suite/concat_listbytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c288b8a2352cc800332b44d86408a3b855850cae --- /dev/null +++ b/tzt_reference_test_suite/concat_listbytes_00.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt (list bytes) { 0x00ab ; 0xcd ; 0xef ; 0x00 } } ; +output { Stack_elt bytes 0x00abcdef00 } diff --git a/tzt_reference_test_suite/concat_listbytes_01.tzt b/tzt_reference_test_suite/concat_listbytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c51130f03be2c317b2bc25754137b9944704d1b5 --- /dev/null +++ b/tzt_reference_test_suite/concat_listbytes_01.tzt @@ -0,0 +1,3 @@ +code { MAP {} ; CONCAT } ; +input { Stack_elt (list bytes) { 0x00ab ; 0xcd ; 0xef ; 0x00 } } ; +output { Stack_elt bytes 0x00abcdef00 } diff --git a/tzt_reference_test_suite/concat_listbytes_02.tzt b/tzt_reference_test_suite/concat_listbytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e0053466018b89d1608c36b8c14323efa7fac62b --- /dev/null +++ b/tzt_reference_test_suite/concat_listbytes_02.tzt @@ -0,0 +1,3 @@ +code { MAP {} ; CONCAT } ; +input { Stack_elt (list bytes) { } } ; +output { Stack_elt bytes 0x } diff --git a/tzt_reference_test_suite/concat_liststring_00.tzt b/tzt_reference_test_suite/concat_liststring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..53e01e18066c6705c81450bc5298d3eba9ab2934 --- /dev/null +++ b/tzt_reference_test_suite/concat_liststring_00.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt (list string) { "he" ; "llo" ; " " ; "world" } } ; +output { Stack_elt string "hello world" } diff --git a/tzt_reference_test_suite/concat_liststring_01.tzt b/tzt_reference_test_suite/concat_liststring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..670ce5cbf2a7d517173033e2876b89c01b261652 --- /dev/null +++ b/tzt_reference_test_suite/concat_liststring_01.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt (list string) { "a" ; "b" ; "c" } } ; +output { Stack_elt string "abc" } diff --git a/tzt_reference_test_suite/concat_liststring_02.tzt b/tzt_reference_test_suite/concat_liststring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..844c45060952dd9c250e5c34be88231044f3a6fa --- /dev/null +++ b/tzt_reference_test_suite/concat_liststring_02.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt (list string) { } } ; +output { Stack_elt string "" } diff --git a/tzt_reference_test_suite/concat_liststring_03.tzt b/tzt_reference_test_suite/concat_liststring_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a9e070e9e10c9edff5096c36b94ac73e35300959 --- /dev/null +++ b/tzt_reference_test_suite/concat_liststring_03.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt (list string) { "abc" } } ; +output { Stack_elt string "abc" } diff --git a/tzt_reference_test_suite/concat_liststring_04.tzt b/tzt_reference_test_suite/concat_liststring_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0a02dc9acf19444755a551779d16b14b97c81dcd --- /dev/null +++ b/tzt_reference_test_suite/concat_liststring_04.tzt @@ -0,0 +1,3 @@ +code { MAP {} ; CONCAT } ; +input { Stack_elt (list string) { "abc" } } ; +output { Stack_elt string "abc" } diff --git a/tzt_reference_test_suite/concat_string_00.tzt b/tzt_reference_test_suite/concat_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f328bf9efdb562fd5242aba062faeb7695f11053 --- /dev/null +++ b/tzt_reference_test_suite/concat_string_00.tzt @@ -0,0 +1,3 @@ +code { CONCAT } ; +input { Stack_elt string "hello " ; Stack_elt string "world" } ; +output { Stack_elt string "hello world" } diff --git a/tzt_reference_test_suite/concat_string_01.tzt b/tzt_reference_test_suite/concat_string_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f64a23291f8f42b86ca84fd5ffb944bc52a58c99 --- /dev/null +++ b/tzt_reference_test_suite/concat_string_01.tzt @@ -0,0 +1,3 @@ +code { ITER { SWAP ; DIP { NIL string ; SWAP ; CONS } ; CONS ; CONCAT } } ; +input { Stack_elt (list string) { "a" ; "b" ; "c" } ; Stack_elt string "" } ; +output { Stack_elt string "abc" } diff --git a/tzt_reference_test_suite/concat_string_02.tzt b/tzt_reference_test_suite/concat_string_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2dc9aee6e871a690364ced6e9bc3893acfdfd886 --- /dev/null +++ b/tzt_reference_test_suite/concat_string_02.tzt @@ -0,0 +1,3 @@ +code { ITER { SWAP ; DIP { NIL string ; SWAP ; CONS } ; CONS ; CONCAT } } ; +input { Stack_elt (list string) { "Hello" ; " " ; "World" ; "!" } ; Stack_elt string "" } ; +output { Stack_elt string "Hello World!" } diff --git a/tzt_reference_test_suite/cons_int_00.tzt b/tzt_reference_test_suite/cons_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c41bcc49f3d17931d676af054633d1c6ed0f886e --- /dev/null +++ b/tzt_reference_test_suite/cons_int_00.tzt @@ -0,0 +1,3 @@ +code { CONS } ; +input { Stack_elt int 5 ; Stack_elt (list int) { 7 } } ; +output { Stack_elt (list int) { 5 ; 7 } } diff --git a/tzt_reference_test_suite/cons_int_01.tzt b/tzt_reference_test_suite/cons_int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3f1ce24108ab23a75e8b7f69621cf45f4f03c4af --- /dev/null +++ b/tzt_reference_test_suite/cons_int_01.tzt @@ -0,0 +1,3 @@ +code { CONS } ; +input { Stack_elt int 1 ; Stack_elt (list int) { } } ; +output { Stack_elt (list int) { 1 } } diff --git a/tzt_reference_test_suite/cons_int_02.tzt b/tzt_reference_test_suite/cons_int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..235930e8bc92c6186ad91f12ba7737178982bf42 --- /dev/null +++ b/tzt_reference_test_suite/cons_int_02.tzt @@ -0,0 +1,3 @@ +code { CONS } ; +input { Stack_elt int 1 ; Stack_elt (list int) { 1 ; 2 ; 3 ; 4 ; 5 } } ; +output { Stack_elt (list int) { 1 ; 1 ; 2 ; 3 ; 4 ; 5 } } diff --git a/tzt_reference_test_suite/cons_lists_00.tc.tzt b/tzt_reference_test_suite/cons_lists_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..42fa693049a1d369efaca06eb5219743a64a162f --- /dev/null +++ b/tzt_reference_test_suite/cons_lists_00.tc.tzt @@ -0,0 +1,3 @@ +code { CONS } ; +input { Stack_elt (list int) {} ; Stack_elt (list int) { 7 } } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/cons_string_00.tzt b/tzt_reference_test_suite/cons_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2a4c188607425bcefec752dfdd38d25c08aaa59c --- /dev/null +++ b/tzt_reference_test_suite/cons_string_00.tzt @@ -0,0 +1,3 @@ +code { CONS } ; +input { Stack_elt string "Hello" ; Stack_elt (list string) { "World" } } ; +output { Stack_elt (list string) { "Hello" ; "World" } } diff --git a/tzt_reference_test_suite/contract_00.tzt b/tzt_reference_test_suite/contract_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..db7a2596b157f53c63927764779efc88c589dc7b --- /dev/null +++ b/tzt_reference_test_suite/contract_00.tzt @@ -0,0 +1,4 @@ +code { CONTRACT unit } ; +input { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt (option (contract unit)) (Some "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d") } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" unit } diff --git a/tzt_reference_test_suite/contract_01.tzt b/tzt_reference_test_suite/contract_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0bd3cb033af65f3b8f79302e6f674e9c836ccbea --- /dev/null +++ b/tzt_reference_test_suite/contract_01.tzt @@ -0,0 +1,4 @@ +code { CONTRACT unit } ; +input { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt (option (contract unit)) None } ; +other_contracts { Contract "KT1QuofAgnsWffHzLA7D78rxytJruGHDe7XG" unit } diff --git a/tzt_reference_test_suite/contract_02.tzt b/tzt_reference_test_suite/contract_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d57240c20648065da210ee541cec9037a1b092f9 --- /dev/null +++ b/tzt_reference_test_suite/contract_02.tzt @@ -0,0 +1,4 @@ +code { CONTRACT unit } ; +input { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt (option (contract unit)) None } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" nat } diff --git a/tzt_reference_test_suite/contract_03.tzt b/tzt_reference_test_suite/contract_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ee537a5acb9bf74eff68b5ecc93b351a6309aee8 --- /dev/null +++ b/tzt_reference_test_suite/contract_03.tzt @@ -0,0 +1,5 @@ +code { CONTRACT unit } ; +input { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt (option (contract unit)) (Some "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d") } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" unit ; + Contract "KT1QuofAgnsWffHzLA7D78rxytJruGHDe7XG" unit } diff --git a/tzt_reference_test_suite/contract_04.tzt b/tzt_reference_test_suite/contract_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..96af4a16ed6d7575f82c0ece75f1f8c5d33521c4 --- /dev/null +++ b/tzt_reference_test_suite/contract_04.tzt @@ -0,0 +1,4 @@ +code { CONTRACT unit } ; +input { Stack_elt address "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt (option (contract unit)) (Some "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx") } ; +other_contracts { } diff --git a/tzt_reference_test_suite/contract_05.tzt b/tzt_reference_test_suite/contract_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5c4ae7af9e12f87faeae5e2a53d88472849aa11a --- /dev/null +++ b/tzt_reference_test_suite/contract_05.tzt @@ -0,0 +1,4 @@ +code { CONTRACT nat } ; +input { Stack_elt address "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt (option (contract nat)) None } ; + diff --git a/tzt_reference_test_suite/coverage.md b/tzt_reference_test_suite/coverage.md new file mode 100644 index 0000000000000000000000000000000000000000..988d692a36f0580a1645a08e67a3de0575cd1fda --- /dev/null +++ b/tzt_reference_test_suite/coverage.md @@ -0,0 +1,1413 @@ +# Instruction coverage + +This file documents Michelson instruction coverage by tzt tests as of protocol +Nairobi. + +## Control structures + +### `APPLY` + +- [apply_00.tzt](apply_00.tzt) + +Does not check the behavior that the values that are not both pushable and +storable cannot be captured. + +### `EXEC` + +- [exec_00.tzt](exec_00.tzt) +- [exec_01.tzt](exec_01.tzt) +- [exec_02.tzt](exec_02.tzt) +- [exec_03.tzt](exec_03.tzt) + +### `FAILWITH` + +- [failwith_00.tzt](failwith_00.tzt) + +### `IF` + +- [if_00.tzt](if_00.tzt) +- [if_01.tzt](if_01.tzt) + +These tests do not check that the non-participating end of the stack, if it +exists, is preserved. + +### `IF_CONS` + +- [ifcons_listint_00.tzt](ifcons_listint_00.tzt) +- [ifcons_listint_01.tzt](ifcons_listint_01.tzt) +- [ifcons_listnat_00.tzt](ifcons_listnat_00.tzt) +- [ifcons_listnat_01.tzt](ifcons_listnat_01.tzt) + +These tests do not check that the non-participating end of the stack, if it +exists, is preserved. + +### `IF_LEFT` + +- [ifleft_orintstring_00.tzt](ifleft_orintstring_00.tzt) +- [ifleft_orstringint_00.tzt](ifleft_orstringint_00.tzt) + +These tests do not check that the non-participating end of the stack, if it +exists, is preserved. +### `IF_NONE` + +- [ifnone_optionint_00.tzt](ifnone_optionint_00.tzt) +- [ifnone_optionnat_00.tzt](ifnone_optionnat_00.tzt) + +These tests do not check that the non-participating end of the stack, if it +exists, is preserved. + +### `LAMBDA` + +***None*** + +### `LAMBDA_REC` + +***None*** + +### `LOOP` + +- [loop_00.tzt](loop_00.tzt) +- [loop_01.tzt](loop_01.tzt) +- [loop_02.tzt](loop_02.tzt) + +### `LOOP_LEFT` + +- [loopleft_00.tzt](loopleft_00.tzt) +- [loopleft_01.tzt](loopleft_01.tzt) +- [loopleft_02.tzt](loopleft_02.tzt) +- [loopleft_03.tzt](loopleft_03.tzt) +- [loopleft_04.tzt](loopleft_04.tzt) + +### `;` + +***None*** + +Instruction sequencing is indirectly covered by tzts including multiple instructions, but there are no dedicated unit tests. + +### `{}` + +***None*** + +## Stack manipulation + +### `DIG` + +- [dig_00.tzt](dig_00.tzt) +- [dig_01.tzt](dig_01.tzt) +- [dig_02.tzt](dig_02.tzt) +- [dig_03.tzt](dig_03.tzt) +- [dig_04.tzt](dig_04.tzt) + +Even numbers are conspicuous by their absence. + +### `DIP` + +- [dip_00.tzt](dip_00.tzt) +- [dip_01.tzt](dip_01.tzt) +- [dip_02.tzt](dip_02.tzt) + +DIP is used in quite a few other tests as an utility, so it's indirectly +covered. + +### `DIP n` + +- [dipn_00.tzt](dipn_00.tzt) +- [dipn_01.tzt](dipn_01.tzt) +- [dipn_02.tzt](dipn_02.tzt) +- [dipn_03.tzt](dipn_03.tzt) + +### `DROP` + +- [drop_00.tzt](drop_00.tzt) + +Used a few times as an utility in other tzts. + +### `DROP n` + +- [dropn_00.tzt](dropn_00.tzt) +- [dropn_01.tzt](dropn_01.tzt) +- [dropn_02.tzt](dropn_02.tzt) +- [dropn_03.tzt](dropn_03.tzt) + +### `DUG` + +- [dugn_00.tzt](dugn_00.tzt) + +`DUG 0`, `DUG 1` edge cases are missing. + +### `DUP` + +- [dup_00.tzt](dup_00.tzt) + +### `DUP n` + +- [dupn_00.tzt](dupn_00.tzt) +- [dupn_01.tzt](dupn_01.tzt) +- [dupn_02.tzt](dupn_02.tzt) +- [dupn_03.tzt](dupn_03.tzt) +- [dupn_04.tzt](dupn_04.tzt) + +### `PUSH` + +- [push_int_00.tzt](push_int_00.tzt) +- [push_string_00.tzt](push_string_00.tzt) + +`PUSH` is used quite a bit as a utility in other tzts, hence indirectly covered +to some extent. Not all pushable types are tested with `PUSH`, however. + +### `SWAP` + +- [swap_00.tzt](swap_00.tzt) + +## Arithmetic + +### `ABS` + +- [abs_00.tzt](abs_00.tzt) +- [abs_01.tzt](abs_01.tzt) +- [abs_02.tzt](abs_02.tzt) + +### `ADD: nat : nat` + +- [add_nat-nat_00.tzt](add_nat-nat_00.tzt) + +### `ADD: nat : int` + +- [add_nat-int_00.tzt](add_nat-int_00.tzt) + +### `ADD: int : nat` + +- [add_int-nat_00.tzt](add_int-nat_00.tzt) +- [add_int-nat_01.tzt](add_int-nat_01.tzt) + +### `ADD: int : int` + +- [add_int-int_00.tzt](add_int-int_00.tzt) + +### `ADD: timestamp : int` + +- [add_timestamp-int_00.tzt](add_timestamp-int_00.tzt) +- [add_timestamp-int_01.tzt](add_timestamp-int_01.tzt) +- [add_timestamp-int_02.tzt](add_timestamp-int_02.tzt) +- [add_timestamp-int_03.tzt](add_timestamp-int_03.tzt) -- doesn't use `ADD` instruction, only testing `timestamp` + +### `ADD: int : timestamp` + +- [add_int-timestamp_00.tzt](add_int-timestamp_00.tzt) + +### `ADD: mutez : mutez` + +- [add_mutez-mutez_00.tzt](add_mutez-mutez_00.tzt) +- [add_mutez-mutez_01.tzt](add_mutez-mutez_01.tzt) + +### `ADD: bls12_381_g1 : bls12_381_g1` + +***None*** + +### `ADD: bls12_381_g2 : bls12_381_g2` + +***None*** + +### `ADD: bls12_381_fr : bls12_381_fr` + +***None*** + +### `BYTES: int` + +***None*** + +### `BYTES: nat` + +***None*** + +### `COMPARE` + +- [compare_bool_00.tzt](compare_bool_00.tzt) +- [compare_bool_01.tzt](compare_bool_01.tzt) +- [compare_bool_02.tzt](compare_bool_02.tzt) +- [compare_bool_03.tzt](compare_bool_03.tzt) +- [compare_bytes_00.tzt](compare_bytes_00.tzt) +- [compare_bytes_01.tzt](compare_bytes_01.tzt) +- [compare_bytes_02.tzt](compare_bytes_02.tzt) +- [compare_bytes_03.tzt](compare_bytes_03.tzt) +- [compare_bytes_04.tzt](compare_bytes_04.tzt) +- [compare_int_00.tzt](compare_int_00.tzt) +- [compare_int_01.tzt](compare_int_01.tzt) +- [compare_int_02.tzt](compare_int_02.tzt) +- [compare_int_03.tzt](compare_int_03.tzt) +- [compare_int_04.tzt](compare_int_04.tzt) +- [compare_keyhash_00.tzt](compare_keyhash_00.tzt) +- [compare_keyhash_01.tzt](compare_keyhash_01.tzt) +- [compare_keyhash_02.tzt](compare_keyhash_02.tzt) +- [compare_mutez_00.tzt](compare_mutez_00.tzt) +- [compare_mutez_01.tzt](compare_mutez_01.tzt) +- [compare_mutez_02.tzt](compare_mutez_02.tzt) +- [compare_mutez_03.tzt](compare_mutez_03.tzt) +- [compare_mutez_04.tzt](compare_mutez_04.tzt) +- [compare_mutez_05.tzt](compare_mutez_05.tzt) +- [compare_nat_00.tzt](compare_nat_00.tzt) +- [compare_nat_01.tzt](compare_nat_01.tzt) +- [compare_nat_02.tzt](compare_nat_02.tzt) +- [compare_nat_03.tzt](compare_nat_03.tzt) +- [compare_nat_04.tzt](compare_nat_04.tzt) +- [compare_nat_05.tzt](compare_nat_05.tzt) +- [compare_pairintint_00.tzt](compare_pairintint_00.tzt) +- [compare_pairintint_01.tzt](compare_pairintint_01.tzt) +- [compare_pairintint_02.tzt](compare_pairintint_02.tzt) +- [compare_pairintint_03.tzt](compare_pairintint_03.tzt) +- [compare_string_00.tzt](compare_string_00.tzt) +- [compare_string_01.tzt](compare_string_01.tzt) +- [compare_string_02.tzt](compare_string_02.tzt) +- [compare_string_03.tzt](compare_string_03.tzt) +- [compare_string_04.tzt](compare_string_04.tzt) +- [compare_timestamp_00.tzt](compare_timestamp_00.tzt) +- [compare_timestamp_01.tzt](compare_timestamp_01.tzt) +- [compare_timestamp_02.tzt](compare_timestamp_02.tzt) +- [compare_timestamp_03.tzt](compare_timestamp_03.tzt) +- [compare_timestamp_04.tzt](compare_timestamp_04.tzt) +- [compare_timestamp_05.tzt](compare_timestamp_05.tzt) + +Missing edge cases: + +- No comparison of negative integers +- No comparison for `0 int` +- No comparison for `0 mutez` +- No comparison for `0 nat` +- Only zero- or single-character strings are compared + +Duplicate files: + +- `compare_mutez_03.tzt` is a duplicate of `compare_mutez_00.tzt` +- `compare_nat_03.tzt` is a duplicate of `compare_nat_00.tzt` + +Types `COMPARE` isn't tested for: + +- `address` +- `chain_id` +- `key` +- `never` +- `signature` +- `timestamp` +- `unit` +- `or` +- `option` + +### `EDIV: nat : nat` + +***None*** + +### `EDIV: nat : int` + +***None*** + +### `EDIV: int : nat` + +***None*** + +### `EDIV: int : int` + +- [ediv_int-int_00.tzt](ediv_int-int_00.tzt) +- [ediv_int-int_01.tzt](ediv_int-int_01.tzt) +- [ediv_int-int_02.tzt](ediv_int-int_02.tzt) +- [ediv_int-int_03.tzt](ediv_int-int_03.tzt) + +Missing edge cases: + +- No division of positive over positive +- No division of negative over negative +- No division of zero over non-zero +- No division of zero over zero +- No division with the result of 1 + +### `EDIV: mutez : nat` + +- [ediv_mutez-nat_00.tzt](ediv_mutez-nat_00.tzt) +- [ediv_mutez-nat_01.tzt](ediv_mutez-nat_01.tzt) +- [ediv_mutez-nat_02.tzt](ediv_mutez-nat_02.tzt) +- [ediv_mutez-nat_03.tzt](ediv_mutez-nat_03.tzt) +- [ediv_mutez-nat_04.tzt](ediv_mutez-nat_04.tzt) +- [ediv_mutez-nat_05.tzt](ediv_mutez-nat_05.tzt) +- [ediv_mutez-nat_06.tzt](ediv_mutez-nat_06.tzt) + +### `EDIV: mutez : mutez` + +- [ediv_mutez-mutez_00.tzt](ediv_mutez-mutez_00.tzt) +- [ediv_mutez-mutez_01.tzt](ediv_mutez-mutez_01.tzt) +- [ediv_mutez-mutez_02.tzt](ediv_mutez-mutez_02.tzt) +- [ediv_mutez-mutez_03.tzt](ediv_mutez-mutez_03.tzt) + +Missing edge cases: + +- No division of zero over non-zero +- No division of zero over zero + +### `EQ` + +- [eq_00.tzt](eq_00.tzt) +- [eq_01.tzt](eq_01.tzt) +- [eq_02.tzt](eq_02.tzt) +- [eq_03.tzt](eq_03.tzt) +- [eq_04.tzt](eq_04.tzt) + +### `GE` + +- [ge_00.tzt](ge_00.tzt) +- [ge_01.tzt](ge_01.tzt) +- [ge_02.tzt](ge_02.tzt) +- [ge_03.tzt](ge_03.tzt) +- [ge_04.tzt](ge_04.tzt) + +### `GT` + +- [gt_00.tzt](gt_00.tzt) +- [gt_01.tzt](gt_01.tzt) +- [gt_02.tzt](gt_02.tzt) +- [gt_03.tzt](gt_03.tzt) +- [gt_04.tzt](gt_04.tzt) + +### `INT: nat` + +- [int_nat_00.tzt](int_nat_00.tzt) +- [int_nat_01.tzt](int_nat_01.tzt) + +### `INT: bls12_381_fr` + +***None*** + +### `INT: bytes` + +***None*** + +### `ISNAT` + +- [isnat_00.tzt](isnat_00.tzt) +- [isnat_01.tzt](isnat_01.tzt) + +Missing edge cases: + +- Only tests `0` and `-1`, missing tests for positive integers. + +### `LE` + +- [le_00.tzt](le_00.tzt) +- [le_01.tzt](le_01.tzt) +- [le_02.tzt](le_02.tzt) +- [le_03.tzt](le_03.tzt) +- [le_04.tzt](le_04.tzt) + +### `LSL: nat : nat` + +- [lsl_00.tzt](lsl_00.tzt) +- [lsl_01.tzt](lsl_01.tzt) +- [lsl_02.tzt](lsl_02.tzt) +- [lsl_03.tzt](lsl_03.tzt) +- [lsl_04.tzt](lsl_04.tzt) +- [lsl_05.tzt](lsl_05.tzt) +- [lsl_06.tzt](lsl_06.tzt) + +Missing edge cases: + +- No zero shift test for non-zero argument + +### `LSL: bytes : nat` + +***None*** + +### `LSR: nat : nat` + +- [lsr_00.tzt](lsr_00.tzt) +- [lsr_01.tzt](lsr_01.tzt) +- [lsr_02.tzt](lsr_02.tzt) +- [lsr_03.tzt](lsr_03.tzt) +- [lsr_04.tzt](lsr_04.tzt) +- [lsr_05.tzt](lsr_05.tzt) + +Missing edge cases: + +- No zero shift test for non-zero argument + +### `LSR: bytes : nat` + +***None*** + +### `LT` + +- [lt_00.tzt](lt_00.tzt) +- [lt_01.tzt](lt_01.tzt) +- [lt_02.tzt](lt_02.tzt) +- [lt_03.tzt](lt_03.tzt) +- [lt_04.tzt](lt_04.tzt) + +### `MUL: nat : nat` + +- [mul_nat-nat_00.tzt](mul_nat-nat_00.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) + +### `MUL: nat : int` + +- [mul_nat-int_00.tzt](mul_nat-int_00.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) +- No multiplication by positive int + +### `MUL: int : nat` + +- [mul_int-nat_00.tzt](mul_int-nat_00.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) +- No multiplication by negative int + +### `MUL: int : int` + +- [mul_int-int_00.tzt](mul_int-int_00.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) +- No multiplication of two negatives +- No multiplication of two positives +- No multiplication of negative by positive + +### `MUL: mutez : nat` + +- [mul_mutez-nat_00.tzt](mul_mutez-nat_00.tzt) +- [mul_mutez-nat_01.tzt](mul_mutez-nat_01.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) + +### `MUL: nat : mutez` + +- [mul_nat-mutez_00.tzt](mul_nat-mutez_00.tzt) +- [mul_nat-mutez_01.tzt](mul_nat-mutez_01.tzt) + +Missing edge cases: + +- No multiplication by zero (both from left and right) + +### `MUL: bls12_381_g1 : bls12_381_fr` + +***None*** + +### `MUL: bls12_381_g2 : bls12_381_fr` + +***None*** + +### `MUL: bls12_381_fr : bls12_381_fr` + +***None*** + +### `MUL: nat : bls12_381_fr` + +***None*** + +### `MUL: int : bls12_381_fr` + +***None*** + +### `MUL: bls12_381_fr : nat` + +***None*** + +### `MUL: bls12_381_fr : int` + +***None*** + +### `NAT` + +***None*** + +### `NEG: nat` + +- [neg_nat_00.tzt](neg_nat_00.tzt) +- [neg_nat_01.tzt](neg_nat_01.tzt) + +### `NEG: int` + +- [neg_int_00.tzt](neg_int_00.tzt) +- [neg_int_01.tzt](neg_int_01.tzt) +- [neg_int_02.tzt](neg_int_02.tzt) + +### `NEG: bls12_381_g1` + +***None*** + +### `NEG: bls12_381_g2` + +***None*** + +### `NEG: bls12_381_fr` + +***None*** + +### `NEQ` + +- [neq_00.tzt](neq_00.tzt) +- [neq_01.tzt](neq_01.tzt) +- [neq_02.tzt](neq_02.tzt) +- [neq_03.tzt](neq_03.tzt) +- [neq_04.tzt](neq_04.tzt) + +### `SUB: nat : nat` + +***None*** + +### `SUB: nat : int` + +***None*** + +### `SUB: int : nat` + +***None*** + +### `SUB: int : int` + +- [sub_int-int_00.tzt](sub_int-int_00.tzt) +- [sub_int-int_01.tzt](sub_int-int_01.tzt) + +Missing edge cases: + +- No subtraction of 0 +- No subtraction from 0 +- No subtraction of negative integers + +### `SUB: timestamp : int` + +- [sub_timestamp-int_00.tzt](sub_timestamp-int_00.tzt) +- [sub_timestamp-int_01.tzt](sub_timestamp-int_01.tzt) +- [sub_timestamp-int_02.tzt](sub_timestamp-int_02.tzt) +- [sub_timestamp-int_03.tzt](sub_timestamp-int_03.tzt) +- [sub_timestamp-int_04.tzt](sub_timestamp-int_04.tzt) + +Missing edge cases: + +- No subtraction of zero +- No subtraction from zero + +### `SUB: timestamp : timestamp` + +- [sub_timestamp-timestamp_00.tzt](sub_timestamp-timestamp_00.tzt) +- [sub_timestamp-timestamp_01.tzt](sub_timestamp-timestamp_01.tzt) +- [sub_timestamp-timestamp_02.tzt](sub_timestamp-timestamp_02.tzt) +- [sub_timestamp-timestamp_03.tzt](sub_timestamp-timestamp_03.tzt) + +Missing edge cases: + +- No test for realistic timestamps producing negative difference + +### `SUB_MUTEZ` + +***None***, but there are tests for the deprecated `SUB: mutez : mutez`: + +- [sub_mutez-mutez_00.tzt](sub_mutez-mutez_00.tzt) +- [sub_mutez-mutez_01.tzt](sub_mutez-mutez_01.tzt) + +## Boolean operations + +### `AND bool:bool` + +- [and_bool-bool_00.tzt](and_bool-bool_00.tzt) +- [and_bool-bool_01.tzt](and_bool-bool_01.tzt) +- [and_bool-bool_02.tzt](and_bool-bool_02.tzt) +- [and_bool-bool_03.tzt](and_bool-bool_03.tzt) + +### `AND nat:nat` + +- [and_nat-nat_00.tzt](and_nat-nat_00.tzt) +- [and_nat-nat_01.tzt](and_nat-nat_01.tzt) +- [and_nat-nat_02.tzt](and_nat-nat_02.tzt) + +Missing edge cases: + +- One argument is `0` (both from left and right) +- Result is `0` with non-zero arguments + +### `AND int:nat` + +- [and_int-nat_00.tzt](and_int-nat_00.tzt) +- [and_int-nat_01.tzt](and_int-nat_01.tzt) +- [and_int-nat_02.tzt](and_int-nat_02.tzt) +- [and_int-nat_03.tzt](and_int-nat_03.tzt) +- [and_int-nat_04.tzt](and_int-nat_04.tzt) +- [and_int-nat_05.tzt](and_int-nat_05.tzt) +- [and_int-nat_06.tzt](and_int-nat_06.tzt) + +### `AND: bytes:bytes` + +- [and_bytes-bytes_00.tzt](and_bytes-bytes_00.tzt) +- [and_bytes-bytes_01.tzt](and_bytes-bytes_01.tzt) +- [and_bytes-bytes_02.tzt](and_bytes-bytes_02.tzt) +- [and_bytes-bytes_03.tzt](and_bytes-bytes_03.tzt) + +### `NOT: bool` + +- [not_bool_00.tzt](not_bool_00.tzt) +- [not_bool_01.tzt](not_bool_01.tzt) + +### `NOT: nat` + +- [not_nat_00.tzt](not_nat_00.tzt) +- [not_nat_01.tzt](not_nat_01.tzt) +- [not_nat_02.tzt](not_nat_02.tzt) + +### `NOT: int` + +- [not_int_00.tzt](not_int_00.tzt) +- [not_nat_03.tzt](not_nat_03.tzt) +- [not_nat_04.tzt](not_nat_04.tzt) +- [not_nat_05.tzt](not_nat_05.tzt) +- [not_nat_06.tzt](not_nat_06.tzt) +- [not_nat_07.tzt](not_nat_07.tzt) + +Files do not follow naming convention. + +### `NOT: bytes` + +- [not_bytes_00.tzt](not_bytes_00.tzt) +- [not_bytes_01.tzt](not_bytes_01.tzt) +- [not_bytes_02.tzt](not_bytes_02.tzt) + +### `OR bool:bool` + +- [or_bool-bool_00.tzt](or_bool-bool_00.tzt) +- [or_bool-bool_01.tzt](or_bool-bool_01.tzt) +- [or_bool-bool_02.tzt](or_bool-bool_02.tzt) +- [or_bool-bool_03.tzt](or_bool-bool_03.tzt) + +### `OR nat:nat` + +- [or_nat-nat_00.tzt](or_nat-nat_00.tzt) +- [or_nat-nat_01.tzt](or_nat-nat_01.tzt) +- [or_nat-nat_02.tzt](or_nat-nat_02.tzt) +- [or_nat-nat_03.tzt](or_nat-nat_03.tzt) +- [or_nat-nat_04.tzt](or_nat-nat_04.tzt) +- [or_nat-nat_05.tzt](or_nat-nat_05.tzt) +- [or_nat-nat_06.tzt](or_nat-nat_06.tzt) + +### `OR bytes` + +- [or_bytes-bytes_00.tzt](or_bytes-bytes_00.tzt) +- [or_bytes-bytes_01.tzt](or_bytes-bytes_01.tzt) +- [or_bytes-bytes_02.tzt](or_bytes-bytes_02.tzt) +- [or_bytes-bytes_03.tzt](or_bytes-bytes_03.tzt) + +### `XOR: bool:bool` + +- [xor_bool-bool_00.tzt](xor_bool-bool_00.tzt) +- [xor_bool-bool_01.tzt](xor_bool-bool_01.tzt) +- [xor_bool-bool_02.tzt](xor_bool-bool_02.tzt) +- [xor_bool-bool_03.tzt](xor_bool-bool_03.tzt) + +### `XOR: nat:nat` + +- [xor_nat-nat_00.tzt](xor_nat-nat_00.tzt) +- [xor_nat-nat_01.tzt](xor_nat-nat_01.tzt) +- [xor_nat-nat_02.tzt](xor_nat-nat_02.tzt) +- [xor_nat-nat_03.tzt](xor_nat-nat_03.tzt) +- [xor_nat-nat_04.tzt](xor_nat-nat_04.tzt) +- [xor_nat-nat_05.tzt](xor_nat-nat_05.tzt) +- [xor_nat-nat_06.tzt](xor_nat-nat_06.tzt) + +### `XOR: bytes:bytes` + +- [xor_bytes-bytes_00.tzt](xor_bytes-bytes_00.tzt) +- [xor_bytes-bytes_01.tzt](xor_bytes-bytes_01.tzt) +- [xor_bytes-bytes_02.tzt](xor_bytes-bytes_02.tzt) +- [xor_bytes-bytes_03.tzt](xor_bytes-bytes_03.tzt) + +## Data structure manipulation + +### `CAR` + +- [car_00.tzt](car_00.tzt) +- [car_01.tzt](car_01.tzt) + +### `CDR` + +- [cdr_00.tzt](cdr_00.tzt) +- [cdr_01.tzt](cdr_01.tzt) + +### `CONCAT: string : string` + +- [concat_string_00.tzt](concat_string_00.tzt) +- [concat_string_01.tzt](concat_string_01.tzt) +- [concat_string_02.tzt](concat_string_02.tzt) + +### `CONCAT: list string` + +- [concat_liststring_00.tzt](concat_liststring_00.tzt) +- [concat_liststring_01.tzt](concat_liststring_01.tzt) +- [concat_liststring_02.tzt](concat_liststring_02.tzt) +- [concat_liststring_03.tzt](concat_liststring_03.tzt) +- [concat_liststring_04.tzt](concat_liststring_04.tzt) + +### `CONCAT: bytes : bytes` + +- [concat_bytes_00.tzt](concat_bytes_00.tzt) +- [concat_bytes_01.tzt](concat_bytes_01.tzt) + +### `CONCAT: list bytes` + +- [concat_listbytes_00.tzt](concat_listbytes_00.tzt) +- [concat_listbytes_01.tzt](concat_listbytes_01.tzt) +- [concat_listbytes_02.tzt](concat_listbytes_02.tzt) + +### `CONS` + +- [cons_int_00.tzt](cons_int_00.tzt) +- [cons_int_01.tzt](cons_int_01.tzt) +- [cons_int_02.tzt](cons_int_02.tzt) +- [cons_string_00.tzt](cons_string_00.tzt) + +### `EMPTY_BIG_MAP` + +- [emptybigmap_nat-nat_00.tzt](emptybigmap_nat-nat_00.tzt) + +### `EMPTY_MAP` + +- [emptymap_nat-nat_00.tzt](emptymap_nat-nat_00.tzt) +- [emptymap_string-string_00.tzt](emptymap_string-string_00.tzt) + +### `EMPTY_SET` + +- [emptyset_nat_00.tzt](emptyset_nat_00.tzt) + +### `GET: kty : map kty vty` + +- [get_mapintint_00.tzt](get_mapintint_00.tzt) +- [get_mapintint_01.tzt](get_mapintint_01.tzt) +- [get_mapstringstring_00.tzt](get_mapstringstring_00.tzt) +- [get_mapstringstring_01.tzt](get_mapstringstring_01.tzt) +- [get_mapstringstring_02.tzt](get_mapstringstring_02.tzt) + +### `GET: kty : big_map kty vty` + +- [get_bigmapstringstring_00.tzt](get_bigmapstringstring_00.tzt) +- [get_bigmapstringstring_01.tzt](get_bigmapstringstring_01.tzt) +- [get_bigmapstringstring_02.tzt](get_bigmapstringstring_02.tzt) + +### `GET n` + +***None*** + +### `GET_AND_UPDATE: kty : option vty : map kty vty` + +***None*** + +### `GET_AND_UPDATE: kty : option vty : big_map kty vty` + +***None*** + +### `ITER: list ty` + +- [iter_listint_00.tzt](iter_listint_00.tzt) +- [iter_listint_01.tzt](iter_listint_01.tzt) +- [iter_listint_02.tzt](iter_listint_02.tzt) +- [iter_listint_03.tzt](iter_listint_03.tzt) +- [iter_liststring_00.tzt](iter_liststring_00.tzt) +- [iter_liststring_01.tzt](iter_liststring_01.tzt) + +### `ITER: set cty` + +- [iter_setint_00.tzt](iter_setint_00.tzt) +- [iter_setint_01.tzt](iter_setint_01.tzt) +- [iter_setint_02.tzt](iter_setint_02.tzt) +- [iter_setstring_00.tzt](iter_setstring_00.tzt) +- [iter_setstring_01.tzt](iter_setstring_01.tzt) +- [iter_setstring_02.tzt](iter_setstring_02.tzt) + +### `ITER: map kty vty` + +- [iter_mapintint_00.tzt](iter_mapintint_00.tzt) +- [iter_mapintint_01.tzt](iter_mapintint_01.tzt) +- [iter_mapintint_02.tzt](iter_mapintint_02.tzt) +- [iter_mapintint_03.tzt](iter_mapintint_03.tzt) +- [iter_mapintint_04.tzt](iter_mapintint_04.tzt) +- [iter_mapstringstring_00.tzt](iter_mapstringstring_00.tzt) + +### `LEFT` + +- [left_int-nat_00.tzt](left_int-nat_00.tzt) + +### `MAP: list ty` + +- [map_listint_00.tzt](map_listint_00.tzt) +- [map_listint_01.tzt](map_listint_01.tzt) +- [map_listint_02.tzt](map_listint_02.tzt) +- [map_listint_03.tzt](map_listint_03.tzt) +- [map_listint_04.tzt](map_listint_04.tzt) +- [map_listint_05.tzt](map_listint_05.tzt) +- [map_listint_06.tzt](map_listint_06.tzt) +- [map_liststring_00.tzt](map_liststring_00.tzt) +- [map_liststring_01.tzt](map_liststring_01.tzt) +- [map_liststring_02.tzt](map_liststring_02.tzt) +- [map_liststring_04.tzt](map_liststring_04.tzt) +- [map_liststring_05.tzt](map_liststring_05.tzt) +- [map_liststring_06.tzt](map_liststring_06.tzt) +- [map_liststring_07.tzt](map_liststring_07.tzt) +- [map_liststring_08.tzt](map_liststring_08.tzt) + +### `MAP: option ty` + +***None*** + +### `MAP: map kty ty1` + +- [map_mapintint_00.tzt](map_mapintint_00.tzt) +- [map_mapintint_01.tzt](map_mapintint_01.tzt) +- [map_mapintstring_00.tzt](map_mapintstring_00.tzt) +- [map_mapintstring_01.tzt](map_mapintstring_01.tzt) +- [map_mapstringnat_00.tzt](map_mapstringnat_00.tzt) +- [map_mapstringnat_01.tzt](map_mapstringnat_01.tzt) +- [map_mapstringnat_02.tzt](map_mapstringnat_02.tzt) + +### `MEM: cty : set cty` + +- [mem_setint_00.tzt](mem_setint_00.tzt) +- [mem_setint_01.tzt](mem_setint_01.tzt) +- [mem_setstring_00.tzt](mem_setstring_00.tzt) +- [mem_setstring_01.tzt](mem_setstring_01.tzt) +- [mem_setstring_02.tzt](mem_setstring_02.tzt) + +### `MEM: kty : map kty vty` + +- [mem_mapintint_00.tzt](mem_mapintint_00.tzt) +- [mem_mapnatnat_00.tzt](mem_mapnatnat_00.tzt) +- [mem_mapnatnat_01.tzt](mem_mapnatnat_01.tzt) +- [mem_mapnatnat_02.tzt](mem_mapnatnat_02.tzt) +- [mem_mapnatnat_03.tzt](mem_mapnatnat_03.tzt) +- [mem_mapnatnat_04.tzt](mem_mapnatnat_04.tzt) +- [mem_mapnatnat_05.tzt](mem_mapnatnat_05.tzt) +- [mem_mapstringnat_00.tzt](mem_mapstringnat_00.tzt) +- [mem_mapstringnat_01.tzt](mem_mapstringnat_01.tzt) +- [mem_mapstringnat_02.tzt](mem_mapstringnat_02.tzt) +- [mem_mapstringnat_03.tzt](mem_mapstringnat_03.tzt) +- [mem_mapstringnat_04.tzt](mem_mapstringnat_04.tzt) +- [mem_mapstringnat_05.tzt](mem_mapstringnat_05.tzt) + +### `MEM: kty : big_map kty vty` + +- [mem_bigmapnatnat_00.tzt](mem_bigmapnatnat_00.tzt) +- [mem_bigmapnatnat_01.tzt](mem_bigmapnatnat_01.tzt) +- [mem_bigmapnatnat_02.tzt](mem_bigmapnatnat_02.tzt) +- [mem_bigmapnatnat_03.tzt](mem_bigmapnatnat_03.tzt) +- [mem_bigmapnatnat_04.tzt](mem_bigmapnatnat_04.tzt) +- [mem_bigmapnatnat_05.tzt](mem_bigmapnatnat_05.tzt) +- [mem_bigmapstringnat_00.tzt](mem_bigmapstringnat_00.tzt) +- [mem_bigmapstringnat_01.tzt](mem_bigmapstringnat_01.tzt) +- [mem_bigmapstringnat_02.tzt](mem_bigmapstringnat_02.tzt) +- [mem_bigmapstringnat_03.tzt](mem_bigmapstringnat_03.tzt) +- [mem_bigmapstringnat_04.tzt](mem_bigmapstringnat_04.tzt) +- [mem_bigmapstringnat_05.tzt](mem_bigmapstringnat_05.tzt) + +### `NEVER` + +***None*** + +### `NIL` + +- [nil_nat_00.tzt](nil_nat_00.tzt) + +### `NONE` + +- [none_int_00.tzt](none_int_00.tzt) +- [none_pair-nat-string.tzt](none_pair-nat-string.tzt) + +### `PACK` + +- `pack_*.tzt` +- [packunpack_address_00.tzt](packunpack_address_00.tzt) +- [packunpack_bool_00.tzt](packunpack_bool_00.tzt) +- [packunpack_bytes_00.tzt](packunpack_bytes_00.tzt) +- [packunpack_int_00.tzt](packunpack_int_00.tzt) +- [packunpack_keyhash_00.tzt](packunpack_keyhash_00.tzt) +- [packunpack_mutez_00.tzt](packunpack_mutez_00.tzt) +- [packunpack_nat_00.tzt](packunpack_nat_00.tzt) +- [packunpack_string_00.tzt](packunpack_string_00.tzt) +- [packunpack_timestamp_00.tzt](packunpack_timestamp_00.tzt) + +Only few value types are covered. + +Among tests on values serialization: +- Addresses with entrypoints are not covered. + +### `PAIR` + +- [pair_int-int_00.tzt](pair_int-int_00.tzt) +- [pair_nat-string_00.tzt](pair_nat-string_00.tzt) +- [pair_pair-nat-string-pair-string-nat_00.tzt](pair_pair-nat-string-pair-string-nat_00.tzt) + +### `PAIR n` + +***None*** + +### `RIGHT` + +- [right_nat-int_00.tzt](right_nat-int_00.tzt) + +### `SIZE: set cty` + +- [size_setint_00.tzt](size_setint_00.tzt) +- [size_setint_01.tzt](size_setint_01.tzt) +- [size_setint_02.tzt](size_setint_02.tzt) +- [size_setint_03.tzt](size_setint_03.tzt) +- [size_setstring_00.tzt](size_setstring_00.tzt) + +### `SIZE: map kty vty` + +- [size_mapintint_00.tzt](size_mapintint_00.tzt) +- [size_mapstringnat_00.tzt](size_mapstringnat_00.tzt) +- [size_mapstringnat_01.tzt](size_mapstringnat_01.tzt) +- [size_mapstringnat_02.tzt](size_mapstringnat_02.tzt) +- [size_mapstringnat_03.tzt](size_mapstringnat_03.tzt) + +### `SIZE: list ty` + +- [size_listint_00.tzt](size_listint_00.tzt) +- [size_listint_01.tzt](size_listint_01.tzt) +- [size_listint_02.tzt](size_listint_02.tzt) +- [size_listint_03.tzt](size_listint_03.tzt) + +### `SIZE: string` + +- [size_string_00.tzt](size_string_00.tzt) + +### `SIZE: bytes` + +- [size_bytes_00.tzt](size_bytes_00.tzt) + +### `SLICE: nat : nat : string` + +- [slice_string_00.tzt](slice_string_00.tzt) +- [slice_string_01.tzt](slice_string_01.tzt) +- [slice_string_02.tzt](slice_string_02.tzt) +- [slice_string_03.tzt](slice_string_03.tzt) +- [slice_string_04.tzt](slice_string_04.tzt) +- [slice_string_05.tzt](slice_string_05.tzt) + +### `SLICE: nat : nat : bytes` + +- [slice_bytes_00.tzt](slice_bytes_00.tzt) +- [slice_bytes_01.tzt](slice_bytes_01.tzt) +- [slice_bytes_02.tzt](slice_bytes_02.tzt) +- [slice_bytes_03.tzt](slice_bytes_03.tzt) +- [slice_bytes_04.tzt](slice_bytes_04.tzt) + +### `SOME` + +- [some_int_00.tzt](some_int_00.tzt) +- [some_pairintint_00.tzt](some_pairintint_00.tzt) +- [some_string_00.tzt](some_string_00.tzt) + +### `UNIT` + +- [unit_00.tzt](unit_00.tzt) + +### `UNPACK` + +- [packunpack_address_00.tzt](packunpack_address_00.tzt) +- [packunpack_bool_00.tzt](packunpack_bool_00.tzt) +- [packunpack_bytes_00.tzt](packunpack_bytes_00.tzt) +- [packunpack_int_00.tzt](packunpack_int_00.tzt) +- [packunpack_keyhash_00.tzt](packunpack_keyhash_00.tzt) +- [packunpack_mutez_00.tzt](packunpack_mutez_00.tzt) +- [packunpack_nat_00.tzt](packunpack_nat_00.tzt) +- [packunpack_string_00.tzt](packunpack_string_00.tzt) +- [packunpack_timestamp_00.tzt](packunpack_timestamp_00.tzt) + +Tested only with conjunction with `PACK` + +### `UNPAIR` + +- [unpair_pairstringstring_00.tzt](unpair_pairstringstring_00.tzt) + +### `UPDATE: cty : bool : set cty` + +- [update_setint_00.tzt](update_setint_00.tzt) +- [update_setint_01.tzt](update_setint_01.tzt) +- [update_setint_02.tzt](update_setint_02.tzt) + +### `UPDATE: kty : option vty : map kty vty` + +- [update_mapintint_00.tzt](update_mapintint_00.tzt) +- [update_mapintint_01.tzt](update_mapintint_01.tzt) + +### `UPDATE: kty : option vty : big_map kty vty` + +- [update_bigmapstringstring_00.tzt](update_bigmapstringstring_00.tzt) +- [update_bigmapstringstring_01.tzt](update_bigmapstringstring_01.tzt) +- [update_bigmapstringstring_02.tzt](update_bigmapstringstring_02.tzt) +- [update_bigmapstringstring_03.tzt](update_bigmapstringstring_03.tzt) +- [update_bigmapstringstring_04.tzt](update_bigmapstringstring_04.tzt) +- [update_bigmapstringstring_05.tzt](update_bigmapstringstring_05.tzt) +- [update_bigmapstringstring_06.tzt](update_bigmapstringstring_06.tzt) +- [update_bigmapstringstring_07.tzt](update_bigmapstringstring_07.tzt) + +### `UPDATE n` + +***None*** + +## Ticket manipulation + +Not covered + +### `JOIN_TICKETS` + +***None*** + +### `READ_TICKET` + +***None*** + +### `SPLIT_TICKET` + +***None*** + +### `TICKET` + +***None*** + +## Cryptographic operations + +Not covered + +### `BLAKE2B` + +***None*** + +### `CHECK_SIGNATURE` + +- [checksignature_00.tzt](checksignature_00.tzt) +- [checksignature_01.tzt](checksignature_01.tzt) + +Does not check different types of key. + +### `HASH_KEY` + +***None*** + +### `KECCAK` + +***None*** + +### `PAIRING_CHECK` + +***None*** + +### `SAPLING_EMPTY_STATE ms` + +***None*** + +### `SAPLING_VERIFY_UPDATE` + +***None*** + +### `SHA256` + +***None*** + +### `SHA3` + +***None*** + +### `SHA512` + +***None*** + +## Blockchain operations + +### `ADDRESS` + +- [address_00.tzt](address_00.tzt) +- [address_01.tzt](address_01.tzt) -- on implicit contract +- [address_02.tzt](address_02.tzt) + +### `AMOUNT` + +- [amount_00.tzt](amount_00.tzt) + +### `BALANCE` + +- [balance_00.tzt](balance_00.tzt) + +### `CHAIN_ID` + +- [chain_id_00.tzt](chain_id_00.tzt) +- [chain_id_01.tzt](chain_id_01.tzt) + +### `CONTRACT` + +Note: invariants are taken from the table in section, copied below for posterity. + +- [contract_00.tzt](contract_00.tzt) -- valid_contract_type "addr" t holds +- [contract_01.tzt](contract_01.tzt) -- no_contract "addr" holds +- [contract_02.tzt](contract_02.tzt) -- invalid_contract_type "addr" t holds +- [contract_03.tzt](contract_03.tzt) -- valid_contract_type "addr" t holds +- [contract_04.tzt](contract_04.tzt) -- valid_contract_type "addr" t holds on implicit contract +- [contract_05.tzt](contract_05.tzt) -- no_contract "addr" holds + +No tests with entrypoints (the cases represented by rows 3, 4, 5, 6, 7, 9, 10 from the table are not covered) + +``` ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| input address | instruction | output contract | predicate | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr" | CONTRACT t | None if addr does not exist | no_contract "addr" holds | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr" | CONTRACT t | None if addr exists, but has a default | invalid_contract_type "addr" t holds | +| | | entrypoint not of type t, or has no | | +| | | default entrypoint and parameter is not | | +| | | of type t | | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr%name" | CONTRACT t | None if addr does not exist, or exists | no_contract "addr%name" holds | +| | | but does not have a "name" entrypoint | | ++---------------+---------------------+ | | +| "addr" | CONTRACT %name t | | | +| | | | | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr%name" | CONTRACT t | None if addr exists, but has an | invalid_contract_type "addr%name" t holds | +| | | entrypoint %name not of type t | | ++---------------+---------------------+ | | +| "addr" | CONTRACT %name t | | | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr%name1" | CONTRACT %name2 t | None | entrypoint_ambiguity "addr%name1" "name2" holds | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr" | CONTRACT t | (Some "addr") if contract exists, has a | valid_contract_type "addr" t holds | +| | | default entrypoint of type t, or has no | | +| | | default entrypoint and parameter type t | | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +| "addr%name" | CONTRACT t | (Some "addr%name") if addr exists and | valid_contract_type "addr%name" t holds | ++---------------+---------------------+ has an entrypoint %name of type t | | +| "addr" | CONTRACT %name t | | | ++---------------+---------------------+------------------------------------------+-------------------------------------------------+ +``` + +### `CREATE_CONTRACT` + +- [createcontract_00.tzt](createcontract_00.tzt) +- [createcontract_01.tzt](createcontract_01.tzt) + +### `EMIT` + +***None*** + +### `IMPLICIT_ACCOUNT` + +- [implicitaccount_00.tzt](implicitaccount_00.tzt) + +### `LEVEL` + +***None*** + +TZT format doesn't have the necessary field(s) to set the return value of `LEVEL` instruction + +### `MIN_BLOCK_TIME` + +***None*** + +TZT format doesn't have the necessary field(s) to set the return value of +`MIN_BLOCK_TIME` instruction + +### `NOW` + +- [now_00.tzt](now_00.tzt) + +### `SELF` + +- [self_00.tzt](self_00.tzt) + +### `SELF_ADDRESS` + +***None*** + +### `SENDER` + +- [sender_00.tzt](sender_00.tzt) + +It would be nice to add test where the result of `SOURCE` isn't equal to the result of `SENDER` + +### `SET_DELEGATE` + +- [setdelegate_00.tzt](setdelegate_00.tzt) + +No test with `None` parameter + +### `SOURCE` + +- [source_00.tzt](source_00.tzt) + +### `TOTAL_VOTING_POWER` + +***None*** + +TZT format doesn't have the necessary field(s) to set the return value of +`TOTAL_VOTING_POWER` instruction + +### `TRANSFER_TOKENS` + +- [transfertokens_00.tzt](transfertokens_00.tzt) +- [transfertokens_01.tzt](transfertokens_01.tzt) + +### `VIEW` + +***None*** + +### `VOTING_POWER` + +***None*** + +TZT format doesn't have the necessary field(s) to set the return value of +`VOTING_POWER` instruction + +## Missing tests summary + +There are no tests for ill-typed code. + +Instructions with no tests: + +- `{}` +- `ADD: bls12_381_fr : bls12_381_fr` +- `ADD: bls12_381_g1 : bls12_381_g1` +- `ADD: bls12_381_g2 : bls12_381_g2` +- `AND: bytes:bytes` +- `BLAKE2B` +- `BYTES: int` +- `BYTES: nat` +- `CHECK_SIGNATURE` +- `COMPARE: address : address` +- `COMPARE: chain_id : chain_id` +- `COMPARE: key : key` +- `COMPARE: never : never` +- `COMPARE: option _ : option _` +- `COMPARE: or _ _ : or _ _` +- `COMPARE: signature : signature` +- `COMPARE: timestamp : timestamp` +- `COMPARE: unit : unit` +- `DUP n` +- `DUP` +- `EDIV: int : nat` +- `EDIV: nat : int` +- `EDIV: nat : nat` +- `EMIT` +- `GET n` +- `GET_AND_UPDATE: kty : option vty : big_map kty vty` +- `GET_AND_UPDATE: kty : option vty : map kty vty` +- `HASH_KEY` +- `INT: bls12_381_fr` +- `INT: bytes` +- `JOIN_TICKETS` +- `KECCAK` +- `LAMBDA_REC` +- `LAMBDA` +- `LEVEL` +- `LSL: bytes : nat` +- `LSR: bytes : nat` +- `MAP: option ty` +- `MIN_BLOCK_TIME` +- `MUL: bls12_381_fr : bls12_381_fr` +- `MUL: bls12_381_fr : int` +- `MUL: bls12_381_fr : nat` +- `MUL: bls12_381_g1 : bls12_381_fr` +- `MUL: bls12_381_g2 : bls12_381_fr` +- `MUL: int : bls12_381_fr` +- `MUL: nat : bls12_381_fr` +- `NAT` +- `NEG: bls12_381_fr` +- `NEG: bls12_381_g1` +- `NEG: bls12_381_g2` +- `NEVER` +- `NOT: bytes` +- `OR bytes` +- `PAIR n` +- `PAIRING_CHECK` +- `READ_TICKET` +- `SAPLING_EMPTY_STATE ms` +- `SAPLING_VERIFY_UPDATE` +- `SELF_ADDRESS` +- `SHA256` +- `SHA3` +- `SHA512` +- `SPLIT_TICKET` +- `SUB_MUTEZ` +- `SUB: int : nat` +- `SUB: nat : int` +- `SUB: nat : nat` +- `SWAP` +- `TICKET` +- `TOTAL_VOTING_POWER` +- `UPDATE n` +- `VIEW` +- `VOTING_POWER` +- `XOR: bytes:bytes` + +Instructions with missing edge cases: + +- `AND int:nat` 0 & x +- `AND int:nat` positive & x +- `AND int:nat` result `0` with non-zero arguments +- `AND int:nat` x & 0 +- `AND nat:nat` 0 & x +- `AND nat:nat` result `0` with non-zero arguments +- `AND nat:nat` x & 0 +- `COMPARE: int : int` with 0 +- `COMPARE: int : int` with negative argument(s) +- `COMPARE: mutez : mutez` with 0 +- `COMPARE: nat : nat` with 0 +- `COMPARE: string : string` with strings longer than 1 character +- `CONTRACT` with entrypoints +- `DIG n` for even n (e.g. n = 2) +- `DIP n` for n = 0 +- `DIP n` for n = 1 +- `DROP n` for n = 1 +- `DUG n` for n = 0 +- `DUG n` for n = 1 +- `EDIV: int : int` negative / negative +- `EDIV: int : int` positive / positive +- `EDIV: int : int` with result 1 +- `EDIV: int : int` zero / non-zero +- `EDIV: int : int` zero / zero +- `EDIV: mutez : mutez` zero / non-zero +- `EDIV: mutez : mutez` zero / zero +- `IF_CONS` -- check that stack tail is preserved +- `IF_LEFT` -- check that stack tail is preserved +- `IF_NONE` -- check that stack tail is preserved +- `IF` -- check that stack tail is preserved +- `ISNAT` for positive argument +- `LSL: nat : nat` zero shift for non-zero argument +- `LSR: nat : nat` zero shift for non-zero argument +- `MUL: int : int` 0 * x +- `MUL: int : int` negative * negative +- `MUL: int : int` negative * positive +- `MUL: int : int` positive * positive +- `MUL: int : int` x * 0 +- `MUL: int : nat` 0 * x +- `MUL: int : nat` negative * x +- `MUL: int : nat` x * 0 +- `MUL: mutez : nat` 0 * x +- `MUL: mutez : nat` x * 0 +- `MUL: nat : int` 0 * x +- `MUL: nat : int` x * 0 +- `MUL: nat : int` x * positive +- `MUL: nat : mutez` 0 * x +- `MUL: nat : mutez` x * 0 +- `MUL: nat : nat` 0 * x +- `MUL: nat : nat` x * 0 +- `PACK` standalone tests (without `UNPACK`) +- `PUSH` for more pushable types +- `SENDER` when sender != source +- `SET_DELEGATE` with `None` +- `SUB: int : int` 0 - x +- `SUB: int : int` x - 0 +- `SUB: int : int` x - negative +- `SUB: timestamp : int` 0 - x +- `SUB: timestamp : int` x - 0 +- `SUB: timestamp : timestamp` realistic timestamps with negative difference +- `UNPACK` standalone tests (without `PACK`) diff --git a/tzt_reference_test_suite/createcontract_00.tzt b/tzt_reference_test_suite/createcontract_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..38c8461b9cb45279ee808a5e795bb39cb91d9ce2 --- /dev/null +++ b/tzt_reference_test_suite/createcontract_00.tzt @@ -0,0 +1,23 @@ +code { + CREATE_CONTRACT + { code { DROP ; UNIT ; NIL operation ; PAIR } ; + storage unit ; + parameter unit } + } ; +input { + Stack_elt (option key_hash) (Some "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z") ; + Stack_elt mutez 12 ; + Stack_elt unit Unit + } ; +output { + Stack_elt + operation + (Create_contract + { code { DROP ; UNIT ; NIL operation ; PAIR } ; storage unit ; parameter unit } + (Some "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z") + 12 + Unit + _ + ) ; + Stack_elt address _ + } diff --git a/tzt_reference_test_suite/createcontract_01.tzt b/tzt_reference_test_suite/createcontract_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..18dae607a5c5c9fd37a825be05e5698ce20386ab --- /dev/null +++ b/tzt_reference_test_suite/createcontract_01.tzt @@ -0,0 +1,22 @@ +code { + CREATE_CONTRACT + { code { DROP ; UNIT ; NIL operation ; PAIR } ; + storage unit ; + parameter unit } + } ; +input { + Stack_elt (option key_hash) None ; + Stack_elt mutez 12 ; + Stack_elt unit Unit + } ; +output { + Stack_elt + operation + (Create_contract + { code { DROP ; UNIT ; NIL operation ; PAIR } ; storage unit ; parameter unit } + None + 12 + Unit + _) ; + Stack_elt address _ + } diff --git a/tzt_reference_test_suite/dig_00.tzt b/tzt_reference_test_suite/dig_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f00bef5fec5861b97f84034ccf382dde7fcbb0be --- /dev/null +++ b/tzt_reference_test_suite/dig_00.tzt @@ -0,0 +1,3 @@ +code { DIG 0 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } ; +output { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } diff --git a/tzt_reference_test_suite/dig_01.tzt b/tzt_reference_test_suite/dig_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7a28eac838ae9841166aa74583ee7eccc8de3e28 --- /dev/null +++ b/tzt_reference_test_suite/dig_01.tzt @@ -0,0 +1,3 @@ +code { DIG 1 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } ; +output { Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } diff --git a/tzt_reference_test_suite/dig_02.tzt b/tzt_reference_test_suite/dig_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0f8f3314951a08effcdf73feaee51317c525ee71 --- /dev/null +++ b/tzt_reference_test_suite/dig_02.tzt @@ -0,0 +1,3 @@ +code { DIG 3 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } ; +output { Stack_elt int 4 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 5 ; Stack_elt int 6 } diff --git a/tzt_reference_test_suite/dig_03.tzt b/tzt_reference_test_suite/dig_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..62adbfec078531b9f1daef16fdc85f23610b590d --- /dev/null +++ b/tzt_reference_test_suite/dig_03.tzt @@ -0,0 +1,3 @@ +code { DIG 5 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } ; +output { Stack_elt int 6 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 } diff --git a/tzt_reference_test_suite/dig_04.tzt b/tzt_reference_test_suite/dig_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..242ff8cf95b15b954c9ac9239494575c484d567e --- /dev/null +++ b/tzt_reference_test_suite/dig_04.tzt @@ -0,0 +1,3 @@ +code { DIG 0 ; DIG 1 ; DIG 2 ; DIG 3 ; DIG 4 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 } ; +output { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 } diff --git a/tzt_reference_test_suite/dip_00.tc.tzt b/tzt_reference_test_suite/dip_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5c53cea3e5b950a2caa11f3e6938e05cfb4a5a89 --- /dev/null +++ b/tzt_reference_test_suite/dip_00.tc.tzt @@ -0,0 +1,3 @@ +code { DIP { PUSH bool True } } ; +input { } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dip_00.tzt b/tzt_reference_test_suite/dip_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8b6b4f445c21feb3e92e19490c7ecdf7a91a8f84 --- /dev/null +++ b/tzt_reference_test_suite/dip_00.tzt @@ -0,0 +1,3 @@ +code { DIP { PUSH bool True } } ; +input { Stack_elt nat 5 } ; +output { Stack_elt nat 5 ; Stack_elt bool True } diff --git a/tzt_reference_test_suite/dip_01.tzt b/tzt_reference_test_suite/dip_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f61be5ba3682e751d004a7b8484b5eb33e41b9c6 --- /dev/null +++ b/tzt_reference_test_suite/dip_01.tzt @@ -0,0 +1,3 @@ +code { DUP ; DIP { ADD } } ; +input { Stack_elt nat 1 ; Stack_elt nat 1 } ; +output { Stack_elt nat 1 ; Stack_elt nat 2 } diff --git a/tzt_reference_test_suite/dip_02.tzt b/tzt_reference_test_suite/dip_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5ce7efa25c7922e246a246d5ee7030e09ce1a324 --- /dev/null +++ b/tzt_reference_test_suite/dip_02.tzt @@ -0,0 +1,3 @@ +code { DUP ; DIP { ADD } } ; +input { Stack_elt nat 15 ; Stack_elt nat 9 } ; +output { Stack_elt nat 15 ; Stack_elt nat 24 } diff --git a/tzt_reference_test_suite/dipn_00.tc.tzt b/tzt_reference_test_suite/dipn_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e4c9dd04a1d12cee8fa2a1ed5429bb72787615b5 --- /dev/null +++ b/tzt_reference_test_suite/dipn_00.tc.tzt @@ -0,0 +1,3 @@ +code { DIP 1 { PUSH bool True } } ; +input { } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dipn_00.tzt b/tzt_reference_test_suite/dipn_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..93a6ced124ec956d980e5fb2adf5340ea79ba72d --- /dev/null +++ b/tzt_reference_test_suite/dipn_00.tzt @@ -0,0 +1,3 @@ +code { DIP 3 { PUSH bool True } } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt bool True ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dipn_01.tc.tzt b/tzt_reference_test_suite/dipn_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a435b80f7046b343973bd0a19e2dbacaad610986 --- /dev/null +++ b/tzt_reference_test_suite/dipn_01.tc.tzt @@ -0,0 +1,3 @@ +code { DIP 3 { PUSH bool True } } ; +input { Stack_elt unit Unit ; Stack_elt unit Unit } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dipn_01.tzt b/tzt_reference_test_suite/dipn_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3baa545f6bbd069fb6ef7ac8ded356fa2cbfa047 --- /dev/null +++ b/tzt_reference_test_suite/dipn_01.tzt @@ -0,0 +1,3 @@ +code { DIP 0 { PUSH bool True } } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt bool True ; Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dipn_02.tc.tzt b/tzt_reference_test_suite/dipn_02.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..73c4bfd88d0b4d05751270b418293e85a9e8c68d --- /dev/null +++ b/tzt_reference_test_suite/dipn_02.tc.tzt @@ -0,0 +1,3 @@ +code { DIP 3 {} } ; +input { Stack_elt unit Unit ; Stack_elt unit Unit } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dipn_02.tzt b/tzt_reference_test_suite/dipn_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..23a376874286b9adb441b07c10672921152eb7d0 --- /dev/null +++ b/tzt_reference_test_suite/dipn_02.tzt @@ -0,0 +1,3 @@ +code { DIP 1 { PUSH bool True } } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 5 ; Stack_elt bool True ; Stack_elt int 4 ; Stack_elt int 3 ; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dipn_03.tzt b/tzt_reference_test_suite/dipn_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..248b56c0f072ce1aa6f419924a3e7af7a09d25c0 --- /dev/null +++ b/tzt_reference_test_suite/dipn_03.tzt @@ -0,0 +1,3 @@ +code { DIP 0 { PUSH bool True } } ; +input { } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/drop_00.tc.tzt b/tzt_reference_test_suite/drop_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2b955f57c0163852f453595ad7504d230b8b2244 --- /dev/null +++ b/tzt_reference_test_suite/drop_00.tc.tzt @@ -0,0 +1,3 @@ +code { DROP } ; +input { } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/drop_00.tzt b/tzt_reference_test_suite/drop_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0bbc4732453ebe45e61b9af3403f851719813cf7 --- /dev/null +++ b/tzt_reference_test_suite/drop_00.tzt @@ -0,0 +1,3 @@ +code { DROP } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dropn_00.tc.tzt b/tzt_reference_test_suite/dropn_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0fdcb60155b45040bb0c79a6389db3d724bc1498 --- /dev/null +++ b/tzt_reference_test_suite/dropn_00.tc.tzt @@ -0,0 +1,3 @@ +code { DROP 3 } ; +input { Stack_elt int 1 ; Stack_elt int 2 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dropn_00.tzt b/tzt_reference_test_suite/dropn_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ed2e19f67e45b869215174a907c1e6bf85fea4fd --- /dev/null +++ b/tzt_reference_test_suite/dropn_00.tzt @@ -0,0 +1,3 @@ +code { DROP 5 } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dropn_01.tzt b/tzt_reference_test_suite/dropn_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6e67646266520703f201c8daf86d8a4f606f9ed4 --- /dev/null +++ b/tzt_reference_test_suite/dropn_01.tzt @@ -0,0 +1,3 @@ +code { DROP 0 } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dropn_02.tzt b/tzt_reference_test_suite/dropn_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f52a051d38e98222a18507657f8c11f32f1fe32d --- /dev/null +++ b/tzt_reference_test_suite/dropn_02.tzt @@ -0,0 +1,3 @@ +code { DROP 1 } ; +input { Stack_elt int 5 ; Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } ; +output { Stack_elt int 4 ; Stack_elt int 3; Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/dropn_03.tzt b/tzt_reference_test_suite/dropn_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3624833500cd8875239c960210198196b4730530 --- /dev/null +++ b/tzt_reference_test_suite/dropn_03.tzt @@ -0,0 +1,3 @@ +code { DROP 0 } ; +input {} ; +output {} diff --git a/tzt_reference_test_suite/dugn_00.tzt b/tzt_reference_test_suite/dugn_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1d19d226b0c3d1ef2c8dd33cab3257ff2716441a --- /dev/null +++ b/tzt_reference_test_suite/dugn_00.tzt @@ -0,0 +1,3 @@ +code { DUG 3 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 ; Stack_elt int 6 } ; +output { Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 1 ; Stack_elt int 5 ; Stack_elt int 6 } diff --git a/tzt_reference_test_suite/dup_00.tc.tzt b/tzt_reference_test_suite/dup_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6a1d5c10cd7b8895789c7a72541692e91f09e0ae --- /dev/null +++ b/tzt_reference_test_suite/dup_00.tc.tzt @@ -0,0 +1,3 @@ +code { DUP } ; +input { } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dup_00.tzt b/tzt_reference_test_suite/dup_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4e22644e02b12c78508bce264a5e7009363e4431 --- /dev/null +++ b/tzt_reference_test_suite/dup_00.tzt @@ -0,0 +1,3 @@ +code { DUP } ; +input { Stack_elt int 1 } ; +output { Stack_elt int 1 ; Stack_elt int 1 } diff --git a/tzt_reference_test_suite/dupn_00.tc.tzt b/tzt_reference_test_suite/dupn_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c560fffbab9ee1a7c19b4023260263b5cab4a7c5 --- /dev/null +++ b/tzt_reference_test_suite/dupn_00.tc.tzt @@ -0,0 +1,3 @@ +code { DUP 0 } ; +input { Stack_elt int 1 } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/dupn_00.tzt b/tzt_reference_test_suite/dupn_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..236c12770d3e0a96468b43e506cdfd9d4fec5470 --- /dev/null +++ b/tzt_reference_test_suite/dupn_00.tzt @@ -0,0 +1,3 @@ +code { DUP 1 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; +output { Stack_elt int 1 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; diff --git a/tzt_reference_test_suite/dupn_01.tc.tzt b/tzt_reference_test_suite/dupn_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..94f3063ae26b00af1a7e11e756ea6b6f2ab79e8d --- /dev/null +++ b/tzt_reference_test_suite/dupn_01.tc.tzt @@ -0,0 +1,3 @@ +code { DUP 3 } ; +input { Stack_elt int 1 ; Stack_elt int 2 }; +output (StaticError _); diff --git a/tzt_reference_test_suite/dupn_01.tzt b/tzt_reference_test_suite/dupn_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6534c191129e23596a3c59fbfc40359a022069e4 --- /dev/null +++ b/tzt_reference_test_suite/dupn_01.tzt @@ -0,0 +1,3 @@ +code { DUP 2 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; +output { Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; diff --git a/tzt_reference_test_suite/dupn_02.tzt b/tzt_reference_test_suite/dupn_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8206db64e6877ceb40ef053388461b39264d42fe --- /dev/null +++ b/tzt_reference_test_suite/dupn_02.tzt @@ -0,0 +1,3 @@ +code { DUP 3 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; +output { Stack_elt int 3 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; diff --git a/tzt_reference_test_suite/dupn_03.tzt b/tzt_reference_test_suite/dupn_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ef817e8efa0b2752e19c6069bcc9df933bd484f3 --- /dev/null +++ b/tzt_reference_test_suite/dupn_03.tzt @@ -0,0 +1,3 @@ +code { DUP 4 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; +output { Stack_elt int 4 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; diff --git a/tzt_reference_test_suite/dupn_04.tzt b/tzt_reference_test_suite/dupn_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bd863a374617d5272d13c3ec3d129ef67a9432af --- /dev/null +++ b/tzt_reference_test_suite/dupn_04.tzt @@ -0,0 +1,3 @@ +code { DUP 5 } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; +output { Stack_elt int 5 ; Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 ; Stack_elt int 4 ; Stack_elt int 5 }; diff --git a/tzt_reference_test_suite/ediv_int-int_00.tzt b/tzt_reference_test_suite/ediv_int-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ffe4582a3c579069155433c6042242e0baf33838 --- /dev/null +++ b/tzt_reference_test_suite/ediv_int-int_00.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt int 10 ; Stack_elt int -3 } ; +output { Stack_elt (option (pair int nat)) (Some (Pair -3 1)) } diff --git a/tzt_reference_test_suite/ediv_int-int_01.tzt b/tzt_reference_test_suite/ediv_int-int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e2148f10831337188a9a6638b62e0c9eab3fe143 --- /dev/null +++ b/tzt_reference_test_suite/ediv_int-int_01.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt int 5 ; Stack_elt int 0 } ; +output { Stack_elt (option (pair int nat)) None } diff --git a/tzt_reference_test_suite/ediv_int-int_02.tzt b/tzt_reference_test_suite/ediv_int-int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cf75c92c436bcf91d9659f73a1b1ab63b619eda4 --- /dev/null +++ b/tzt_reference_test_suite/ediv_int-int_02.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt int 10 ; Stack_elt int 0 } ; +output { Stack_elt (option (pair int nat)) None } diff --git a/tzt_reference_test_suite/ediv_int-int_03.tzt b/tzt_reference_test_suite/ediv_int-int_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5fc321df0cbba2d7f6829487ae436228c7774b5d --- /dev/null +++ b/tzt_reference_test_suite/ediv_int-int_03.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt int -8 ; Stack_elt int 2 } ; +output { Stack_elt (option (pair int nat)) (Some (Pair -4 0)) } diff --git a/tzt_reference_test_suite/ediv_mutez-mutez_00.tzt b/tzt_reference_test_suite/ediv_mutez-mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2e5a261acd32749bb21f789df822d154f014823f --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-mutez_00.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 100 ; Stack_elt mutez 3 } ; +output { Stack_elt (option (pair nat mutez)) (Some (Pair 33 1)) } diff --git a/tzt_reference_test_suite/ediv_mutez-mutez_01.tzt b/tzt_reference_test_suite/ediv_mutez-mutez_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cb9802bd6964485f51d930c2d0651832de452e56 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-mutez_01.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 102 ; Stack_elt mutez 3 } ; +output { Stack_elt (option (pair nat mutez)) (Some (Pair 34 0)) } diff --git a/tzt_reference_test_suite/ediv_mutez-mutez_02.tzt b/tzt_reference_test_suite/ediv_mutez-mutez_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..23f41f068468fd821d6ea309a9278d4cb2205655 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-mutez_02.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 2 ; Stack_elt mutez 3 } ; +output { Stack_elt (option (pair nat mutez)) (Some (Pair 0 2)) } diff --git a/tzt_reference_test_suite/ediv_mutez-mutez_03.tzt b/tzt_reference_test_suite/ediv_mutez-mutez_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4f2890d42364e39b78a138411a4676a91c89aa37 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-mutez_03.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 100 ; Stack_elt mutez 0 } ; +output { Stack_elt (option (pair nat mutez)) None } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_00.tzt b/tzt_reference_test_suite/ediv_mutez-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..47d95c11dd357226970846e56936c4b2767ee642 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_00.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 10 ; Stack_elt nat 10 } ; +output { Stack_elt (option (pair mutez mutez)) (Some (Pair 1 0)) } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_01.tzt b/tzt_reference_test_suite/ediv_mutez-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..715f2ea73fb9efb021ad332f77a95621bcfbd685 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_01.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 102 ; Stack_elt nat 3 } ; +output { Stack_elt (option (pair mutez mutez)) (Some (Pair 34 0)) } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_02.tzt b/tzt_reference_test_suite/ediv_mutez-nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..56ed03ede0631d10e2ea935c92f013ee5d5a4da8 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_02.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 2 ; Stack_elt nat 3 } ; +output { Stack_elt (option (pair mutez mutez)) (Some (Pair 0 2)) } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_03.tzt b/tzt_reference_test_suite/ediv_mutez-nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f9ea3f44fecf808861189b6b6a92f43a5b874167 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_03.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 100 ; Stack_elt nat 0 } ; +output { Stack_elt (option (pair mutez mutez)) None } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_04.tzt b/tzt_reference_test_suite/ediv_mutez-nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f716d970aa9661af43a9124b6652eb5136ba08a1 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_04.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 10 ; Stack_elt nat 3 } ; +output { Stack_elt (option (pair mutez mutez)) (Some (Pair 3 1)) } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_05.tzt b/tzt_reference_test_suite/ediv_mutez-nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e4505b27702330ebf65ed7fda88e674f9713f268 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_05.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 10 ; Stack_elt nat 0 } ; +output { Stack_elt (option (pair mutez mutez)) None } diff --git a/tzt_reference_test_suite/ediv_mutez-nat_06.tzt b/tzt_reference_test_suite/ediv_mutez-nat_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f3e9b855c00739e0002152fe3ce0ccae9ac63721 --- /dev/null +++ b/tzt_reference_test_suite/ediv_mutez-nat_06.tzt @@ -0,0 +1,3 @@ +code { EDIV } ; +input { Stack_elt mutez 5 ; Stack_elt nat 10 } ; +output { Stack_elt (option (pair mutez mutez)) (Some (Pair 0 5)) } diff --git a/tzt_reference_test_suite/emptybigmap_nat-nat_00.tzt b/tzt_reference_test_suite/emptybigmap_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..30ffa25444706eab1d79b3f1a00dc3b44c1450a9 --- /dev/null +++ b/tzt_reference_test_suite/emptybigmap_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { EMPTY_BIG_MAP nat nat } ; +input { } ; +output { Stack_elt (big_map nat nat) { } } diff --git a/tzt_reference_test_suite/emptymap_nat-nat_00.tzt b/tzt_reference_test_suite/emptymap_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c36aa617dc106821ef79de85aa9998c2356a0e1d --- /dev/null +++ b/tzt_reference_test_suite/emptymap_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { EMPTY_MAP nat nat } ; +input { } ; +output { Stack_elt (map nat nat) { } } diff --git a/tzt_reference_test_suite/emptymap_string-string_00.tzt b/tzt_reference_test_suite/emptymap_string-string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..57d827cd29cffbd67126645f7aedbc10eec02f18 --- /dev/null +++ b/tzt_reference_test_suite/emptymap_string-string_00.tzt @@ -0,0 +1,3 @@ +code { EMPTY_MAP string string } ; +input { } ; +output { Stack_elt (map string string) { } } diff --git a/tzt_reference_test_suite/emptyset_nat_00.tzt b/tzt_reference_test_suite/emptyset_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3b0a99d384e34d9681dda7d679190a98ead83d4f --- /dev/null +++ b/tzt_reference_test_suite/emptyset_nat_00.tzt @@ -0,0 +1,3 @@ +code { EMPTY_SET nat } ; +input { } ; +output { Stack_elt (set nat) { } } diff --git a/tzt_reference_test_suite/eq_00.tzt b/tzt_reference_test_suite/eq_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e5cbfe9ef77dfb93ab1a409c8a99d9fb174bf2a7 --- /dev/null +++ b/tzt_reference_test_suite/eq_00.tzt @@ -0,0 +1,3 @@ +code { EQ } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/eq_01.tzt b/tzt_reference_test_suite/eq_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..91fb93ee571c4b4ddddf93982218e8b5f6fcdd51 --- /dev/null +++ b/tzt_reference_test_suite/eq_01.tzt @@ -0,0 +1,3 @@ +code { EQ } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/eq_02.tzt b/tzt_reference_test_suite/eq_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c0916adba87800a9bc2568746a44a0b048223f48 --- /dev/null +++ b/tzt_reference_test_suite/eq_02.tzt @@ -0,0 +1,3 @@ +code { EQ } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/eq_03.tzt b/tzt_reference_test_suite/eq_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..18648ab3ebe6bd0b1fb18bf638303427e6faeb3a --- /dev/null +++ b/tzt_reference_test_suite/eq_03.tzt @@ -0,0 +1,3 @@ +code { EQ } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/eq_04.tzt b/tzt_reference_test_suite/eq_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ef1b2d32e1597c45de9524c88531a8c38464345f --- /dev/null +++ b/tzt_reference_test_suite/eq_04.tzt @@ -0,0 +1,3 @@ +code { EQ } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/exec_00.tzt b/tzt_reference_test_suite/exec_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dd2bca234eaa03a9f1bd7b00e6a434c721462c8d --- /dev/null +++ b/tzt_reference_test_suite/exec_00.tzt @@ -0,0 +1,3 @@ +code { DIP { LAMBDA int int { PUSH int 1 ; ADD } } ; EXEC } ; +input { Stack_elt int 5 ; Stack_elt int 10 } ; +output { Stack_elt int 6 ; Stack_elt int 10 } diff --git a/tzt_reference_test_suite/exec_01.tzt b/tzt_reference_test_suite/exec_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7185c9fa8ef5915eca7b31621c5f3c8d6feece96 --- /dev/null +++ b/tzt_reference_test_suite/exec_01.tzt @@ -0,0 +1,3 @@ +code { DIP { LAMBDA string string { PUSH string "_abc" ; SWAP ; CONCAT } } ; EXEC } ; +input { Stack_elt string "def" } ; +output { Stack_elt string "def_abc" } diff --git a/tzt_reference_test_suite/exec_02.tzt b/tzt_reference_test_suite/exec_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..893a0a8c60eaa8ecd359fd38a01571ca4e8141f5 --- /dev/null +++ b/tzt_reference_test_suite/exec_02.tzt @@ -0,0 +1,3 @@ +code { LAMBDA string string { PUSH string "_abc" ; NIL string ; SWAP ; CONS ; SWAP ; CONS ; CONCAT} ; SWAP ; EXEC } ; +input { Stack_elt string "" } ; +output { Stack_elt string "_abc" } diff --git a/tzt_reference_test_suite/exec_03.tzt b/tzt_reference_test_suite/exec_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..51e1dbfcf6ab6b0c9dc0c1bae6eebc53a4cd3f15 --- /dev/null +++ b/tzt_reference_test_suite/exec_03.tzt @@ -0,0 +1,3 @@ +code { LAMBDA string string { PUSH string "_abc" ; NIL string ; SWAP ; CONS ; SWAP ; CONS ; CONCAT} ; SWAP ; EXEC } ; +input { Stack_elt string "test" } ; +output { Stack_elt string "test_abc" } diff --git a/tzt_reference_test_suite/failwith_00.tc.tzt b/tzt_reference_test_suite/failwith_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f9a7e6d03efdb59a18eebc9684673643635e284e --- /dev/null +++ b/tzt_reference_test_suite/failwith_00.tc.tzt @@ -0,0 +1,3 @@ +code { FAILWITH } ; +input { Stack_elt (list operation) {} } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/failwith_00.tzt b/tzt_reference_test_suite/failwith_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fbbf19f1a81d36e053d5f2bd812e56d557344916 --- /dev/null +++ b/tzt_reference_test_suite/failwith_00.tzt @@ -0,0 +1,3 @@ +code { FAILWITH } ; +input { Stack_elt int 0 } ; +output (Failed 0) diff --git a/tzt_reference_test_suite/ge_00.tzt b/tzt_reference_test_suite/ge_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..00cbdd991a4c5c49d5c96625c59e4765ffa57372 --- /dev/null +++ b/tzt_reference_test_suite/ge_00.tzt @@ -0,0 +1,3 @@ +code { GE } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/ge_01.tzt b/tzt_reference_test_suite/ge_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..63a0b120476123d84a2e3e16d9fcce974e511165 --- /dev/null +++ b/tzt_reference_test_suite/ge_01.tzt @@ -0,0 +1,3 @@ +code { GE } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/ge_02.tzt b/tzt_reference_test_suite/ge_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..92eec4de4b527fc20ae00073985551bc7621281e --- /dev/null +++ b/tzt_reference_test_suite/ge_02.tzt @@ -0,0 +1,3 @@ +code { GE } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/ge_03.tzt b/tzt_reference_test_suite/ge_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b7b0d2e178534f79d31dfc15a67742051fe71c42 --- /dev/null +++ b/tzt_reference_test_suite/ge_03.tzt @@ -0,0 +1,3 @@ +code { GE } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/ge_04.tzt b/tzt_reference_test_suite/ge_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..41672f888ecc260b135dd6a68d6d7fcd8449ad2f --- /dev/null +++ b/tzt_reference_test_suite/ge_04.tzt @@ -0,0 +1,3 @@ +code { GE } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/get_00.tc.tzt b/tzt_reference_test_suite/get_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..60959ccf8a1255342352301e7e9700ad5c876845 --- /dev/null +++ b/tzt_reference_test_suite/get_00.tc.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt int 1 ; Stack_elt (list (pair int int)) { Pair 1 3 ; Pair 5 2 } } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/get_bigmapstringstring_00.tzt b/tzt_reference_test_suite/get_bigmapstringstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1d405abbe18ba3a3899a84503eb43ad121dce111 --- /dev/null +++ b/tzt_reference_test_suite/get_bigmapstringstring_00.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "hello" ; Stack_elt (big_map string string) { Elt "hello" "hi" } } ; +output { Stack_elt (option string) (Some "hi") } diff --git a/tzt_reference_test_suite/get_bigmapstringstring_01.tzt b/tzt_reference_test_suite/get_bigmapstringstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d1bac50badeef465de80598b8cecb53805e58935 --- /dev/null +++ b/tzt_reference_test_suite/get_bigmapstringstring_01.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "" ; Stack_elt (big_map string string) { Elt "hello" "hi" } } ; +output { Stack_elt (option string) None } diff --git a/tzt_reference_test_suite/get_bigmapstringstring_02.tzt b/tzt_reference_test_suite/get_bigmapstringstring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a056de68a64f975858cd110575585f40a2625f35 --- /dev/null +++ b/tzt_reference_test_suite/get_bigmapstringstring_02.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "1" ; Stack_elt (big_map string string) { Elt "1" "one" ; Elt "2" "two" } } ; +output { Stack_elt (option string) (Some "one") } diff --git a/tzt_reference_test_suite/get_map_00.tc.tzt b/tzt_reference_test_suite/get_map_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..84762542253718915e23ce62e86641df9413dbe5 --- /dev/null +++ b/tzt_reference_test_suite/get_map_00.tc.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt nat 1 ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/get_mapintint_00.tzt b/tzt_reference_test_suite/get_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..03babdc7e1c91eef779d7c2eb49c24f43cc408ff --- /dev/null +++ b/tzt_reference_test_suite/get_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt int 1 ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt (option int) (Some 3) } diff --git a/tzt_reference_test_suite/get_mapintint_01.tzt b/tzt_reference_test_suite/get_mapintint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..95e91ea34c76fc857c34143de57e34b2d8a232b7 --- /dev/null +++ b/tzt_reference_test_suite/get_mapintint_01.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt int 2 ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt (option int) None } diff --git a/tzt_reference_test_suite/get_mapstringstring_00.tzt b/tzt_reference_test_suite/get_mapstringstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..76cba33b039833579e1e1593898071510f7891f4 --- /dev/null +++ b/tzt_reference_test_suite/get_mapstringstring_00.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "hello" ; Stack_elt (map string string) { Elt "hello" "hi" } } ; +output { Stack_elt (option string) (Some "hi") } diff --git a/tzt_reference_test_suite/get_mapstringstring_01.tzt b/tzt_reference_test_suite/get_mapstringstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a0bf0d9107f00b8f82220fb7dcd53b2c9a18b0c6 --- /dev/null +++ b/tzt_reference_test_suite/get_mapstringstring_01.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "" ; Stack_elt (map string string) { Elt "hello" "hi" } } ; +output { Stack_elt (option string) None } diff --git a/tzt_reference_test_suite/get_mapstringstring_02.tzt b/tzt_reference_test_suite/get_mapstringstring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a99744170a0827d0bc6ed6c9fb38ea08656754c4 --- /dev/null +++ b/tzt_reference_test_suite/get_mapstringstring_02.tzt @@ -0,0 +1,3 @@ +code { GET } ; +input { Stack_elt string "1" ; Stack_elt (map string string) { Elt "1" "one" ; Elt "2" "two" } } ; +output { Stack_elt (option string) (Some "one") } diff --git a/tzt_reference_test_suite/gt_00.tc.tzt b/tzt_reference_test_suite/gt_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9904ce93b81e68a3867cb89e75257cab2bcb1766 --- /dev/null +++ b/tzt_reference_test_suite/gt_00.tc.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt string "42" } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/gt_00.tzt b/tzt_reference_test_suite/gt_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..89eb1784c69235b07132d35fa01012af924228ed --- /dev/null +++ b/tzt_reference_test_suite/gt_00.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/gt_01.tzt b/tzt_reference_test_suite/gt_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..851104c7244f51c2b6924947be87acc0df195e9e --- /dev/null +++ b/tzt_reference_test_suite/gt_01.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/gt_02.tzt b/tzt_reference_test_suite/gt_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e4273616dff88282a0f477c6cc8966af9d0f77fd --- /dev/null +++ b/tzt_reference_test_suite/gt_02.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/gt_03.tzt b/tzt_reference_test_suite/gt_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..81aab3f3e1d31ec5013caa40b1317ce0650dd318 --- /dev/null +++ b/tzt_reference_test_suite/gt_03.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/gt_04.tzt b/tzt_reference_test_suite/gt_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..80e8b7e15d2ef2550dcdd117880021dea485f760 --- /dev/null +++ b/tzt_reference_test_suite/gt_04.tzt @@ -0,0 +1,3 @@ +code { GT } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/if_00.tc.tzt b/tzt_reference_test_suite/if_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..aead0a8cbc2ea2475760936b9f0396d350d22ff6 --- /dev/null +++ b/tzt_reference_test_suite/if_00.tc.tzt @@ -0,0 +1,3 @@ +code { IF { UNIT ; FAILWITH } { PUSH int 1 } } ; +input { Stack_elt nat 1 } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/if_00.tzt b/tzt_reference_test_suite/if_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2dde99ef48b4eaf61852af5393778603e40d4fa2 --- /dev/null +++ b/tzt_reference_test_suite/if_00.tzt @@ -0,0 +1,3 @@ +code { IF { UNIT ; FAILWITH } { PUSH int 1 } } ; +input { Stack_elt bool False } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/if_01.tc.tzt b/tzt_reference_test_suite/if_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..904b972026d153e049241578e2a184602b99c929 --- /dev/null +++ b/tzt_reference_test_suite/if_01.tc.tzt @@ -0,0 +1,3 @@ +code { IF { PUSH nat 1 } { PUSH int 1 } } ; +input { Stack_elt bool True } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/if_01.tzt b/tzt_reference_test_suite/if_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0be22f2c26a8e6e3cf74f7e482647b602618fc73 --- /dev/null +++ b/tzt_reference_test_suite/if_01.tzt @@ -0,0 +1,3 @@ +code { IF { PUSH int 1 } { UNIT ; FAILWITH } } ; +input { Stack_elt bool True } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/ifcons_00.tc.tzt b/tzt_reference_test_suite/ifcons_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b32db3029a114fa4c8765875bac98a2660d43cfc --- /dev/null +++ b/tzt_reference_test_suite/ifcons_00.tc.tzt @@ -0,0 +1,3 @@ +code { IF_CONS { UNIT ; FAILWITH } { PUSH int 1 }} ; +input { Stack_elt string "a" } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/ifcons_listint_00.tzt b/tzt_reference_test_suite/ifcons_listint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c615ebb58c5f6c80e9bcef07a9afcf42336d1e1f --- /dev/null +++ b/tzt_reference_test_suite/ifcons_listint_00.tzt @@ -0,0 +1,3 @@ +code { IF_CONS { UNIT ; FAILWITH } { PUSH int 1 }} ; +input { Stack_elt (list int) { } } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/ifcons_listint_01.tzt b/tzt_reference_test_suite/ifcons_listint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4e859777351ef8964a17a31cb2815193e55ec03e --- /dev/null +++ b/tzt_reference_test_suite/ifcons_listint_01.tzt @@ -0,0 +1,3 @@ +code { IF_CONS { PUSH int 1 ; ADD } { UNIT ; FAILWITH } } ; +input { Stack_elt (list int) { 2 ; 3 ; 4 } } ; +output { Stack_elt int 3 ; Stack_elt (list int) { 3 ; 4 } } diff --git a/tzt_reference_test_suite/ifcons_listnat_00.tzt b/tzt_reference_test_suite/ifcons_listnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2f80fc6db3c6e213b8d76ba6de9e6273eddcde01 --- /dev/null +++ b/tzt_reference_test_suite/ifcons_listnat_00.tzt @@ -0,0 +1,3 @@ +code { IF_CONS { DIP{DROP} } { UNIT ; FAILWITH }} ; +input { Stack_elt (list int) { 1 ; 2 ; 3 ; 4 } } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/ifcons_listnat_01.tzt b/tzt_reference_test_suite/ifcons_listnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..199b647ebf3e41758551f75cb59ac507e3c8b111 --- /dev/null +++ b/tzt_reference_test_suite/ifcons_listnat_01.tzt @@ -0,0 +1,3 @@ +code { IF_CONS { DIP{DROP} } { UNIT ; FAILWITH }} ; +input { Stack_elt (list int) { 4 } } ; +output { Stack_elt int 4 } diff --git a/tzt_reference_test_suite/ifleft_00.tc.tzt b/tzt_reference_test_suite/ifleft_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0362bf92f3234d05be3e2b6c2736b7eb58282758 --- /dev/null +++ b/tzt_reference_test_suite/ifleft_00.tc.tzt @@ -0,0 +1,3 @@ +code { IF_LEFT { PUSH int 1 ; ADD } { UNIT ; FAILWITH } } ; +input { Stack_elt (pair int string) (Pair 1 "a") } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/ifleft_orintstring_00.tzt b/tzt_reference_test_suite/ifleft_orintstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..74aa6eb62a63f9f9ab42811ee17d3f99ef891dd4 --- /dev/null +++ b/tzt_reference_test_suite/ifleft_orintstring_00.tzt @@ -0,0 +1,3 @@ +code { IF_LEFT { PUSH int 1 ; ADD } { UNIT ; FAILWITH } } ; +input { Stack_elt (or int string) (Left 1) } ; +output { Stack_elt int 2 } diff --git a/tzt_reference_test_suite/ifleft_orstringint_00.tzt b/tzt_reference_test_suite/ifleft_orstringint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7285175a194fad73002ad6b186af2dc7c5c8e0f6 --- /dev/null +++ b/tzt_reference_test_suite/ifleft_orstringint_00.tzt @@ -0,0 +1,3 @@ +code { IF_LEFT { UNIT ; FAILWITH } { PUSH int 1 ; ADD } } ; +input { Stack_elt (or string int) (Right 2) } ; +output { Stack_elt int 3 } diff --git a/tzt_reference_test_suite/ifnone_00.tc.tzt b/tzt_reference_test_suite/ifnone_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..047e279f7767d24ad6832853e1302102b79cde04 --- /dev/null +++ b/tzt_reference_test_suite/ifnone_00.tc.tzt @@ -0,0 +1,3 @@ +code { IF_NONE { UNIT ; FAILWITH } { PUSH int 1 ; ADD } } ; +input { Stack_elt int 1 } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/ifnone_optionint_00.tzt b/tzt_reference_test_suite/ifnone_optionint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6dc04b0af2f688c08d95300348b777217bc0598e --- /dev/null +++ b/tzt_reference_test_suite/ifnone_optionint_00.tzt @@ -0,0 +1,3 @@ +code { IF_NONE { UNIT ; FAILWITH } { PUSH int 1 ; ADD } } ; +input { Stack_elt (option int) (Some 1) } ; +output { Stack_elt int 2 } diff --git a/tzt_reference_test_suite/ifnone_optionnat_00.tzt b/tzt_reference_test_suite/ifnone_optionnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a012c459203040845f74d9e7e931583ed4b6bac0 --- /dev/null +++ b/tzt_reference_test_suite/ifnone_optionnat_00.tzt @@ -0,0 +1,3 @@ +code { IF_NONE { PUSH nat 1 } { UNIT ; FAILWITH } } ; +input { Stack_elt (option nat) None } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/implicitaccount_00.tzt b/tzt_reference_test_suite/implicitaccount_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d779862a3c58aa9574a9a0b4a8d6677d43dd02ac --- /dev/null +++ b/tzt_reference_test_suite/implicitaccount_00.tzt @@ -0,0 +1,3 @@ +code { IMPLICIT_ACCOUNT } ; +input { Stack_elt key_hash "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z" } ; +output { Stack_elt (contract unit) "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z" } diff --git a/tzt_reference_test_suite/int_00.tc.tzt b/tzt_reference_test_suite/int_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c533d274e2bd4d7b76200ee93c42fb7c9f1925e4 --- /dev/null +++ b/tzt_reference_test_suite/int_00.tc.tzt @@ -0,0 +1,3 @@ +code { INT } ; +input { Stack_elt string "4" } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/int_nat_00.tzt b/tzt_reference_test_suite/int_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..99613b3d56d7aaae6fbb4715ea5d7837aeceb752 --- /dev/null +++ b/tzt_reference_test_suite/int_nat_00.tzt @@ -0,0 +1,3 @@ +code { INT } ; +input { Stack_elt nat 4 } ; +output { Stack_elt int 4 } diff --git a/tzt_reference_test_suite/int_nat_01.tzt b/tzt_reference_test_suite/int_nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..522781098d0feab48b06380e61111343ad4f14ba --- /dev/null +++ b/tzt_reference_test_suite/int_nat_01.tzt @@ -0,0 +1,3 @@ +code { INT } ; +input { Stack_elt nat 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/isnat_00.tzt b/tzt_reference_test_suite/isnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0f745561ac6b040ff2a66b39a39294484f7932be --- /dev/null +++ b/tzt_reference_test_suite/isnat_00.tzt @@ -0,0 +1,3 @@ +code { ISNAT } ; +input { Stack_elt int -1 } ; +output { Stack_elt (option nat) None } diff --git a/tzt_reference_test_suite/isnat_01.tzt b/tzt_reference_test_suite/isnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bbd64a7c7172e77c5fb0e025ea6a721953bcb588 --- /dev/null +++ b/tzt_reference_test_suite/isnat_01.tzt @@ -0,0 +1,3 @@ +code { ISNAT } ; +input { Stack_elt int 0 } ; +output { Stack_elt (option nat) (Some 0) } diff --git a/tzt_reference_test_suite/iter_00.tc.tzt b/tzt_reference_test_suite/iter_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..124dafb9cf858810fffe5fea3ebbce36f8470582 --- /dev/null +++ b/tzt_reference_test_suite/iter_00.tc.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt string "abc" } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/iter_listint_00.tzt b/tzt_reference_test_suite/iter_listint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1ac860bdf485de7213141da2268343cd06bcd8e3 --- /dev/null +++ b/tzt_reference_test_suite/iter_listint_00.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt (list int) { 7 ; 11 ; 45 } ; Stack_elt int 1 } ; +output { Stack_elt int 64 } diff --git a/tzt_reference_test_suite/iter_listint_01.tzt b/tzt_reference_test_suite/iter_listint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..72e5502d9ab2ef6930e118acac5780c2592d7dd2 --- /dev/null +++ b/tzt_reference_test_suite/iter_listint_01.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt (list int) { 7 } ; Stack_elt int 1 } ; +output { Stack_elt int 8 } diff --git a/tzt_reference_test_suite/iter_listint_02.tzt b/tzt_reference_test_suite/iter_listint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0b156d2f5110651564b95398c8e82849b796e86f --- /dev/null +++ b/tzt_reference_test_suite/iter_listint_02.tzt @@ -0,0 +1,3 @@ +code { ITER { MUL } } ; +input { Stack_elt (list int) { 10 ; 2 ; 1 } ; Stack_elt int 1 } ; +output { Stack_elt int 20 } diff --git a/tzt_reference_test_suite/iter_listint_03.tzt b/tzt_reference_test_suite/iter_listint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2e86847be1cfb4300f09d2b0a93d898e4042eec4 --- /dev/null +++ b/tzt_reference_test_suite/iter_listint_03.tzt @@ -0,0 +1,3 @@ +code { ITER { MUL } } ; +input { Stack_elt (list int) { 3 ; 6 ; 9 } ; Stack_elt int 1 } ; +output { Stack_elt int 162 } diff --git a/tzt_reference_test_suite/iter_liststring_00.tzt b/tzt_reference_test_suite/iter_liststring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..56118258be3b816b53374b45fc05269b89828e2f --- /dev/null +++ b/tzt_reference_test_suite/iter_liststring_00.tzt @@ -0,0 +1,3 @@ +code { ITER { CONS } } ; +input { Stack_elt (list string) { "A" ; "B" ; "C" } ; Stack_elt (list string) { } } ; +output { Stack_elt (list string) { "C" ; "B" ; "A" } } diff --git a/tzt_reference_test_suite/iter_liststring_01.tzt b/tzt_reference_test_suite/iter_liststring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..29d692f5e97b9968d168633bec6597a5cf34cdee --- /dev/null +++ b/tzt_reference_test_suite/iter_liststring_01.tzt @@ -0,0 +1,3 @@ +code { ITER { CONS } } ; +input { Stack_elt (list string) { } ; Stack_elt (list string) { } } ; +output { Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/iter_mapintint_00.tzt b/tzt_reference_test_suite/iter_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0f1026f7e07b3e483d53d12ac632bdbe24a4f477 --- /dev/null +++ b/tzt_reference_test_suite/iter_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { ITER { CDR ; SWAP ; SUB } } ; +input { Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } ; Stack_elt int 1000 } ; +output { Stack_elt int 995 } diff --git a/tzt_reference_test_suite/iter_mapintint_01.tzt b/tzt_reference_test_suite/iter_mapintint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7568b37be4f94f46e4f26c826956f41a2828b4e7 --- /dev/null +++ b/tzt_reference_test_suite/iter_mapintint_01.tzt @@ -0,0 +1,3 @@ +code { ITER { CDR ; CONS } } ; +input { Stack_elt (map int int) { Elt 5 2 } ; Stack_elt (list int) { } } ; +output { Stack_elt (list int) { 2 } } diff --git a/tzt_reference_test_suite/iter_mapintint_02.tzt b/tzt_reference_test_suite/iter_mapintint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7bd10dbffdfb695a11511ad485b14c5adb7f7c4a --- /dev/null +++ b/tzt_reference_test_suite/iter_mapintint_02.tzt @@ -0,0 +1,3 @@ +code { ITER { FAILWITH } } ; +input { Stack_elt (map int int) { } } ; +output { } diff --git a/tzt_reference_test_suite/iter_mapintint_03.tzt b/tzt_reference_test_suite/iter_mapintint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2d060fb5597bedbf9f708f6c70ac0e5e1f5f2850 --- /dev/null +++ b/tzt_reference_test_suite/iter_mapintint_03.tzt @@ -0,0 +1,3 @@ +code { ITER { DIP{ UNPAIR } ; UNPAIR ; DIG 2 ; ADD ; DIP { ADD } ; PAIR } } ; +input { Stack_elt (map int int) { Elt 0 100 ; Elt 2 100 } ; Stack_elt (pair int int) (Pair 0 0) } ; +output { Stack_elt (pair int int) (Pair 2 200) } diff --git a/tzt_reference_test_suite/iter_mapintint_04.tzt b/tzt_reference_test_suite/iter_mapintint_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f0b89d077405f77ee02cfdb40f9061c7212a88c4 --- /dev/null +++ b/tzt_reference_test_suite/iter_mapintint_04.tzt @@ -0,0 +1,3 @@ +code { ITER { DIP{ UNPAIR } ; UNPAIR ; DIG 2 ; ADD ; DIP { ADD } ; PAIR } } ; +input { Stack_elt (map int int) { Elt 1 1 ; Elt 2 100 } ; Stack_elt (pair int int) (Pair 0 0) } ; +output { Stack_elt (pair int int) (Pair 3 101) } diff --git a/tzt_reference_test_suite/iter_mapstringstring_00.tzt b/tzt_reference_test_suite/iter_mapstringstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d9d1f377c1b3f29667db0a0413cb9c26aa758bc1 --- /dev/null +++ b/tzt_reference_test_suite/iter_mapstringstring_00.tzt @@ -0,0 +1,3 @@ +code { ITER { DUP ; DIP { CDR } ; CAR ; CONCAT ; SWAP ; CONCAT } } ; +input { Stack_elt (map string string) { Elt "Hel" "lo" ; Elt "Wor" "ld" } ; Stack_elt string "" } ; +output { Stack_elt string "HelloWorld" } diff --git a/tzt_reference_test_suite/iter_setint_00.tzt b/tzt_reference_test_suite/iter_setint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dd91f79f4a074692891cac905c1d72d122f9f3b6 --- /dev/null +++ b/tzt_reference_test_suite/iter_setint_00.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt (set int) { } ; Stack_elt int 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/iter_setint_01.tzt b/tzt_reference_test_suite/iter_setint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3d8026ddf0d9231f3269cf894c5acf995f6ee0c0 --- /dev/null +++ b/tzt_reference_test_suite/iter_setint_01.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt (set int) { 1 } ; Stack_elt int 0 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/iter_setint_02.tzt b/tzt_reference_test_suite/iter_setint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..70dd772b55bda1d6ed91d0174c7cf6409e194431 --- /dev/null +++ b/tzt_reference_test_suite/iter_setint_02.tzt @@ -0,0 +1,3 @@ +code { ITER { ADD } } ; +input { Stack_elt (set int) { -100 ; 1 ; 2 ; 3 } ; Stack_elt int 0 } ; +output { Stack_elt int -94 } diff --git a/tzt_reference_test_suite/iter_setstring_00.tzt b/tzt_reference_test_suite/iter_setstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2432a43baf6cc63d8d5625275441c339ad6020ae --- /dev/null +++ b/tzt_reference_test_suite/iter_setstring_00.tzt @@ -0,0 +1,3 @@ +code { ITER { SWAP ; CONCAT } } ; +input { Stack_elt (set string) { "a" ; "b" ; "c" ; "d" } ; Stack_elt string "" } ; +output { Stack_elt string "abcd" } diff --git a/tzt_reference_test_suite/iter_setstring_01.tzt b/tzt_reference_test_suite/iter_setstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b3780c4bc6927e423e48be4c958b37f1b175e3fd --- /dev/null +++ b/tzt_reference_test_suite/iter_setstring_01.tzt @@ -0,0 +1,3 @@ +code { ITER { SWAP ; CONCAT } } ; +input { Stack_elt (set string) { "c" } ; Stack_elt string "" } ; +output { Stack_elt string "c" } diff --git a/tzt_reference_test_suite/iter_setstring_02.tzt b/tzt_reference_test_suite/iter_setstring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a5743cf12718b68f05f059914a5bdecfd577c723 --- /dev/null +++ b/tzt_reference_test_suite/iter_setstring_02.tzt @@ -0,0 +1,3 @@ +code { ITER { SWAP ; CONCAT } } ; +input { Stack_elt (set string) { } ; Stack_elt string "" } ; +output { Stack_elt string "" } diff --git a/tzt_reference_test_suite/le_00.tzt b/tzt_reference_test_suite/le_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b0d05ebfdbc62f689f7cab2249272996ec09ce7a --- /dev/null +++ b/tzt_reference_test_suite/le_00.tzt @@ -0,0 +1,3 @@ +code { LE } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/le_01.tzt b/tzt_reference_test_suite/le_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..99fc0cd2dbe2caccd8bc324396290cae6055bb82 --- /dev/null +++ b/tzt_reference_test_suite/le_01.tzt @@ -0,0 +1,3 @@ +code { LE } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/le_02.tzt b/tzt_reference_test_suite/le_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d17a642ce6e18df842c403f9a1a768ce12db307f --- /dev/null +++ b/tzt_reference_test_suite/le_02.tzt @@ -0,0 +1,3 @@ +code { LE } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/le_03.tzt b/tzt_reference_test_suite/le_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7b2039629daa659c8a427a7daaf3e089c9f21f5a --- /dev/null +++ b/tzt_reference_test_suite/le_03.tzt @@ -0,0 +1,3 @@ +code { LE } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/le_04.tzt b/tzt_reference_test_suite/le_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..610401fa404436ab60610c83a7c9d51567aa9b95 --- /dev/null +++ b/tzt_reference_test_suite/le_04.tzt @@ -0,0 +1,3 @@ +code { LE } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/left_int-nat_00.tzt b/tzt_reference_test_suite/left_int-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e1d6696b6080d6f48b5ae3a4061ebd93aeffa6d1 --- /dev/null +++ b/tzt_reference_test_suite/left_int-nat_00.tzt @@ -0,0 +1,3 @@ +code { LEFT nat } ; +input { Stack_elt int 5 } ; +output { Stack_elt (or int nat) (Left 5) } diff --git a/tzt_reference_test_suite/loop_00.tc.tzt b/tzt_reference_test_suite/loop_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dd2875ca8f430a333c6eae7b2a502e849e92772a --- /dev/null +++ b/tzt_reference_test_suite/loop_00.tc.tzt @@ -0,0 +1,3 @@ +code { LOOP { PUSH bool False } } ; +input { Stack_elt nat 1 } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/loop_00.tzt b/tzt_reference_test_suite/loop_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5403693efde4b6e5c9ea48f5032127c1474e1abd --- /dev/null +++ b/tzt_reference_test_suite/loop_00.tzt @@ -0,0 +1,3 @@ +code { LOOP { PUSH int 2 ; ADD ; DUP ; DIP { PUSH int 10 } ; COMPARE ; LE } } ; +input { Stack_elt bool True ; Stack_elt int 1 } ; +output { Stack_elt int 11 } diff --git a/tzt_reference_test_suite/loop_01.tc.tzt b/tzt_reference_test_suite/loop_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ed1881ea06b3c5878a34ac2333d2ad938de3acc4 --- /dev/null +++ b/tzt_reference_test_suite/loop_01.tc.tzt @@ -0,0 +1,3 @@ +code { PUSH bool False; LOOP { } } ; +input { } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/loop_01.tzt b/tzt_reference_test_suite/loop_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5207abb17614e58e95ea353f7d450a59adc7961a --- /dev/null +++ b/tzt_reference_test_suite/loop_01.tzt @@ -0,0 +1,3 @@ +code { LOOP { IF_CONS { SWAP ; DIP { CONS } ; PUSH bool True } { NIL string ; PUSH bool False } } } ; +input { Stack_elt bool True ; Stack_elt (list string) { "a" ; "b" ; "c" } ; Stack_elt (list string) {} } ; +output { Stack_elt (list string) { } ; Stack_elt (list string) { "c" ; "b" ; "a" } } diff --git a/tzt_reference_test_suite/loop_02.tzt b/tzt_reference_test_suite/loop_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bfb00b11135bcb11241bec76f0fc833a529a27c2 --- /dev/null +++ b/tzt_reference_test_suite/loop_02.tzt @@ -0,0 +1,3 @@ +code { LOOP { IF_CONS { SWAP ; DIP { CONS } ; PUSH bool True } { NIL string ; PUSH bool False } } } ; +input { Stack_elt bool True ; Stack_elt (list string) { } ; Stack_elt (list string) {} } ; +output { Stack_elt (list string) { } ; Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/loopleft_00.tzt b/tzt_reference_test_suite/loopleft_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cf363f328edbbb4dc4832142110b8bc48e366888 --- /dev/null +++ b/tzt_reference_test_suite/loopleft_00.tzt @@ -0,0 +1,3 @@ +code { LOOP_LEFT { PUSH int 2 ; ADD ; DUP ; DIP { PUSH int 10 } ; COMPARE ; GE ; IF { DROP ; PUSH string "hello" ; RIGHT int } { LEFT string } } } ; +input { Stack_elt (or int string) (Left 1) } ; +output { Stack_elt string "hello" } diff --git a/tzt_reference_test_suite/loopleft_01.tzt b/tzt_reference_test_suite/loopleft_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..647cff9d4b01e2382955f24a655e98ec7abb0fe9 --- /dev/null +++ b/tzt_reference_test_suite/loopleft_01.tzt @@ -0,0 +1,3 @@ +code { LOOP_LEFT { FAILWITH } } ; +input { Stack_elt (or int string) (Right "AAAA") } ; +output { Stack_elt string "AAAA" } diff --git a/tzt_reference_test_suite/loopleft_02.tzt b/tzt_reference_test_suite/loopleft_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2b7c1682e3b7553748b180ea68192f0801bd314c --- /dev/null +++ b/tzt_reference_test_suite/loopleft_02.tzt @@ -0,0 +1,5 @@ +code { LOOP_LEFT { DUP; CAR; DIP{CDR}; + IF_CONS { SWAP; DIP{CONS}; PAIR; LEFT (list string) } + { RIGHT (pair (list string) (list string)) } } } ; +input { Stack_elt (or (pair (list string) (list string)) (list string)) (Left (Pair {"a" ; "b" ; "c" ; "d" } { } )) } ; +output { Stack_elt (list string) { "d" ; "c" ; "b" ; "a" } } diff --git a/tzt_reference_test_suite/loopleft_03.tzt b/tzt_reference_test_suite/loopleft_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2ea3fca7d20a41f48662c44e14d3226045759de4 --- /dev/null +++ b/tzt_reference_test_suite/loopleft_03.tzt @@ -0,0 +1,5 @@ +code { LOOP_LEFT { DUP; CAR; DIP{CDR}; + IF_CONS { SWAP; DIP{CONS}; PAIR; LEFT (list string) } + { RIGHT (pair (list string) (list string)) } } } ; +input { Stack_elt (or (pair (list string) (list string)) (list string)) (Right { "d" ; "c" ; "b" ; "a" } ) } ; +output { Stack_elt (list string) { "d" ; "c" ; "b" ; "a" } } diff --git a/tzt_reference_test_suite/loopleft_04.tzt b/tzt_reference_test_suite/loopleft_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8deebf3f965349c5c14b8e5020be712586579b6b --- /dev/null +++ b/tzt_reference_test_suite/loopleft_04.tzt @@ -0,0 +1,5 @@ +code { LOOP_LEFT { DUP; CAR; DIP{CDR}; + IF_CONS { SWAP; DIP{CONS}; PAIR; LEFT (list string) } + { RIGHT (pair (list string) (list string)) } } } ; +input { Stack_elt (or (pair (list string) (list string)) (list string)) (Left (Pair { } { })) } ; +output { Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/lsl_00.tzt b/tzt_reference_test_suite/lsl_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6f8579597d1ce5ba4553e9938f42ff859ace178a --- /dev/null +++ b/tzt_reference_test_suite/lsl_00.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 1 ; Stack_elt nat 3 } ; +output { Stack_elt nat 8 } diff --git a/tzt_reference_test_suite/lsl_01.tzt b/tzt_reference_test_suite/lsl_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..16aece098fec9daba5708b09122ada8e118f3d2b --- /dev/null +++ b/tzt_reference_test_suite/lsl_01.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 1 ; Stack_elt nat 257 } ; +output (GeneralOverflow 1 257) diff --git a/tzt_reference_test_suite/lsl_02.tzt b/tzt_reference_test_suite/lsl_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a4497f1f185566a30983c6c14994ff2bd800ebfe --- /dev/null +++ b/tzt_reference_test_suite/lsl_02.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 8 ; Stack_elt nat 1 } ; +output { Stack_elt nat 16 } diff --git a/tzt_reference_test_suite/lsl_03.tzt b/tzt_reference_test_suite/lsl_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9bfd3c7e98e938daea717fd42c85520fb4310e19 --- /dev/null +++ b/tzt_reference_test_suite/lsl_03.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 0 ; Stack_elt nat 0 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/lsl_04.tzt b/tzt_reference_test_suite/lsl_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d839be8e1f8682c6b50cf9e84424322ba3dd1e07 --- /dev/null +++ b/tzt_reference_test_suite/lsl_04.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 0 ; Stack_elt nat 1 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/lsl_05.tzt b/tzt_reference_test_suite/lsl_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..59ce12e4b166bd6cc36c8a93afcb3f26241229ce --- /dev/null +++ b/tzt_reference_test_suite/lsl_05.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 1 ; Stack_elt nat 2 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/lsl_06.tzt b/tzt_reference_test_suite/lsl_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dafa0b89974c97be5038af48889dbb83a079a74d --- /dev/null +++ b/tzt_reference_test_suite/lsl_06.tzt @@ -0,0 +1,3 @@ +code { LSL } ; +input { Stack_elt nat 15 ; Stack_elt nat 2 } ; +output { Stack_elt nat 60 } diff --git a/tzt_reference_test_suite/lsr_00.tzt b/tzt_reference_test_suite/lsr_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..321844ac37cbf283c17368b8391a64953d75d56a --- /dev/null +++ b/tzt_reference_test_suite/lsr_00.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 32 ; Stack_elt nat 3 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/lsr_01.tzt b/tzt_reference_test_suite/lsr_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..46e70c10674591779d34094f80323296fd68a531 --- /dev/null +++ b/tzt_reference_test_suite/lsr_01.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 32 ; Stack_elt nat 300 } ; +output (GeneralOverflow 32 300) diff --git a/tzt_reference_test_suite/lsr_02.tzt b/tzt_reference_test_suite/lsr_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5877b6e3f70be25d3163b5a599bde6df529e42d1 --- /dev/null +++ b/tzt_reference_test_suite/lsr_02.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 8 ; Stack_elt nat 1 } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/lsr_03.tzt b/tzt_reference_test_suite/lsr_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a3df804cdb215665ba977e58d7983cf6b95b0ec8 --- /dev/null +++ b/tzt_reference_test_suite/lsr_03.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 0 ; Stack_elt nat 0 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/lsr_04.tzt b/tzt_reference_test_suite/lsr_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..43abaa79f2fac5525ee387c0392d21dab91290ff --- /dev/null +++ b/tzt_reference_test_suite/lsr_04.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 1 ; Stack_elt nat 2 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/lsr_05.tzt b/tzt_reference_test_suite/lsr_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3ac22e7a83291e0bf80f4af1fd17e5c0fbd64b87 --- /dev/null +++ b/tzt_reference_test_suite/lsr_05.tzt @@ -0,0 +1,3 @@ +code { LSR } ; +input { Stack_elt nat 15 ; Stack_elt nat 2 } ; +output { Stack_elt nat 3 } diff --git a/tzt_reference_test_suite/lt_00.tzt b/tzt_reference_test_suite/lt_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..361a6fe42c6527f7dc4742c52468bdcc5da75b34 --- /dev/null +++ b/tzt_reference_test_suite/lt_00.tzt @@ -0,0 +1,3 @@ +code { LT } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/lt_01.tzt b/tzt_reference_test_suite/lt_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..af698d70f0e30b056ad202e1fbab4b9c34ed82a8 --- /dev/null +++ b/tzt_reference_test_suite/lt_01.tzt @@ -0,0 +1,3 @@ +code { LT } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/lt_02.tzt b/tzt_reference_test_suite/lt_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f33d449f32d610255cc0d55917e5a50c6ff2650b --- /dev/null +++ b/tzt_reference_test_suite/lt_02.tzt @@ -0,0 +1,3 @@ +code { LT } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/lt_03.tzt b/tzt_reference_test_suite/lt_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..32c42f8a60ed72039041f9f695e0df836131938b --- /dev/null +++ b/tzt_reference_test_suite/lt_03.tzt @@ -0,0 +1,3 @@ +code { LT } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/lt_04.tzt b/tzt_reference_test_suite/lt_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a4f838e237db36ae60c544b2ca54b76349c8be26 --- /dev/null +++ b/tzt_reference_test_suite/lt_04.tzt @@ -0,0 +1,3 @@ +code { LT } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/macro_pack/README.md b/tzt_reference_test_suite/macro_pack/README.md new file mode 100644 index 0000000000000000000000000000000000000000..0cc14749009e255e34174b38ae0bafa898753181 --- /dev/null +++ b/tzt_reference_test_suite/macro_pack/README.md @@ -0,0 +1,20 @@ +# Tests on macro + +All tests on macro verify solely how macro expand, the exact expansion is +checked via packing a lambda and comparing it against the right bytes. + +Note that macro expansion may produce additional levels of nesting. For +instance, `ASSERT` macro expands to + +``` +{ { IF {} { { UNIT ; FAILWITH } } } } +``` + +and preserving this in its exact form is important as it affects behaviour of +`PACK` and `UNPACK` instructions. + +You can check the exact expansion via the following command + +```sh +octez-client expand macros in "$MACRO" +``` diff --git a/tzt_reference_test_suite/macro_pack/assert_00.tzt b/tzt_reference_test_suite/macro_pack/assert_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..599cb59611b16613a8fcef1d5595b04b751aba03 --- /dev/null +++ b/tzt_reference_test_suite/macro_pack/assert_00.tzt @@ -0,0 +1,4 @@ +code { PACK } ; +input { Stack_elt (lambda bool unit) { ASSERT; UNIT } } ; +output { Stack_elt bytes 0x05020000001c0200000015072c020000000002000000090200000004034f0327034f } ; +# How macro expanded before packing can be checked with `octez-client expand macros` diff --git a/tzt_reference_test_suite/map_listint_00.tzt b/tzt_reference_test_suite/map_listint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..db57cc85567c8b68fa56e57e950e163568975084 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_00.tzt @@ -0,0 +1,3 @@ +code { MAP { DUP ; ADD } } ; +input { Stack_elt (list int) { 7 ; 11 ; 45 } } ; +output { Stack_elt (list int) { 14 ; 22 ; 90 } } diff --git a/tzt_reference_test_suite/map_listint_01.tzt b/tzt_reference_test_suite/map_listint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7ef0c2cd3a08c9aab7cee9c86b35a769e04a7ff3 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_01.tzt @@ -0,0 +1,3 @@ +code { MAP { ADD ; DUP } } ; +input { Stack_elt (list int) { 7 ; 11 ; 45 } ; Stack_elt int 1 } ; +output { Stack_elt (list int) { 8 ; 19 ; 64 } ; Stack_elt int 64 } diff --git a/tzt_reference_test_suite/map_listint_02.tzt b/tzt_reference_test_suite/map_listint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8633b2bbe97d27bd1e8f13ad4b1d90e5c4b060e9 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_02.tzt @@ -0,0 +1,3 @@ +code { MAP { DUP ; MUL } } ; +input { Stack_elt (list int) { 3 } } ; +output { Stack_elt (list int) { 9 } } diff --git a/tzt_reference_test_suite/map_listint_03.tzt b/tzt_reference_test_suite/map_listint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b752e8ff63ad55ef8ece20427bdaf5d0f4bb1b6b --- /dev/null +++ b/tzt_reference_test_suite/map_listint_03.tzt @@ -0,0 +1,3 @@ +code { MAP { DROP ; PUSH string "" } } ; +input { Stack_elt (list int) { 1 ; 2 ; 3 ; 4 } } ; +output { Stack_elt (list string) { "" ; "" ; "" ; "" } } diff --git a/tzt_reference_test_suite/map_listint_04.tzt b/tzt_reference_test_suite/map_listint_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3e912ef567c0ed1876223f34ef25ee42dff1ec69 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_04.tzt @@ -0,0 +1,3 @@ +code { MAP { DIP { DUP } ; ADD ; DIP { PUSH int 1 ; ADD } } } ; +input { Stack_elt (list int) { 1 ; 1 ; 1 ; 1 } ; Stack_elt int 0 } ; +output { Stack_elt (list int) { 1 ; 2 ; 3 ; 4 } ; Stack_elt int 4 } diff --git a/tzt_reference_test_suite/map_listint_05.tzt b/tzt_reference_test_suite/map_listint_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c81008d1bd21ef2de40e46df38847872bd62e643 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_05.tzt @@ -0,0 +1,3 @@ +code { MAP { DIP { DUP } ; ADD ; DIP { PUSH int 1 ; ADD } } } ; +input { Stack_elt (list int) { 1 ; 2 ; 3 ; 0 } ; Stack_elt int 0 } ; +output { Stack_elt (list int) { 1 ; 3 ; 5 ; 3 } ; Stack_elt int 4 } diff --git a/tzt_reference_test_suite/map_listint_06.tzt b/tzt_reference_test_suite/map_listint_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2eaa0bb1f425395019d6240b906c8b4b60e3b711 --- /dev/null +++ b/tzt_reference_test_suite/map_listint_06.tzt @@ -0,0 +1,3 @@ +code { MAP { DIP { DUP } ; ADD ; DIP { PUSH int 1 ; ADD } } } ; +input { Stack_elt (list int) { } ; Stack_elt int 0 } ; +output { Stack_elt (list int) { } ; Stack_elt int 0 } diff --git a/tzt_reference_test_suite/map_liststring_00.tzt b/tzt_reference_test_suite/map_liststring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f5cfb72478558e53ff3b1a9575a6c575c79e1727 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_00.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH nat 1 ; PUSH nat 0 ; SLICE ; IF_NONE { UNIT ; FAILWITH } { } } } ; +input { Stack_elt (list string) { "The" ; "Password" ; "Is" } } ; +output { Stack_elt (list string) { "T" ; "P" ; "I" } } diff --git a/tzt_reference_test_suite/map_liststring_01.tzt b/tzt_reference_test_suite/map_liststring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ccc1a93190cc35c583b1ac21149e553ccf5e5587 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_01.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH nat 1 ; PUSH nat 0 ; SLICE ; IF_NONE { UNIT ; FAILWITH } { } } } ; +input { Stack_elt (list string) { "The" } } ; +output { Stack_elt (list string) { "T" } } diff --git a/tzt_reference_test_suite/map_liststring_02.tzt b/tzt_reference_test_suite/map_liststring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..afeaa2eb36988b4bfe9465b59040d664df5bbb7b --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_02.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH bool True ; IF { FAILWITH } { } } } ; +input { Stack_elt (list string) { } } ; +output { Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/map_liststring_04.tzt b/tzt_reference_test_suite/map_liststring_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dd8a7e68c7b74b77128a29563d9b212daec6dec6 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_04.tzt @@ -0,0 +1,3 @@ +code { MAP { } } ; +input { Stack_elt (list string) { "1" ; "2" ; "3" } } ; +output { Stack_elt (list string) { "1" ; "2" ; "3" } } diff --git a/tzt_reference_test_suite/map_liststring_05.tzt b/tzt_reference_test_suite/map_liststring_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ebe8bc1b78a7c930585364980dad2369a5d8ab2f --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_05.tzt @@ -0,0 +1,3 @@ +code { MAP { } } ; +input { Stack_elt (list string) { } } ; +output { Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/map_liststring_06.tzt b/tzt_reference_test_suite/map_liststring_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0f4865cdc2cd5683038d8430ec06c67d4a110912 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_06.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH string "Hello " ; CONCAT } } ; +input { Stack_elt (list string) { "World!" } } ; +output { Stack_elt (list string) { "Hello World!" } } diff --git a/tzt_reference_test_suite/map_liststring_07.tzt b/tzt_reference_test_suite/map_liststring_07.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0e6f6ae0385d7c0c0eabea9b10e2964d61668fd5 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_07.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH string "Hello " ; CONCAT } } ; +input { Stack_elt (list string) { "test1" ; "test2" } } ; +output { Stack_elt (list string) { "Hello test1" ; "Hello test2" } } diff --git a/tzt_reference_test_suite/map_liststring_08.tzt b/tzt_reference_test_suite/map_liststring_08.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d59518474a0670518b3c25e932188773b14930e6 --- /dev/null +++ b/tzt_reference_test_suite/map_liststring_08.tzt @@ -0,0 +1,3 @@ +code { MAP { PUSH string "Hello " ; CONCAT } } ; +input { Stack_elt (list string) { } } ; +output { Stack_elt (list string) { } } diff --git a/tzt_reference_test_suite/map_mapintint_00.tzt b/tzt_reference_test_suite/map_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..295f0a8993fc48544b4cdb2f2d94887aa9318432 --- /dev/null +++ b/tzt_reference_test_suite/map_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; DUP ; ADD } } ; +input { Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt (map int int) { Elt 1 6 ; Elt 5 4 } } diff --git a/tzt_reference_test_suite/map_mapintint_01.tzt b/tzt_reference_test_suite/map_mapintint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..115b2e51d2fb3ffd92a9436b6492412b11ab8f28 --- /dev/null +++ b/tzt_reference_test_suite/map_mapintint_01.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; ADD ; DUP } } ; +input { Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 ; Elt 12 20 } ; Stack_elt int 0 } ; +output { Stack_elt (map int int) { Elt 1 3 ; Elt 5 5 ; Elt 12 25 } ; Stack_elt int 25 } diff --git a/tzt_reference_test_suite/map_mapintstring_00.tzt b/tzt_reference_test_suite/map_mapintstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..91640260644dee62ffa9aebd3e0b87993691641f --- /dev/null +++ b/tzt_reference_test_suite/map_mapintstring_00.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; DUP ; CONCAT } } ; +input { Stack_elt (map int string) { Elt 1 "AB" ; Elt 5 "CD" } } ; +output { Stack_elt (map int string) { Elt 1 "ABAB" ; Elt 5 "CDCD" } } diff --git a/tzt_reference_test_suite/map_mapintstring_01.tzt b/tzt_reference_test_suite/map_mapintstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..76f4a89545e946847190426e369bfdacc15427f1 --- /dev/null +++ b/tzt_reference_test_suite/map_mapintstring_01.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; SIZE } } ; +input { Stack_elt (map int string) { Elt 1 "AB" } } ; +output { Stack_elt (map int nat) { Elt 1 2 } } diff --git a/tzt_reference_test_suite/map_mapstringnat_00.tzt b/tzt_reference_test_suite/map_mapstringnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dc5e3ecad3232efb3d8adafad3129f2f875b6c5f --- /dev/null +++ b/tzt_reference_test_suite/map_mapstringnat_00.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; DIP {DUP} ; ADD } } ; +input { Stack_elt (map string nat) { Elt "foo" 1 } ; Stack_elt nat 10 } ; +output { Stack_elt (map string nat) { Elt "foo" 11 } ; Stack_elt nat 10 } diff --git a/tzt_reference_test_suite/map_mapstringnat_01.tzt b/tzt_reference_test_suite/map_mapstringnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d58d156f53ae090b4acc99e3a281774add3278f5 --- /dev/null +++ b/tzt_reference_test_suite/map_mapstringnat_01.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; DIP {DUP} ; ADD } } ; +input { Stack_elt (map string nat) { } ; Stack_elt nat 10 } ; +output { Stack_elt (map string nat) { } ; Stack_elt nat 10 } diff --git a/tzt_reference_test_suite/map_mapstringnat_02.tzt b/tzt_reference_test_suite/map_mapstringnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..696e450822adf0b608c1ff2d7d5e1b21a9562f8b --- /dev/null +++ b/tzt_reference_test_suite/map_mapstringnat_02.tzt @@ -0,0 +1,3 @@ +code { MAP { CDR ; DIP {DUP} ; ADD } } ; +input { Stack_elt (map string nat) { Elt "bar" 5 ; Elt "foo" 1 } ; Stack_elt nat 15 } ; +output { Stack_elt (map string nat) { Elt "bar" 20 ; Elt "foo" 16 } ; Stack_elt nat 15 } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_00.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b2863ba3662c452c1db66de2a6527282183c5efa --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_00.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool False } ; +big_maps { Big_map 10 nat nat { Elt 0 1 } } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_01.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..30ec7c6db545c21efee9d233541b01e310ed8baa --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_01.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool False } ; +big_maps { Big_map 10 nat nat { } } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_02.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7927d26154a306ecbc6019f2cbddbefbdb755f7e --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_02.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool True } ; +big_maps { Big_map 10 nat nat { Elt 1 0 } } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_03.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4daa0804750496da9fd5601aad4a4a5147c630e2 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_03.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool True } ; +big_maps { Big_map 10 nat nat { Elt 1 4 ; Elt 2 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_04.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..da85d0cc9f5c9a44578bf7919bc8aa3ce06daf48 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_04.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 2 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool True } ; +big_maps { Big_map 10 nat nat { Elt 1 4 ; Elt 2 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapnatnat_05.tzt b/tzt_reference_test_suite/mem_bigmapnatnat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d1576c03e2839303db29efc07e155d22ad37b96e --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapnatnat_05.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt nat 3 ; Stack_elt (big_map nat nat) 10 } ; +output { Stack_elt bool False } ; +big_maps { Big_map 10 nat nat { Elt 1 4 ; Elt 2 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_00.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e2d763f0a5425ba06185238a6723e2e8bb791aa0 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_00.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool False ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { Elt "foo" 1 } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_01.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..93fd0f531a5c024f68d2549e556394033d85f612 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_01.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool False ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_02.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ae658a97f76409cfe9d87e8f4a01aabb68543b0c --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_02.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "foo" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool True ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { Elt "foo" 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_03.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..034a111b148dd9cf20b2cd9cf0f8c4f786a18faf --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_03.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "foo" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool True ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { Elt "bar" 2 ; Elt "foo" 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_04.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d75872ad7e762866af88b25559f5fe70ae5a1cb1 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_04.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool True ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { Elt "bar" 4 ; Elt "foo" 11 } } diff --git a/tzt_reference_test_suite/mem_bigmapstringnat_05.tzt b/tzt_reference_test_suite/mem_bigmapstringnat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7a4012a24f6f627817b9f49c3c7c741a63c2ed41 --- /dev/null +++ b/tzt_reference_test_suite/mem_bigmapstringnat_05.tzt @@ -0,0 +1,4 @@ +code { MEM } ; +input { Stack_elt string "baz" ; Stack_elt (big_map string nat) 10 ; Stack_elt (big_map string nat) 10 } ; +output { Stack_elt bool False ; Stack_elt (big_map string nat) 10 } ; +big_maps { Big_map 10 string nat { Elt "bar" 4 ; Elt "foo" 11 } } diff --git a/tzt_reference_test_suite/mem_mapintint_00.tzt b/tzt_reference_test_suite/mem_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4ae4ae6c4b1f6e46d4ee5c680482fa6517374306 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt int 1 ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapnatnat_00.tzt b/tzt_reference_test_suite/mem_mapnatnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..09b878d013adfa487714f3cf0ee615db4e98fe00 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_00.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (map nat nat) { Elt 0 1 } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_mapnatnat_01.tzt b/tzt_reference_test_suite/mem_mapnatnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..51aff946971ed77c29baae1f29f89a3dfa6bdc7f --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_01.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (map nat nat) { } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_mapnatnat_02.tzt b/tzt_reference_test_suite/mem_mapnatnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..796354ec5b552aada202441f7d92ac2b39b84bb5 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_02.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (map nat nat) { Elt 1 0 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapnatnat_03.tzt b/tzt_reference_test_suite/mem_mapnatnat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fe03bdc370a6e398e1e51a68692ebe3dd826791c --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_03.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 1 ; Stack_elt (map nat nat) { Elt 1 4 ; Elt 2 11 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapnatnat_04.tzt b/tzt_reference_test_suite/mem_mapnatnat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2b0f9e60260bef5c64ed3c6e6fb975d753ba0ef7 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_04.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 2 ; Stack_elt (map nat nat) { Elt 1 4 ; Elt 2 11 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapnatnat_05.tzt b/tzt_reference_test_suite/mem_mapnatnat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5ea793be85714e4be515c0a9755c45f1ed83c171 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapnatnat_05.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt nat 3 ; Stack_elt (map nat nat) { Elt 1 4 ; Elt 2 11 } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_mapstringnat_00.tzt b/tzt_reference_test_suite/mem_mapstringnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4bb58aff77c2ae1457ab71ece9e404ce5c58c6d5 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_00.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (map string nat) { Elt "foo" 1 } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_mapstringnat_01.tzt b/tzt_reference_test_suite/mem_mapstringnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7eda4f0e6916693d65e51dda0d84b9b179d3ea39 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_01.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (map string nat) { } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_mapstringnat_02.tzt b/tzt_reference_test_suite/mem_mapstringnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3b238d539e09e53ccde861bb4747f71a9a852646 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_02.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "foo" ; Stack_elt (map string nat) { Elt "foo"0 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapstringnat_03.tzt b/tzt_reference_test_suite/mem_mapstringnat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..71e335473319485d47c37d9d50863c0946323d2d --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_03.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "foo" ; Stack_elt (map string nat) { Elt "bar" 4 ; Elt "foo" 11 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapstringnat_04.tzt b/tzt_reference_test_suite/mem_mapstringnat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7aa0e205dd6816dbdf3cd23ac8fc58d41907ba39 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_04.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "bar" ; Stack_elt (map string nat) { Elt "bar" 4 ; Elt "foo" 11 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_mapstringnat_05.tzt b/tzt_reference_test_suite/mem_mapstringnat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..565961d69565a3fc4cec047701657a80baae2315 --- /dev/null +++ b/tzt_reference_test_suite/mem_mapstringnat_05.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "baz" ; Stack_elt (map string nat) { Elt "bar" 4 ; Elt "foo" 11 } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_setint_00.tzt b/tzt_reference_test_suite/mem_setint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1a01293ca60e540862840721bb7346a816a91fbf --- /dev/null +++ b/tzt_reference_test_suite/mem_setint_00.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt int 2 ; Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_setint_01.tzt b/tzt_reference_test_suite/mem_setint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a4db7eb4dbf8d2315ac961ef4e61b14a59849657 --- /dev/null +++ b/tzt_reference_test_suite/mem_setint_01.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt int 5 ; Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_setstring_00.tzt b/tzt_reference_test_suite/mem_setstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..843e0efa3bc0b2ba5056992a976ad8af540afd4f --- /dev/null +++ b/tzt_reference_test_suite/mem_setstring_00.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "Hi" ; Stack_elt (set string) { } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mem_setstring_01.tzt b/tzt_reference_test_suite/mem_setstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..940c629801f8acd7f40aebe89d470acb0ee08c05 --- /dev/null +++ b/tzt_reference_test_suite/mem_setstring_01.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "Hi" ; Stack_elt (set string) { "Hi" } } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/mem_setstring_02.tzt b/tzt_reference_test_suite/mem_setstring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6b09274cc40fb924a17780c5782bbb292b8edac9 --- /dev/null +++ b/tzt_reference_test_suite/mem_setstring_02.tzt @@ -0,0 +1,3 @@ +code { MEM } ; +input { Stack_elt string "" ; Stack_elt (set string) { "Hello" ; "World" } } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/mul_int-int_00.tzt b/tzt_reference_test_suite/mul_int-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cb19a6ed7f857a9a1ba2f6c49b88b2eb683ea70e --- /dev/null +++ b/tzt_reference_test_suite/mul_int-int_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt int 5 ; Stack_elt int -2 } ; +output { Stack_elt int -10 } diff --git a/tzt_reference_test_suite/mul_int-nat_00.tzt b/tzt_reference_test_suite/mul_int-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b85942923f6c6a8e1cff52179ed9f2a77ad771d3 --- /dev/null +++ b/tzt_reference_test_suite/mul_int-nat_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt int 5 ; Stack_elt nat 2 } ; +output { Stack_elt int 10 } diff --git a/tzt_reference_test_suite/mul_mutez-nat_00.tzt b/tzt_reference_test_suite/mul_mutez-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8221c1c01d8f1a6bdfc5c883d4b9b1e683914f51 --- /dev/null +++ b/tzt_reference_test_suite/mul_mutez-nat_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt mutez 5 ; Stack_elt nat 2 } ; +output { Stack_elt mutez 10 } diff --git a/tzt_reference_test_suite/mul_mutez-nat_01.tzt b/tzt_reference_test_suite/mul_mutez-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7e363e2c39e332ab7ccbe15c28ab4a477a148343 --- /dev/null +++ b/tzt_reference_test_suite/mul_mutez-nat_01.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt mutez 10 ; Stack_elt nat 2000000000000000000000000000000000000000000000000000000000000000000000 } ; +output (MutezOverflow 10 2000000000000000000000000000000000000000000000000000000000000000000000) diff --git a/tzt_reference_test_suite/mul_nat-int_00.tzt b/tzt_reference_test_suite/mul_nat-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..049b28199c09e773f95bc608d3247d73e3c4bb6a --- /dev/null +++ b/tzt_reference_test_suite/mul_nat-int_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt nat 5 ; Stack_elt int -2 } ; +output { Stack_elt int -10 } diff --git a/tzt_reference_test_suite/mul_nat-mutez_00.tzt b/tzt_reference_test_suite/mul_nat-mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5448c4aa353b13abbf47a408e95bc51e32593ebe --- /dev/null +++ b/tzt_reference_test_suite/mul_nat-mutez_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt nat 2 ; Stack_elt mutez 5 } ; +output { Stack_elt mutez 10 } diff --git a/tzt_reference_test_suite/mul_nat-mutez_01.tzt b/tzt_reference_test_suite/mul_nat-mutez_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b3359b28e47af6c104da27e45b93065eeb25dbab --- /dev/null +++ b/tzt_reference_test_suite/mul_nat-mutez_01.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt nat 2000000000000000000000000000000000000000000000000000000000000000000000 ; Stack_elt mutez 10 } ; +output (MutezOverflow 2000000000000000000000000000000000000000000000000000000000000000000000 10) diff --git a/tzt_reference_test_suite/mul_nat-nat_00.tzt b/tzt_reference_test_suite/mul_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9c335605bc2b38f55f82256794ab1e3083bc73b2 --- /dev/null +++ b/tzt_reference_test_suite/mul_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { MUL } ; +input { Stack_elt nat 5 ; Stack_elt nat 2 } ; +output { Stack_elt nat 10 } diff --git a/tzt_reference_test_suite/neg_int_00.tzt b/tzt_reference_test_suite/neg_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..66f5677bff77749a6d2c901e3f68424db254145c --- /dev/null +++ b/tzt_reference_test_suite/neg_int_00.tzt @@ -0,0 +1,3 @@ +code { NEG } ; +input { Stack_elt int 5 } ; +output { Stack_elt int -5 } diff --git a/tzt_reference_test_suite/neg_int_01.tzt b/tzt_reference_test_suite/neg_int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5c9fc84894d17810684f5d5cc01a6e70ca6fa366 --- /dev/null +++ b/tzt_reference_test_suite/neg_int_01.tzt @@ -0,0 +1,3 @@ +code { NEG } ; +input { Stack_elt int -5 } ; +output { Stack_elt int 5 } diff --git a/tzt_reference_test_suite/neg_int_02.tzt b/tzt_reference_test_suite/neg_int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..589aa8364b7698cfee55fe94e4f3c57718b8f201 --- /dev/null +++ b/tzt_reference_test_suite/neg_int_02.tzt @@ -0,0 +1,3 @@ +code { NEG } ; +input { Stack_elt int 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/neg_nat_00.tzt b/tzt_reference_test_suite/neg_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5af0a0de04a4f143e6dd77140f2a69d20d1f8fe6 --- /dev/null +++ b/tzt_reference_test_suite/neg_nat_00.tzt @@ -0,0 +1,3 @@ +code { NEG } ; +input { Stack_elt nat 5 } ; +output { Stack_elt int -5 } diff --git a/tzt_reference_test_suite/neg_nat_01.tzt b/tzt_reference_test_suite/neg_nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7ef9d3233aad9dcd2dd2a3fd9e223ddbf3b01c06 --- /dev/null +++ b/tzt_reference_test_suite/neg_nat_01.tzt @@ -0,0 +1,3 @@ +code { NEG } ; +input { Stack_elt nat 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/neq_00.tzt b/tzt_reference_test_suite/neq_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e45fd174b4f91059e75080cd947c429d2f9a013b --- /dev/null +++ b/tzt_reference_test_suite/neq_00.tzt @@ -0,0 +1,3 @@ +code { NEQ } ; +input { Stack_elt int -9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/neq_01.tzt b/tzt_reference_test_suite/neq_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f914834fad02ac5c7af84ca80c9fa6c974d9a015 --- /dev/null +++ b/tzt_reference_test_suite/neq_01.tzt @@ -0,0 +1,3 @@ +code { NEQ } ; +input { Stack_elt int -1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/neq_02.tzt b/tzt_reference_test_suite/neq_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3663b588be2d18186a4870ce0f626c6b540824a2 --- /dev/null +++ b/tzt_reference_test_suite/neq_02.tzt @@ -0,0 +1,3 @@ +code { NEQ } ; +input { Stack_elt int 0 } ; +output { Stack_elt bool False } ; diff --git a/tzt_reference_test_suite/neq_03.tzt b/tzt_reference_test_suite/neq_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cf2113758ed6b02f77b785e3544a4f0634ba6f38 --- /dev/null +++ b/tzt_reference_test_suite/neq_03.tzt @@ -0,0 +1,3 @@ +code { NEQ } ; +input { Stack_elt int 1 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/neq_04.tzt b/tzt_reference_test_suite/neq_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b677bf77e1759604623f0bb16e6db156c2f6a7eb --- /dev/null +++ b/tzt_reference_test_suite/neq_04.tzt @@ -0,0 +1,3 @@ +code { NEQ } ; +input { Stack_elt int 9999999 } ; +output { Stack_elt bool True } ; diff --git a/tzt_reference_test_suite/nil_nat_00.tzt b/tzt_reference_test_suite/nil_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2d311611e7f04f469e082f78b464b6565744a69a --- /dev/null +++ b/tzt_reference_test_suite/nil_nat_00.tzt @@ -0,0 +1,3 @@ +code { NIL nat } ; +input { } ; +output { Stack_elt (list nat) { } } diff --git a/tzt_reference_test_suite/none_int_00.tzt b/tzt_reference_test_suite/none_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..23f3feb352e03b4f9affbdb13a276f96f4b0ee20 --- /dev/null +++ b/tzt_reference_test_suite/none_int_00.tzt @@ -0,0 +1,3 @@ +code { NONE int } ; +input { } ; +output { Stack_elt (option int) None } diff --git a/tzt_reference_test_suite/none_pair-nat-string.tzt b/tzt_reference_test_suite/none_pair-nat-string.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2ae3b565a860a4e97ad5b96859f116855d8afdd3 --- /dev/null +++ b/tzt_reference_test_suite/none_pair-nat-string.tzt @@ -0,0 +1,3 @@ +code { NONE (pair nat string) } ; +input { } ; +output { Stack_elt (option (pair nat string)) None } diff --git a/tzt_reference_test_suite/not_bool_00.tzt b/tzt_reference_test_suite/not_bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..783c70442f71b7140a992b87a68a9d191bd1877e --- /dev/null +++ b/tzt_reference_test_suite/not_bool_00.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt bool True } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/not_bool_01.tzt b/tzt_reference_test_suite/not_bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0ecb16da64f4a948aceb4e942c3fd477d1fda1fc --- /dev/null +++ b/tzt_reference_test_suite/not_bool_01.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt bool False } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/not_bytes_00.tzt b/tzt_reference_test_suite/not_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..48381ae6798927bd31a543665a6512834f900369 --- /dev/null +++ b/tzt_reference_test_suite/not_bytes_00.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt bytes 0xC5CD } ; +output { Stack_elt bytes 0x3a32} diff --git a/tzt_reference_test_suite/not_bytes_01.tzt b/tzt_reference_test_suite/not_bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b4ea2101485f62e2f1d259d16b7f6c36ca80d257 --- /dev/null +++ b/tzt_reference_test_suite/not_bytes_01.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt bytes 0x } ; +output { Stack_elt bytes 0x} diff --git a/tzt_reference_test_suite/not_bytes_02.tzt b/tzt_reference_test_suite/not_bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..90569f944366d4ef82433f9012ec250645b31006 --- /dev/null +++ b/tzt_reference_test_suite/not_bytes_02.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt bytes 0xFFFF } ; +output { Stack_elt bytes 0x0000} diff --git a/tzt_reference_test_suite/not_int_00.tzt b/tzt_reference_test_suite/not_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..434ca1bd0177aa5143903e0a1c20082d82a7a4a5 --- /dev/null +++ b/tzt_reference_test_suite/not_int_00.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int 1 } ; +output { Stack_elt int -2 } diff --git a/tzt_reference_test_suite/not_nat_00.tzt b/tzt_reference_test_suite/not_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c15d9f5160fd0de1bf22c1e2024416a91f5c9e63 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_00.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt nat 0 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/not_nat_01.tzt b/tzt_reference_test_suite/not_nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a2570e479e5d60e018af86058e0e0b93041c93ec --- /dev/null +++ b/tzt_reference_test_suite/not_nat_01.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt nat 8 } ; +output { Stack_elt int -9 } diff --git a/tzt_reference_test_suite/not_nat_02.tzt b/tzt_reference_test_suite/not_nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..98611a2caf4e0813b188b0e6e1289d20f7cf5147 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_02.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt nat 7 } ; +output { Stack_elt int -8 } diff --git a/tzt_reference_test_suite/not_nat_03.tzt b/tzt_reference_test_suite/not_nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dcc590cb976a394360f37302e9efaea909b2e9fb --- /dev/null +++ b/tzt_reference_test_suite/not_nat_03.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int -9 } ; +output { Stack_elt int 8 } diff --git a/tzt_reference_test_suite/not_nat_04.tzt b/tzt_reference_test_suite/not_nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e410387feb80b668ba6f84f561fbfa351ec7e998 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_04.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int -8 } ; +output { Stack_elt int 7 } diff --git a/tzt_reference_test_suite/not_nat_05.tzt b/tzt_reference_test_suite/not_nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cf34f3c64966869c220d801c498ff4c5e487df47 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_05.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int 0 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/not_nat_06.tzt b/tzt_reference_test_suite/not_nat_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7afb6d78bf00f3623f531dfb644ebab9b2668020 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_06.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int 8 } ; +output { Stack_elt int -9 } diff --git a/tzt_reference_test_suite/not_nat_07.tzt b/tzt_reference_test_suite/not_nat_07.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ad5efc42de6ec725efb25ea0ad00ebb8593149c7 --- /dev/null +++ b/tzt_reference_test_suite/not_nat_07.tzt @@ -0,0 +1,3 @@ +code { NOT } ; +input { Stack_elt int 7 } ; +output { Stack_elt int -8 } diff --git a/tzt_reference_test_suite/now_00.tzt b/tzt_reference_test_suite/now_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4cf46e04c58547a75af09df45163c557c503a4ea --- /dev/null +++ b/tzt_reference_test_suite/now_00.tzt @@ -0,0 +1,4 @@ +code { NOW } ; +input { } ; +output { Stack_elt timestamp 45 } ; +now 45 diff --git a/tzt_reference_test_suite/or_bool-bool_00.tzt b/tzt_reference_test_suite/or_bool-bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1ef20867b98a3a8f04090b4292733138e938b51c --- /dev/null +++ b/tzt_reference_test_suite/or_bool-bool_00.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bool False ; Stack_elt bool False } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/or_bool-bool_01.tzt b/tzt_reference_test_suite/or_bool-bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..af7c3e171de0fa84a9ce368049ae0a35f364e664 --- /dev/null +++ b/tzt_reference_test_suite/or_bool-bool_01.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bool False ; Stack_elt bool True } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/or_bool-bool_02.tzt b/tzt_reference_test_suite/or_bool-bool_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fbaf168927a6ad7386ab563b378a8acf5f161126 --- /dev/null +++ b/tzt_reference_test_suite/or_bool-bool_02.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bool True ; Stack_elt bool False } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/or_bool-bool_03.tzt b/tzt_reference_test_suite/or_bool-bool_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b4a2ed5b2b8073e89ebe0694b7fdee2f87e0a02d --- /dev/null +++ b/tzt_reference_test_suite/or_bool-bool_03.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bool True ; Stack_elt bool True } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/or_bytes-bytes_00.tzt b/tzt_reference_test_suite/or_bytes-bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..05ba9aa7bf3467e04bffdb2fb6fecf255d5bd613 --- /dev/null +++ b/tzt_reference_test_suite/or_bytes-bytes_00.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bytes 0x0C ; Stack_elt bytes 0x05 } ; +output { Stack_elt bytes 0x0d } diff --git a/tzt_reference_test_suite/or_bytes-bytes_01.tzt b/tzt_reference_test_suite/or_bytes-bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cafe417fcf28b2b432c64adcfe3df08857fdeec3 --- /dev/null +++ b/tzt_reference_test_suite/or_bytes-bytes_01.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bytes 0xAB4C ; Stack_elt bytes 0xC5CD } ; +output { Stack_elt bytes 0xefcd } diff --git a/tzt_reference_test_suite/or_bytes-bytes_02.tzt b/tzt_reference_test_suite/or_bytes-bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..29c9cc091aabc6d1592c9b6063d691bfc55729b6 --- /dev/null +++ b/tzt_reference_test_suite/or_bytes-bytes_02.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bytes 0x05 ; Stack_elt bytes 0x0C } ; +output { Stack_elt bytes 0x0d } diff --git a/tzt_reference_test_suite/or_bytes-bytes_03.tzt b/tzt_reference_test_suite/or_bytes-bytes_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dcc995c5ea5774be01d2e7c451f8fbb35ac8c955 --- /dev/null +++ b/tzt_reference_test_suite/or_bytes-bytes_03.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt bytes 0x ; Stack_elt bytes 0x10 } ; +output { Stack_elt bytes 0x10 } diff --git a/tzt_reference_test_suite/or_nat-nat_00.tzt b/tzt_reference_test_suite/or_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bba068c846985589f73b3873c59c8ca4dc1ae126 --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 5 ; Stack_elt nat 3 } ; +output { Stack_elt nat 7 } diff --git a/tzt_reference_test_suite/or_nat-nat_01.tzt b/tzt_reference_test_suite/or_nat-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ab1852fac24f45825a5826e83db887159de654a2 --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_01.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 4 ; Stack_elt nat 8 } ; +output { Stack_elt nat 12 } diff --git a/tzt_reference_test_suite/or_nat-nat_02.tzt b/tzt_reference_test_suite/or_nat-nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..85ca54f87757b5976afc82ea98cbb4938bd90cea --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_02.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 0 ; Stack_elt nat 8 } ; +output { Stack_elt nat 8 } diff --git a/tzt_reference_test_suite/or_nat-nat_03.tzt b/tzt_reference_test_suite/or_nat-nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..45840e8b2bb2d28e40459eddbe966030640814e5 --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_03.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 8 ; Stack_elt nat 0 } ; +output { Stack_elt nat 8 } diff --git a/tzt_reference_test_suite/or_nat-nat_04.tzt b/tzt_reference_test_suite/or_nat-nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2ea3feb4678b4c3b8f1bf6aea1f4d0d253ab7b32 --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_04.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 15 ; Stack_elt nat 4 } ; +output { Stack_elt nat 15 } diff --git a/tzt_reference_test_suite/or_nat-nat_05.tzt b/tzt_reference_test_suite/or_nat-nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7efe4e491eca7c1b6a610eda57dcb38b924a0f3c --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_05.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 14 ; Stack_elt nat 1 } ; +output { Stack_elt nat 15 } diff --git a/tzt_reference_test_suite/or_nat-nat_06.tzt b/tzt_reference_test_suite/or_nat-nat_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9e8d809fa297a05ef643f96a2e66276428cba4d6 --- /dev/null +++ b/tzt_reference_test_suite/or_nat-nat_06.tzt @@ -0,0 +1,3 @@ +code { OR } ; +input { Stack_elt nat 7 ; Stack_elt nat 7 } ; +output { Stack_elt nat 7 } diff --git a/tzt_reference_test_suite/pack_address_00.tzt b/tzt_reference_test_suite/pack_address_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c060b7df6379c4b69bae3b56a25cb88b11be4aa7 --- /dev/null +++ b/tzt_reference_test_suite/pack_address_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt bytes 0x050a0000001601a9845b61ac052cdd0428af72a35bf75151dc754800 } ; diff --git a/tzt_reference_test_suite/pack_address_01.tzt b/tzt_reference_test_suite/pack_address_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..883a3a15e1a7e18fa8414c996c615a7813179edf --- /dev/null +++ b/tzt_reference_test_suite/pack_address_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "tz1LRE4uH6JPGwHhx72cfvtSNj3MFwBqXmhH" } ; +output { Stack_elt bytes 0x050a000000160000088c36d101ba785bc2e2bbcfd5e552870e1fdfd2 } ; diff --git a/tzt_reference_test_suite/pack_address_02.tzt b/tzt_reference_test_suite/pack_address_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..491ccf95c2f2f88d370b41d1a21cbc863ccf9984 --- /dev/null +++ b/tzt_reference_test_suite/pack_address_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "tz2V4544tMhJUm1AkdiJbybe8oYCn1hcwAWF" } ; +output { Stack_elt bytes 0x050a000000160001e37c61b158f6626985ef211c2261ffc0f3a87655 } ; diff --git a/tzt_reference_test_suite/pack_address_03.tzt b/tzt_reference_test_suite/pack_address_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a5d90bd8e992c8b9b198795e92d312223c6b2a02 --- /dev/null +++ b/tzt_reference_test_suite/pack_address_03.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "tz3jEYHFGWG53ikKKsxj3NZKQHNd33Zt5EKd" } ; +output { Stack_elt bytes 0x050a000000160002fb405367e9ab231bfc5a79c13fd4099f1d2ce20b } ; diff --git a/tzt_reference_test_suite/pack_address_04.tzt b/tzt_reference_test_suite/pack_address_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4d1f384bf193cdb79777bbc8cfcf80bd7f949a6c --- /dev/null +++ b/tzt_reference_test_suite/pack_address_04.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "tz4DfEv3KKcYXQ5ZMTeErJ6kvnWfzBRTPc8B" } ; +output { Stack_elt bytes 0x050a000000160003330fc02e20a6d72bd868264517bf4f8b6da85685 } ; diff --git a/tzt_reference_test_suite/pack_address_05.tzt b/tzt_reference_test_suite/pack_address_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bc674301f406ed27aa3246536c5e58265acc710f --- /dev/null +++ b/tzt_reference_test_suite/pack_address_05.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt address "sr1QrKHrxcritCgwevZVtPNaDtDa1mu6WKcY" } ; +output { Stack_elt bytes 0x050a0000001603ce54758ccfeb1a7b4dc7602b9267b1be1a08d4dd00 } ; diff --git a/tzt_reference_test_suite/pack_bool_00.tzt b/tzt_reference_test_suite/pack_bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..02ea5d1e9bec4f03e636ac44965dd99ef17b7387 --- /dev/null +++ b/tzt_reference_test_suite/pack_bool_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt bool False } ; +output { Stack_elt bytes 0x050303 } ; diff --git a/tzt_reference_test_suite/pack_bool_01.tzt b/tzt_reference_test_suite/pack_bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..27699e9be292e39c86b7b1f01dc79b9dc69a8253 --- /dev/null +++ b/tzt_reference_test_suite/pack_bool_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt bool True } ; +output { Stack_elt bytes 0x05030a } ; diff --git a/tzt_reference_test_suite/pack_bytes_00.tzt b/tzt_reference_test_suite/pack_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dada429be97812a016b9ad1d98dd7794b3236acd --- /dev/null +++ b/tzt_reference_test_suite/pack_bytes_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt bytes 0x } ; +output { Stack_elt bytes 0x050a00000000 } ; diff --git a/tzt_reference_test_suite/pack_bytes_01.tzt b/tzt_reference_test_suite/pack_bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b9295fc0cde41e07e6f9adcc8ba4a9950c6e6425 --- /dev/null +++ b/tzt_reference_test_suite/pack_bytes_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt bytes 0x001234abff } ; +output { Stack_elt bytes 0x050a00000005001234abff } ; diff --git a/tzt_reference_test_suite/pack_bytes_02.tzt b/tzt_reference_test_suite/pack_bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fcbdebee89d23ad2da79eab1cf9a0fd36d03d686 --- /dev/null +++ b/tzt_reference_test_suite/pack_bytes_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt bytes 0xf0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0 } ; +output { Stack_elt bytes 0x050a000003e8f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0 } ; diff --git a/tzt_reference_test_suite/pack_chainid_00.tzt b/tzt_reference_test_suite/pack_chainid_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1962b4b414fa2a143dae688076e81efa8adddefa --- /dev/null +++ b/tzt_reference_test_suite/pack_chainid_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt chain_id "NetXyuzvDo2Ugzb" } ; +output { Stack_elt bytes 0x050a00000004f49af95b } ; diff --git a/tzt_reference_test_suite/pack_contract_00.tzt b/tzt_reference_test_suite/pack_contract_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a6fe7d98cd62807108ceae471b502621b36fb7a9 --- /dev/null +++ b/tzt_reference_test_suite/pack_contract_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (contract unit) "tz1LQ5c9xSrgLnLkS95ydhCyZr4cuv5WfUi9" } ; +output { Stack_elt bytes 0x050a0000001600000854bc32bfe1ce7a82d58e37ea42a4f9100e03b4 } ; diff --git a/tzt_reference_test_suite/pack_key_00.tzt b/tzt_reference_test_suite/pack_key_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a76377b8c8a22c303b9225da11760595d0e4b806 --- /dev/null +++ b/tzt_reference_test_suite/pack_key_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key "edpkuRdpy8Bwwf9Zmk5QChYaioJKBw6f2sgSC5HDe9f8e4PebB5LtU" } ; +output { Stack_elt bytes 0x050a0000002100671d017cfd178748559c7b550853dee14c55f69a7b5039de79789f07e513d907 } ; diff --git a/tzt_reference_test_suite/pack_key_01.tzt b/tzt_reference_test_suite/pack_key_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c6a98b7bb9b4465e8ddf04226003b8be70870781 --- /dev/null +++ b/tzt_reference_test_suite/pack_key_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key "sppk7aQvNqSBYg2JJa7PAkrSNXuLmktaPdYUtgQSTQzdueqTjut9UXX" } ; +output { Stack_elt bytes 0x050a00000022010291f77578302bf43b03de7339fb1e3f30f1d6fcc21e13dfa2bcf7d918e25892eb } ; diff --git a/tzt_reference_test_suite/pack_key_02.tzt b/tzt_reference_test_suite/pack_key_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2a04fa04b265583e61c69d44bd2f73c3b54f8b3d --- /dev/null +++ b/tzt_reference_test_suite/pack_key_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key "p2pk68MYgMSCV5xaFkYBKWSGVjVC8ZrL2nN1bXXg2wVmrzuBav4hykY" } ; +output { Stack_elt bytes 0x050a000000220203f22396eec33f09aea3fa8e88024b432454cd64a1f1614b8380d28a21a3f52b99 } ; diff --git a/tzt_reference_test_suite/pack_key_03.tzt b/tzt_reference_test_suite/pack_key_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..db1a1711dacc2997acb1cbcbe5183397b68a9170 --- /dev/null +++ b/tzt_reference_test_suite/pack_key_03.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key "BLpk1nKe7wQ28U8UWBCujAGVfrBXNTw2GyodckgGdxccayFyY3phv5i8ZPWXwT1HunAzPM6x674o" } ; +output { Stack_elt bytes 0x050a000000310386fdbdf3fae0262882ff5d3e01884fed9e1f1248d7f24e9fcf12bbb06fedf0dc322bb915ba4bd4357f2136ce98aabda3 } ; diff --git a/tzt_reference_test_suite/pack_keyhash_01.tzt b/tzt_reference_test_suite/pack_keyhash_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..da059f398242ca1e726fbc621750468ab84adeed --- /dev/null +++ b/tzt_reference_test_suite/pack_keyhash_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key_hash "tz1LRE4uH6JPGwHhx72cfvtSNj3MFwBqXmhH" } ; +output { Stack_elt bytes 0x050a0000001500088c36d101ba785bc2e2bbcfd5e552870e1fdfd2 } ; diff --git a/tzt_reference_test_suite/pack_keyhash_02.tzt b/tzt_reference_test_suite/pack_keyhash_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..153ffd68dc296b85047ea7775850310bce7e9e8e --- /dev/null +++ b/tzt_reference_test_suite/pack_keyhash_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key_hash "tz2V4544tMhJUm1AkdiJbybe8oYCn1hcwAWF" } ; +output { Stack_elt bytes 0x050a0000001501e37c61b158f6626985ef211c2261ffc0f3a87655 } ; diff --git a/tzt_reference_test_suite/pack_keyhash_03.tzt b/tzt_reference_test_suite/pack_keyhash_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..72c3fc9256f48039097254de18e18b729ff6b8e1 --- /dev/null +++ b/tzt_reference_test_suite/pack_keyhash_03.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key_hash "tz3jEYHFGWG53ikKKsxj3NZKQHNd33Zt5EKd" } ; +output { Stack_elt bytes 0x050a0000001502fb405367e9ab231bfc5a79c13fd4099f1d2ce20b } ; diff --git a/tzt_reference_test_suite/pack_keyhash_04.tzt b/tzt_reference_test_suite/pack_keyhash_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a82630e7be133026e47a8ee3452d89768f28310c --- /dev/null +++ b/tzt_reference_test_suite/pack_keyhash_04.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt key_hash "tz4DfEv3KKcYXQ5ZMTeErJ6kvnWfzBRTPc8B" } ; +output { Stack_elt bytes 0x050a0000001503330fc02e20a6d72bd868264517bf4f8b6da85685 } ; diff --git a/tzt_reference_test_suite/pack_lambda_comb_pairs.tzt b/tzt_reference_test_suite/pack_lambda_comb_pairs.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a7055f52eed22896be69928335d06fec188e9059 --- /dev/null +++ b/tzt_reference_test_suite/pack_lambda_comb_pairs.tzt @@ -0,0 +1,3 @@ +code { PACK }; +input {Stack_elt (lambda unit unit) {PUSH (pair nat int bool) {0; -3; False}; DROP}}; +output {Stack_elt bytes 0x05020000001e07430965000000060362035b035900000000070700000707004303030320} diff --git a/tzt_reference_test_suite/pack_list-bool_00.tzt b/tzt_reference_test_suite/pack_list-bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9f7af9ede8af79a3c3e2b6901bae2299c1f2e025 --- /dev/null +++ b/tzt_reference_test_suite/pack_list-bool_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (list bool) {} } ; +output { Stack_elt bytes 0x050200000000 } ; diff --git a/tzt_reference_test_suite/pack_list-bool_01.tzt b/tzt_reference_test_suite/pack_list-bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2503ab08e6cbbd739d44c0b07b4bff9cc7d518e3 --- /dev/null +++ b/tzt_reference_test_suite/pack_list-bool_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (list bool) { True; False } } ; +output { Stack_elt bytes 0x050200000004030a0303 } ; diff --git a/tzt_reference_test_suite/pack_list-list-bool.tzt b/tzt_reference_test_suite/pack_list-list-bool.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1bfe43b6605974039df16423a76f2e7b368e5198 --- /dev/null +++ b/tzt_reference_test_suite/pack_list-list-bool.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (list (list bool)) { {}; { True } } } ; +output { Stack_elt bytes 0x05020000000c02000000000200000002030a } ; diff --git a/tzt_reference_test_suite/pack_list_large_00.tzt b/tzt_reference_test_suite/pack_list_large_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..008c07cdb34a359bdc1fe0473d3610c8b7daad11 --- /dev/null +++ b/tzt_reference_test_suite/pack_list_large_00.tzt @@ -0,0 +1,5 @@ +# This test checks the list length (1000 in this case) to be encoded as +# a fixed-size number, not as zarith number +code { PACK } ; +input { Stack_elt (list nat) { 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1; 1 } } ; +output { Stack_elt bytes 0x0502000007d00001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001 } ; diff --git a/tzt_reference_test_suite/pack_map-bool-unit_00.tzt b/tzt_reference_test_suite/pack_map-bool-unit_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..8e0c13228f9d8d024f62e6641d1f539c8d28518e --- /dev/null +++ b/tzt_reference_test_suite/pack_map-bool-unit_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (map bool unit) { Elt False Unit } } ; +output { Stack_elt bytes 0x05020000000607040303030b } ; diff --git a/tzt_reference_test_suite/pack_operation_00.tc.tzt b/tzt_reference_test_suite/pack_operation_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c69c8f64884bd379d233fd1b37f6efd0aa4e6279 --- /dev/null +++ b/tzt_reference_test_suite/pack_operation_00.tc.tzt @@ -0,0 +1,3 @@ +code { SET_DELEGATE; PACK } ; +input { Stack_elt (option key_hash) None } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/pack_option-unit_00.tzt b/tzt_reference_test_suite/pack_option-unit_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a2a00d4c69da2746f1e7e31fb08cd56b85742084 --- /dev/null +++ b/tzt_reference_test_suite/pack_option-unit_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (option unit) None } ; +output { Stack_elt bytes 0x050306 } ; diff --git a/tzt_reference_test_suite/pack_option-unit_01.tzt b/tzt_reference_test_suite/pack_option-unit_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b28442d91d576e68fe3e97a72dd60a906600f835 --- /dev/null +++ b/tzt_reference_test_suite/pack_option-unit_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (option unit) (Some Unit) } ; +output { Stack_elt bytes 0x050509030b } ; diff --git a/tzt_reference_test_suite/pack_or-unit-bool_00.tzt b/tzt_reference_test_suite/pack_or-unit-bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2390c47227783549af4b60f3cbd18610768bd6cd --- /dev/null +++ b/tzt_reference_test_suite/pack_or-unit-bool_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (or unit bool) (Left Unit) } ; +output { Stack_elt bytes 0x050505030b } ; diff --git a/tzt_reference_test_suite/pack_or-unit-bool_01.tzt b/tzt_reference_test_suite/pack_or-unit-bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ab2be1a26eab441f1869089bc9f550c2ff990db3 --- /dev/null +++ b/tzt_reference_test_suite/pack_or-unit-bool_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (or unit bool) (Right True) } ; +output { Stack_elt bytes 0x050508030a } ; diff --git a/tzt_reference_test_suite/pack_pair-bool-unit_00.tzt b/tzt_reference_test_suite/pack_pair-bool-unit_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2d34399875b1c7b0be4d0e148d21abad47cfdee9 --- /dev/null +++ b/tzt_reference_test_suite/pack_pair-bool-unit_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt (pair bool unit) (Pair False Unit) } ; +output { Stack_elt bytes 0x0507070303030b } ; diff --git a/tzt_reference_test_suite/pack_signature_00.tzt b/tzt_reference_test_suite/pack_signature_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b22d66f1b69d9fa687f33eea929341036eac8da7 --- /dev/null +++ b/tzt_reference_test_suite/pack_signature_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt signature "edsigtYnaoM7bF49AAP1NV5gYH6ZADZhm9C6sXbohQ77CeRncdMoiHqCsbfkjiXfyxoE8uyTgaza5HU58SMQ5iZLwjYspcMF1Q1" } ; +output { Stack_elt bytes 0x050a00000040077cfc77676c4dc63a208061056e8969cb859d804f286826efa2c9e12a844cd2bb96ed25afc901691d3f0b7fe0b3472d25e83233dae94f3ddca4a2fc9250c80b } ; diff --git a/tzt_reference_test_suite/pack_signature_01.tzt b/tzt_reference_test_suite/pack_signature_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..aa555b0652b835a74299f06811384ced9c835bd7 --- /dev/null +++ b/tzt_reference_test_suite/pack_signature_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt signature "spsig1H8r8x13suokeT8vinbuNg31qCW6Z4Ndt5pgD2dbWzhfiY4ixcMF2HeALtmCj5PH2TwjzJDFy1KJZ2NsAHUx5QcbbfhBUD" } ; +output { Stack_elt bytes 0x050a00000040569128953ba8bc0969c2cb46e0dbf35eef3e24abccd27c4b87842cba94451d38109010c55d57addb18d4fac370184b95d8fc70c1790077bd0d11db08d68f5e72 } ; diff --git a/tzt_reference_test_suite/pack_signature_02.tzt b/tzt_reference_test_suite/pack_signature_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f208531605d1dfea0c17a3d292adb91bb82e5536 --- /dev/null +++ b/tzt_reference_test_suite/pack_signature_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt signature "p2sigXfVJUEio9F4YHNQi5rkodxzWpQuZa3o9wH2DEYCZbXwR1dYx7XQgxZowuRU78qHq67cPJukukeHjUp5SMZ3R7zPB8oj5s" } ; +output { Stack_elt bytes 0x050a000000404f3328270b28b7150ef70f8d12a3bed12b220a3c822fe30c016db238bc8732167e78e734186408a482555ba2f4ad2b740298f25276f58984e3dcab1a54f9b374 } ; diff --git a/tzt_reference_test_suite/pack_signature_03.tzt b/tzt_reference_test_suite/pack_signature_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b8478b249e89ff617ece92c27a48774c4da07df3 --- /dev/null +++ b/tzt_reference_test_suite/pack_signature_03.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt signature "BLsigACccGJSm1AxfLykJWwiqmH4i9LgGGr8eUG7xBmq9KHZ2RFzcLRyJXV6iaRgGJkerzkyEWbrDAiDCaZnQUrt6k7tb9BKnujLXaZijH12Sb7es78QhDkAq7QLcVcoYcYpNhyUrDShCh" } ; +output { Stack_elt bytes 0x050a0000006091e149d6102bd2013b4f21d12223788250cbb347c790e6108b8ad1d1489567471e56277e57a4b537b8ae55d15365987102ad53069f66cf150e8c519f22a5be6432278b5d5072173b80b4d76e9ac610fee3b8ce84461be3e10ef1475884902729 } ; diff --git a/tzt_reference_test_suite/pack_string_00.tzt b/tzt_reference_test_suite/pack_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..eabe320f13c5965001ed9a11a031410ad2419b11 --- /dev/null +++ b/tzt_reference_test_suite/pack_string_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt string "" } ; +output { Stack_elt bytes 0x050100000000 } ; diff --git a/tzt_reference_test_suite/pack_string_01.tzt b/tzt_reference_test_suite/pack_string_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..787bc9c2db959de612e4f18b6d072b331d3c5e22 --- /dev/null +++ b/tzt_reference_test_suite/pack_string_01.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt string "abc" } ; +output { Stack_elt bytes 0x050100000003616263 } ; diff --git a/tzt_reference_test_suite/pack_string_02.tzt b/tzt_reference_test_suite/pack_string_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9af82333dea4facc9a747c18f1071c146903a3eb --- /dev/null +++ b/tzt_reference_test_suite/pack_string_02.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt string "123456789123456789123456789" } ; +output { Stack_elt bytes 0x05010000001b313233343536373839313233343536373839313233343536373839 } ; diff --git a/tzt_reference_test_suite/pack_string_03.tzt b/tzt_reference_test_suite/pack_string_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e7e758f0a0e6de71f30f9d65b0df6cf2627d1f11 --- /dev/null +++ b/tzt_reference_test_suite/pack_string_03.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt string "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" } ; +output { Stack_elt bytes 0x0501000003e878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878787878 } ; diff --git a/tzt_reference_test_suite/pack_unit_00.tzt b/tzt_reference_test_suite/pack_unit_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c72cbfcc89dedb81b5ec2453f864184778513bd1 --- /dev/null +++ b/tzt_reference_test_suite/pack_unit_00.tzt @@ -0,0 +1,3 @@ +code { PACK } ; +input { Stack_elt unit Unit } ; +output { Stack_elt bytes 0x05030b } ; diff --git a/tzt_reference_test_suite/packunpack_address_00.tzt b/tzt_reference_test_suite/packunpack_address_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..574bc22f07226b2b085d9be0588879d17b2ba04f --- /dev/null +++ b/tzt_reference_test_suite/packunpack_address_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK address } ; +input { Stack_elt address "tz1cxcwwnzENRdhe2Kb8ZdTrdNy4bFNyScx5" } ; +output { Stack_elt (option address) (Some "tz1cxcwwnzENRdhe2Kb8ZdTrdNy4bFNyScx5") } diff --git a/tzt_reference_test_suite/packunpack_bool_00.tzt b/tzt_reference_test_suite/packunpack_bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a597b190ed5a52b8c912af3b12211a28475165c4 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_bool_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK bool } ; +input { Stack_elt bool False } ; +output { Stack_elt (option bool) (Some False) } diff --git a/tzt_reference_test_suite/packunpack_bytes_00.tzt b/tzt_reference_test_suite/packunpack_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..12ae14345b5c206b8e0f9f8e6bb2b97a1e0a2381 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_bytes_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK bytes } ; +input { Stack_elt bytes 0x00AABBCC } ; +output { Stack_elt (option bytes) (Some 0x00AABBCC) } diff --git a/tzt_reference_test_suite/packunpack_int_00.tzt b/tzt_reference_test_suite/packunpack_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..86851f48e78539759ae209566e6424e45e290fb4 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_int_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK int } ; +input { Stack_elt int -1 } ; +output { Stack_elt (option int) (Some -1) } diff --git a/tzt_reference_test_suite/packunpack_keyhash_00.tzt b/tzt_reference_test_suite/packunpack_keyhash_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..80d42d49a51e7849c2fe9d309af867d6be161195 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_keyhash_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK key_hash } ; +input { Stack_elt key_hash "tz1cxcwwnzENRdhe2Kb8ZdTrdNy4bFNyScx5" } ; +output { Stack_elt (option key_hash) (Some "tz1cxcwwnzENRdhe2Kb8ZdTrdNy4bFNyScx5") } diff --git a/tzt_reference_test_suite/packunpack_mutez_00.tzt b/tzt_reference_test_suite/packunpack_mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..95d41064b6abf72496fb8d85c2bf2e969b905cc1 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_mutez_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK mutez } ; +input { Stack_elt mutez 1000 } ; +output { Stack_elt (option mutez) (Some 1000) } diff --git a/tzt_reference_test_suite/packunpack_nat_00.tzt b/tzt_reference_test_suite/packunpack_nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..84f86e66da36f705fc1d4ab80c281121ed45bc18 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_nat_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK nat } ; +input { Stack_elt nat 1 } ; +output { Stack_elt (option nat) (Some 1) } diff --git a/tzt_reference_test_suite/packunpack_string_00.tzt b/tzt_reference_test_suite/packunpack_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d6c1118b0e1dd6d9d62caa02485c25ce54f8f5da --- /dev/null +++ b/tzt_reference_test_suite/packunpack_string_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK string } ; +input { Stack_elt string "foobar" } ; +output { Stack_elt (option string) (Some "foobar") } diff --git a/tzt_reference_test_suite/packunpack_timestamp_00.tzt b/tzt_reference_test_suite/packunpack_timestamp_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cfe0ee624e2a5882c2a735b8a9fe60920e950653 --- /dev/null +++ b/tzt_reference_test_suite/packunpack_timestamp_00.tzt @@ -0,0 +1,3 @@ +code { PACK ; UNPACK timestamp } ; +input { Stack_elt timestamp "2019-09-09T08:35:33Z" } ; +output { Stack_elt (option timestamp) (Some "2019-09-09T08:35:33Z") } diff --git a/tzt_reference_test_suite/pair_00.tc.tzt b/tzt_reference_test_suite/pair_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..42d0db5ae994a226ae9ad38e4e43d95fc29cc2bc --- /dev/null +++ b/tzt_reference_test_suite/pair_00.tc.tzt @@ -0,0 +1,3 @@ +code { PAIR } ; +input { Stack_elt int 5 } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/pair_int-int_00.tzt b/tzt_reference_test_suite/pair_int-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..45579b7d4d8ba024db8de835782e931301033d60 --- /dev/null +++ b/tzt_reference_test_suite/pair_int-int_00.tzt @@ -0,0 +1,3 @@ +code { PAIR } ; +input { Stack_elt int 5 ; Stack_elt int 7 } ; +output { Stack_elt (pair int int) (Pair 5 7) } diff --git a/tzt_reference_test_suite/pair_nat-string_00.tzt b/tzt_reference_test_suite/pair_nat-string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3ff38ecacf321308bcbabc8c4f97577aaeb9eb5f --- /dev/null +++ b/tzt_reference_test_suite/pair_nat-string_00.tzt @@ -0,0 +1,3 @@ +code { PAIR } ; +input { Stack_elt nat 5 ; Stack_elt string "Hello" } ; +output { Stack_elt (pair nat string) (Pair 5 "Hello") } diff --git a/tzt_reference_test_suite/pair_pair-nat-string-pair-string-nat_00.tzt b/tzt_reference_test_suite/pair_pair-nat-string-pair-string-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2833e54767284ccb90c5df8f1809aa246855acb9 --- /dev/null +++ b/tzt_reference_test_suite/pair_pair-nat-string-pair-string-nat_00.tzt @@ -0,0 +1,3 @@ +code { PAIR } ; +input { Stack_elt (pair nat string) (Pair 5 "Hello") ; Stack_elt (pair string nat) (Pair "World" 6) } ; +output { Stack_elt (pair (pair nat string) (pair string nat)) (Pair (Pair 5 "Hello") (Pair "World" 6)) } diff --git a/tzt_reference_test_suite/push_00.tc.tzt b/tzt_reference_test_suite/push_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..60ad61c7b3eb4baad4a53647d57737e0007e7b09 --- /dev/null +++ b/tzt_reference_test_suite/push_00.tc.tzt @@ -0,0 +1,3 @@ +code { PUSH int "42" } ; +input { } ; +output (StaticError _); diff --git a/tzt_reference_test_suite/push_int_00.tzt b/tzt_reference_test_suite/push_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c6e3138b45d6a06669328cc202aceb211b691630 --- /dev/null +++ b/tzt_reference_test_suite/push_int_00.tzt @@ -0,0 +1,3 @@ +code { PUSH int 6 } ; +input { } ; +output { Stack_elt int 6 } diff --git a/tzt_reference_test_suite/push_string_00.tzt b/tzt_reference_test_suite/push_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5d942315bc733477b9ade179fa822695416d9f56 --- /dev/null +++ b/tzt_reference_test_suite/push_string_00.tzt @@ -0,0 +1,3 @@ +code { PUSH string "Hello" } ; +input { Stack_elt int 6 } ; +output { Stack_elt string "Hello" ; Stack_elt int 6 } diff --git a/tzt_reference_test_suite/right_nat-int_00.tzt b/tzt_reference_test_suite/right_nat-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..c1f877954a7bb970374b95b94f8cf943143ff4e8 --- /dev/null +++ b/tzt_reference_test_suite/right_nat-int_00.tzt @@ -0,0 +1,3 @@ +code { RIGHT nat } ; +input { Stack_elt int -5 } ; +output { Stack_elt (or nat int) (Right -5) } diff --git a/tzt_reference_test_suite/self_00.tzt b/tzt_reference_test_suite/self_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..aee986612644b76ee94b54cc54f947135e34e272 --- /dev/null +++ b/tzt_reference_test_suite/self_00.tzt @@ -0,0 +1,5 @@ +code { SELF } ; +input { } ; +parameter int ; +self "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" ; +output { Stack_elt (contract int) "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } diff --git a/tzt_reference_test_suite/self_01.tzt b/tzt_reference_test_suite/self_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dba68d289f3035ca4f5d539cb9fae5997a2428c9 --- /dev/null +++ b/tzt_reference_test_suite/self_01.tzt @@ -0,0 +1,14 @@ +# SELF inside CREATE_CONTRACT is valid, even if they both are inside a LAMBDA. +# SELF should produce a `contract` value with parameter matching the inner contract. +code { + LAMBDA (pair (option key_hash) mutez unit) address + { UNPAIR 3; CREATE_CONTRACT + { code { SELF ; CAST (contract key); FAIL } ; + storage unit ; + parameter key } ; + DROP; + } ; + DROP; + } ; +input { } ; +output { } diff --git a/tzt_reference_test_suite/self_in_lambda.tc.tzt b/tzt_reference_test_suite/self_in_lambda.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f03e94ff5887e0ab2c894d395c5305254742019e --- /dev/null +++ b/tzt_reference_test_suite/self_in_lambda.tc.tzt @@ -0,0 +1,3 @@ +code { LAMBDA unit unit { SELF; DROP } } ; +input { } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/sender_00.tzt b/tzt_reference_test_suite/sender_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5828a4489a865c8df61c9e8cc4ec3443fa56f0e7 --- /dev/null +++ b/tzt_reference_test_suite/sender_00.tzt @@ -0,0 +1,4 @@ +code { SENDER } ; +input { } ; +sender "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" ; +output { Stack_elt address "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } diff --git a/tzt_reference_test_suite/setdelegate_00.tc.tzt b/tzt_reference_test_suite/setdelegate_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5461beedf1b882698508bc4f3fef197d89170e47 --- /dev/null +++ b/tzt_reference_test_suite/setdelegate_00.tc.tzt @@ -0,0 +1,3 @@ +code { SET_DELEGATE } ; +input { Stack_elt unit Unit } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/setdelegate_00.tzt b/tzt_reference_test_suite/setdelegate_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..068848ed2841ddf81c44906b0ca36bcf8f4a57e6 --- /dev/null +++ b/tzt_reference_test_suite/setdelegate_00.tzt @@ -0,0 +1,3 @@ +code { SET_DELEGATE } ; +input { Stack_elt (option key_hash) (Some "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z") } ; +output { Stack_elt operation (Set_delegate (Some "tz1NwQ6hkenkn6aYYio8VnJvjtb4K1pfeU1Z") _) } diff --git a/tzt_reference_test_suite/size_bytes_00.tzt b/tzt_reference_test_suite/size_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3ce2a855ed2fd38da6c384af9cbf3f888eef18cb --- /dev/null +++ b/tzt_reference_test_suite/size_bytes_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt bytes 0x123456 } ; +output { Stack_elt nat 3 } diff --git a/tzt_reference_test_suite/size_listint_00.tzt b/tzt_reference_test_suite/size_listint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1ea58f5bc0a1418e8aa5d854251921b1aa45cad9 --- /dev/null +++ b/tzt_reference_test_suite/size_listint_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (list int) { 7 ; 11 ; 45 } } ; +output { Stack_elt nat 3 } diff --git a/tzt_reference_test_suite/size_listint_01.tzt b/tzt_reference_test_suite/size_listint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..49493f12642b996d6f23cf52a01456f4d52f2f57 --- /dev/null +++ b/tzt_reference_test_suite/size_listint_01.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (list int) { } } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/size_listint_02.tzt b/tzt_reference_test_suite/size_listint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..fd4a946e464b4bbe48c6d8b0b7960bd9a26d2c7c --- /dev/null +++ b/tzt_reference_test_suite/size_listint_02.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (list int) { 7 } } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/size_listint_03.tzt b/tzt_reference_test_suite/size_listint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5a367d881fcfc11b5fa40baccf78299f234f2895 --- /dev/null +++ b/tzt_reference_test_suite/size_listint_03.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (list int) { 1 ; 2 ; 3 ; 4 ; 5 ; 6 } } ; +output { Stack_elt nat 6 } diff --git a/tzt_reference_test_suite/size_mapintint_00.tzt b/tzt_reference_test_suite/size_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..07f029bb97083432f9385b9170f4542137ec3d18 --- /dev/null +++ b/tzt_reference_test_suite/size_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 ; Elt 43 6 ; Elt 129 3 } } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/size_mapstringnat_00.tzt b/tzt_reference_test_suite/size_mapstringnat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0b92dc7d979005695e992bac310a5e8b9c8e3f9d --- /dev/null +++ b/tzt_reference_test_suite/size_mapstringnat_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (map string nat) { } } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/size_mapstringnat_01.tzt b/tzt_reference_test_suite/size_mapstringnat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..04f0394499dae7ac3e73e71696cbe0bc64104eb7 --- /dev/null +++ b/tzt_reference_test_suite/size_mapstringnat_01.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (map string nat) { Elt "a" 1 } } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/size_mapstringnat_02.tzt b/tzt_reference_test_suite/size_mapstringnat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f1b5df5d595b45aeaf6543a376a8a39f4d3604f7 --- /dev/null +++ b/tzt_reference_test_suite/size_mapstringnat_02.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (map string nat) { Elt "a" 1 ; Elt "b" 2 ; Elt "c" 3 } } ; +output { Stack_elt nat 3 } diff --git a/tzt_reference_test_suite/size_mapstringnat_03.tzt b/tzt_reference_test_suite/size_mapstringnat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e0f0921a76a59cdc618396231ac8c3995f60f612 --- /dev/null +++ b/tzt_reference_test_suite/size_mapstringnat_03.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (map string nat) { Elt "a" 1 ; Elt "b" 2 ; Elt "c" 3 ; Elt "d" 1 ; Elt "e" 2 ; Elt "f" 3 } } ; +output { Stack_elt nat 6 } diff --git a/tzt_reference_test_suite/size_setint_00.tzt b/tzt_reference_test_suite/size_setint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6ae187d8f90d3451cb6169835091845c04679072 --- /dev/null +++ b/tzt_reference_test_suite/size_setint_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (set int) { } } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/size_setint_01.tzt b/tzt_reference_test_suite/size_setint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ab3072dc8e1c961a0a69ced2f27b1f8bd6f120f3 --- /dev/null +++ b/tzt_reference_test_suite/size_setint_01.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (set int) { 1 } } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/size_setint_02.tzt b/tzt_reference_test_suite/size_setint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..92e25bbd88ce1c5429d9d4944f655365f8edebc4 --- /dev/null +++ b/tzt_reference_test_suite/size_setint_02.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (set int) { 1 ; 2 ; 3 } } ; +output { Stack_elt nat 3 } diff --git a/tzt_reference_test_suite/size_setint_03.tzt b/tzt_reference_test_suite/size_setint_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9ee3c5e1e72ca19fbeccecce7234e3ba18ce3560 --- /dev/null +++ b/tzt_reference_test_suite/size_setint_03.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (set int) { 1 ; 2 ; 3 ; 4 ; 5 ; 6 } } ; +output { Stack_elt nat 6 } diff --git a/tzt_reference_test_suite/size_setstring_00.tzt b/tzt_reference_test_suite/size_setstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4e672595288678f5842e200449868ee8b9e11566 --- /dev/null +++ b/tzt_reference_test_suite/size_setstring_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt (set string) { "a" ; "b" ; "c" ; "d" } } ; +output { Stack_elt nat 4 } diff --git a/tzt_reference_test_suite/size_string_00.tzt b/tzt_reference_test_suite/size_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dbb68459f3b1cbb0b4bef59c130618e94b2005de --- /dev/null +++ b/tzt_reference_test_suite/size_string_00.tzt @@ -0,0 +1,3 @@ +code { SIZE } ; +input { Stack_elt string "hello" } ; +output { Stack_elt nat 5 } diff --git a/tzt_reference_test_suite/slice_bytes_00.tzt b/tzt_reference_test_suite/slice_bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..91d126aca1bbc5cfebfc03209e8e95bef116c10e --- /dev/null +++ b/tzt_reference_test_suite/slice_bytes_00.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 0 ; Stack_elt nat 0 ; Stack_elt bytes 0xaabbcc } ; +output { Stack_elt (option bytes) (Some 0x) } diff --git a/tzt_reference_test_suite/slice_bytes_01.tzt b/tzt_reference_test_suite/slice_bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e806761f8eccca6b3585e6de722d234a95ca25a6 --- /dev/null +++ b/tzt_reference_test_suite/slice_bytes_01.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 0 ; Stack_elt nat 1 ; Stack_elt bytes 0xaabbcc } ; +output { Stack_elt (option bytes) (Some 0xaa) } diff --git a/tzt_reference_test_suite/slice_bytes_02.tzt b/tzt_reference_test_suite/slice_bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..36de1c1b7769176859876594662d899fcd4c02b0 --- /dev/null +++ b/tzt_reference_test_suite/slice_bytes_02.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 1 ; Stack_elt nat 1 ; Stack_elt bytes 0xaabbcc } ; +output { Stack_elt (option bytes) (Some 0xbb) } diff --git a/tzt_reference_test_suite/slice_bytes_03.tzt b/tzt_reference_test_suite/slice_bytes_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..477c7ca019741f054ea662258e71dc8a866e8c76 --- /dev/null +++ b/tzt_reference_test_suite/slice_bytes_03.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 1 ; Stack_elt nat 2 ; Stack_elt bytes 0xaabbcc } ; +output { Stack_elt (option bytes) (Some 0xbbcc) } diff --git a/tzt_reference_test_suite/slice_bytes_04.tzt b/tzt_reference_test_suite/slice_bytes_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..98a3293e2508c80afeda2e867453d379cd414928 --- /dev/null +++ b/tzt_reference_test_suite/slice_bytes_04.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 1 ; Stack_elt nat 3 ; Stack_elt bytes 0xaabbcc } ; +output { Stack_elt (option bytes) None } diff --git a/tzt_reference_test_suite/slice_string_00.tzt b/tzt_reference_test_suite/slice_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..6f84381539c0408fbb132b55e445e764f17ccf8a --- /dev/null +++ b/tzt_reference_test_suite/slice_string_00.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 2 ; Stack_elt nat 3 ; Stack_elt string "hello world" } ; +output { Stack_elt (option string) (Some "llo") } diff --git a/tzt_reference_test_suite/slice_string_01.tzt b/tzt_reference_test_suite/slice_string_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..db3a4c81c9d226f1cbeea72e050ab892faabe2eb --- /dev/null +++ b/tzt_reference_test_suite/slice_string_01.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 2 ; Stack_elt nat 13 ; Stack_elt string "hello world" } ; +output { Stack_elt (option string) None } diff --git a/tzt_reference_test_suite/slice_string_02.tzt b/tzt_reference_test_suite/slice_string_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2b7df515ab4fa1df43de4489c6747258019e9fe0 --- /dev/null +++ b/tzt_reference_test_suite/slice_string_02.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 3 ; Stack_elt nat 0 ; Stack_elt string "hello world" } ; +output { Stack_elt (option string) (Some "") } diff --git a/tzt_reference_test_suite/slice_string_03.tzt b/tzt_reference_test_suite/slice_string_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9075fdcdcede9332aec4899d9583aa0724774c9a --- /dev/null +++ b/tzt_reference_test_suite/slice_string_03.tzt @@ -0,0 +1,3 @@ +code { SLICE } ; +input { Stack_elt nat 20000 ; Stack_elt nat 0 ; Stack_elt string "hello world" } ; +output { Stack_elt (option string) None } diff --git a/tzt_reference_test_suite/slice_string_04.tzt b/tzt_reference_test_suite/slice_string_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9dfe8bd5c835494023d365631917ecef1aa0096c --- /dev/null +++ b/tzt_reference_test_suite/slice_string_04.tzt @@ -0,0 +1,3 @@ +code { DUP ; SIZE ; PUSH nat 0 ; SLICE } ; +input { Stack_elt string "hello world" } ; +output { Stack_elt (option string) (Some "hello world") } diff --git a/tzt_reference_test_suite/slice_string_05.tzt b/tzt_reference_test_suite/slice_string_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..d39f08ff3a78826244f98017bd8ceb03bf19de10 --- /dev/null +++ b/tzt_reference_test_suite/slice_string_05.tzt @@ -0,0 +1,3 @@ +code { DUP ; SIZE ; PUSH nat 0 ; SLICE } ; +input { Stack_elt string "" } ; +output { Stack_elt (option string) None } diff --git a/tzt_reference_test_suite/some_00.tc.tzt b/tzt_reference_test_suite/some_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..af86db48dd054e2f55145af9e04efa0a83cc6c1a --- /dev/null +++ b/tzt_reference_test_suite/some_00.tc.tzt @@ -0,0 +1,3 @@ +code { SOME } ; +input { } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/some_int_00.tzt b/tzt_reference_test_suite/some_int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b6cd71098ac9168767f48be52767eb0921d9080e --- /dev/null +++ b/tzt_reference_test_suite/some_int_00.tzt @@ -0,0 +1,3 @@ +code { SOME } ; +input { Stack_elt int 5 } ; +output { Stack_elt (option int) (Some 5) } diff --git a/tzt_reference_test_suite/some_pairintint_00.tzt b/tzt_reference_test_suite/some_pairintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4a2503c4c88950bb2c178e10c4ab737204ce08a2 --- /dev/null +++ b/tzt_reference_test_suite/some_pairintint_00.tzt @@ -0,0 +1,3 @@ +code { SOME } ; +input { Stack_elt (pair int int) (Pair 5 4) } ; +output { Stack_elt (option (pair int int)) (Some (Pair 5 4)) } diff --git a/tzt_reference_test_suite/some_string_00.tzt b/tzt_reference_test_suite/some_string_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9b032233ed8702acc3dc79883d0bed6db7d49ccc --- /dev/null +++ b/tzt_reference_test_suite/some_string_00.tzt @@ -0,0 +1,3 @@ +code { SOME } ; +input { Stack_elt string "Hello" } ; +output { Stack_elt (option string) (Some "Hello") } diff --git a/tzt_reference_test_suite/source_00.tzt b/tzt_reference_test_suite/source_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b058ed0eba98bdd05b07d70ff5990f8c85903da6 --- /dev/null +++ b/tzt_reference_test_suite/source_00.tzt @@ -0,0 +1,4 @@ +code { SOURCE } ; +input { } ; +output { Stack_elt address "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +source "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" diff --git a/tzt_reference_test_suite/sub_int-int_00.tzt b/tzt_reference_test_suite/sub_int-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..57e42ac14ff1094e7841dd5ebea26addf9d3ae0a --- /dev/null +++ b/tzt_reference_test_suite/sub_int-int_00.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt int 5 ; Stack_elt int 2 } ; +output { Stack_elt int 3 } diff --git a/tzt_reference_test_suite/sub_int-int_01.tzt b/tzt_reference_test_suite/sub_int-int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..1e7b7ca1ffdab01de3e5a50fd0eeaa13ee0ebca7 --- /dev/null +++ b/tzt_reference_test_suite/sub_int-int_01.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt int 2 ; Stack_elt int 5 } ; +output { Stack_elt int -3 } diff --git a/tzt_reference_test_suite/sub_mutez-mutez_00.tzt b/tzt_reference_test_suite/sub_mutez-mutez_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0afc30ac907ef238076aebb97bf14a409c3f6210 --- /dev/null +++ b/tzt_reference_test_suite/sub_mutez-mutez_00.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt mutez 5 ; Stack_elt mutez 3 } ; +output { Stack_elt mutez 2 } diff --git a/tzt_reference_test_suite/sub_mutez-mutez_01.tzt b/tzt_reference_test_suite/sub_mutez-mutez_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..3906cc9297c5820e1e0b2b5ebd4b9edcdce2b9a8 --- /dev/null +++ b/tzt_reference_test_suite/sub_mutez-mutez_01.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt mutez 5 ; Stack_elt mutez 13 } ; +output (MutezUnderflow 5 13) diff --git a/tzt_reference_test_suite/sub_timestamp-int_00.tzt b/tzt_reference_test_suite/sub_timestamp-int_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..14dbd36820ef66a02882588a71b444e950193f12 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-int_00.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 5 ; Stack_elt int 2 } ; +output { Stack_elt timestamp 3 } diff --git a/tzt_reference_test_suite/sub_timestamp-int_01.tzt b/tzt_reference_test_suite/sub_timestamp-int_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7e38ea14c3e5b7e0297e7b107c35ab54ba4c1cc7 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-int_01.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 100 ; Stack_elt int 100 } ; +output { Stack_elt timestamp "1970-01-01T00:00:00Z" } diff --git a/tzt_reference_test_suite/sub_timestamp-int_02.tzt b/tzt_reference_test_suite/sub_timestamp-int_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dc541c87175039804bf09eff158343ba564751a2 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-int_02.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 100 ; Stack_elt int -100 } ; +output { Stack_elt timestamp "1970-01-01T00:03:20Z" } diff --git a/tzt_reference_test_suite/sub_timestamp-int_03.tzt b/tzt_reference_test_suite/sub_timestamp-int_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e370b630f3abb40dfe503f091468d6ae13113a65 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-int_03.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 100 ; Stack_elt int 2000000 } ; +output { Stack_elt timestamp -1999900 } diff --git a/tzt_reference_test_suite/sub_timestamp-int_04.tzt b/tzt_reference_test_suite/sub_timestamp-int_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..779ff4ebb702d83d7e74d8b1cdbe203ecd221622 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-int_04.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp "1000-01-01T00:00:00Z" ; Stack_elt int 1 } ; +output { Stack_elt timestamp "-30610224001" } diff --git a/tzt_reference_test_suite/sub_timestamp-timestamp_00.tzt b/tzt_reference_test_suite/sub_timestamp-timestamp_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..2136c70722dce4aa90d1f2ee1e4a43499dd23506 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-timestamp_00.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 0 ; Stack_elt timestamp 1 } ; +output { Stack_elt int -1 } diff --git a/tzt_reference_test_suite/sub_timestamp-timestamp_01.tzt b/tzt_reference_test_suite/sub_timestamp-timestamp_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..50c8385ef99fb37869b06caaa91371163129596d --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-timestamp_01.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 0 ; Stack_elt timestamp 0 } ; +output { Stack_elt int 0 } diff --git a/tzt_reference_test_suite/sub_timestamp-timestamp_02.tzt b/tzt_reference_test_suite/sub_timestamp-timestamp_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..a6962a1ca8a5f47dab048036fb53cbeac4404238 --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-timestamp_02.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp 1 ; Stack_elt timestamp 0 } ; +output { Stack_elt int 1 } diff --git a/tzt_reference_test_suite/sub_timestamp-timestamp_03.tzt b/tzt_reference_test_suite/sub_timestamp-timestamp_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4be90f94216ad7d7d41c9b78d75457ad0f036b8a --- /dev/null +++ b/tzt_reference_test_suite/sub_timestamp-timestamp_03.tzt @@ -0,0 +1,3 @@ +code { SUB } ; +input { Stack_elt timestamp "1970-01-01T00:03:20Z" ; Stack_elt timestamp "1970-01-01T00:00:00Z" } ; +output { Stack_elt int 200 } diff --git a/tzt_reference_test_suite/swap_00.tc.tzt b/tzt_reference_test_suite/swap_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..23c6ef59e4161c0515c094fc14a67bbb12c7edc0 --- /dev/null +++ b/tzt_reference_test_suite/swap_00.tc.tzt @@ -0,0 +1,3 @@ +code { SWAP } ; +input { Stack_elt unit Unit }; +output (StaticError _); diff --git a/tzt_reference_test_suite/swap_00.tzt b/tzt_reference_test_suite/swap_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dfb50fadbb071a0a75df2b7b07fa6e4cc6977841 --- /dev/null +++ b/tzt_reference_test_suite/swap_00.tzt @@ -0,0 +1,3 @@ +code { SWAP } ; +input { Stack_elt int 1 ; Stack_elt int 2 ; Stack_elt int 3 }; +output { Stack_elt int 2 ; Stack_elt int 1 ; Stack_elt int 3 }; diff --git a/tzt_reference_test_suite/swap_01.tc.tzt b/tzt_reference_test_suite/swap_01.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..52f8f89e1aa0fc63fdaf2791435a669c427fd1f4 --- /dev/null +++ b/tzt_reference_test_suite/swap_01.tc.tzt @@ -0,0 +1,3 @@ +code { SWAP } ; +input { }; +output (StaticError _); diff --git a/tzt_reference_test_suite/transfertokens_00.tc.tzt b/tzt_reference_test_suite/transfertokens_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0e31175e93f9d26416402d049967af145bed8634 --- /dev/null +++ b/tzt_reference_test_suite/transfertokens_00.tc.tzt @@ -0,0 +1,3 @@ +code { TRANSFER_TOKENS } ; +input { Stack_elt string "a" ; Stack_elt mutez 5 ; Stack_elt (contract unit) "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output (StaticError _) ; # should point to invalid input stack diff --git a/tzt_reference_test_suite/transfertokens_00.tzt b/tzt_reference_test_suite/transfertokens_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e65c1fc97d754944e856cb111a403ee38c5f51da --- /dev/null +++ b/tzt_reference_test_suite/transfertokens_00.tzt @@ -0,0 +1,4 @@ +code { TRANSFER_TOKENS } ; +input { Stack_elt unit Unit ; Stack_elt mutez 5 ; Stack_elt (contract unit) "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" } ; +output { Stack_elt operation (Transfer_tokens Unit 5 "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" _) } ; +other_contracts { Contract "tz1KqTpEZ7Yob7QbPE4Hy4Wo8fHG8LhKxZSx" unit } diff --git a/tzt_reference_test_suite/transfertokens_01.tzt b/tzt_reference_test_suite/transfertokens_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b39e677263219f2eb68c12bb42563f15543a36fe --- /dev/null +++ b/tzt_reference_test_suite/transfertokens_01.tzt @@ -0,0 +1,4 @@ +code { TRANSFER_TOKENS } ; +input { Stack_elt mutez 20 ; Stack_elt mutez 5 ; Stack_elt (contract mutez) "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" } ; +output { Stack_elt operation (Transfer_tokens 20 5 "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" _) } ; +other_contracts { Contract "KT1Q36KWPSba7dHsH5E4ZsQHehrChc51e19d" mutez } diff --git a/tzt_reference_test_suite/unit_00.tzt b/tzt_reference_test_suite/unit_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9c0bff154b92ad9b251b44b74fcd25b170a34c21 --- /dev/null +++ b/tzt_reference_test_suite/unit_00.tzt @@ -0,0 +1,3 @@ +code { UNIT } ; +input { } ; +output { Stack_elt unit Unit } diff --git a/tzt_reference_test_suite/unpair_00.tc.tzt b/tzt_reference_test_suite/unpair_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..84bf9f92b544033b426aa28cb0ba47a4ab49f783 --- /dev/null +++ b/tzt_reference_test_suite/unpair_00.tc.tzt @@ -0,0 +1,3 @@ +code { UNPAIR } ; +input { Stack_elt string "a" } ; +output (StaticError _) ; diff --git a/tzt_reference_test_suite/unpair_pairstringstring_00.tzt b/tzt_reference_test_suite/unpair_pairstringstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f9dd3b493d24816bf870703a8677e9e3edf173fe --- /dev/null +++ b/tzt_reference_test_suite/unpair_pairstringstring_00.tzt @@ -0,0 +1,3 @@ +code { UNPAIR } ; +input { Stack_elt (pair string string) (Pair "first" "second") } ; +output { Stack_elt string "first" ; Stack_elt string "second" } diff --git a/tzt_reference_test_suite/update_00.tc.tzt b/tzt_reference_test_suite/update_00.tc.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dad42a21476c6ea07d147953524f7df0256a4f55 --- /dev/null +++ b/tzt_reference_test_suite/update_00.tc.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 1 ; Stack_elt (option int) None ; Stack_elt string "{ Pair 1 3 ; Elt 5 2 }" } ; +output (StaticError _) diff --git a/tzt_reference_test_suite/update_bigmapstringstring_00.tzt b/tzt_reference_test_suite/update_bigmapstringstring_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9d7474936299b92cccfa1d2dcd046f4ae88ddb10 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_00.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt string "3" ; Stack_elt (option string) (Some "three") ; Stack_elt (big_map string string) { Elt "1" "one" ; Elt "2" "two" } } ; +output { Stack_elt (big_map string string) { Elt "1" "one" ; Elt "2" "two" ; Elt "3" "three" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_01.tzt b/tzt_reference_test_suite/update_bigmapstringstring_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e16706957e40929bc98943fca65ad00bd7dfac47 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_01.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "3" ; Stack_elt (option string) (Some "three") ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "3" (Some "three") }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_02.tzt b/tzt_reference_test_suite/update_bigmapstringstring_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..049ae3e8b29740fc3353c197d87888bc8f4f69a1 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_02.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "2" ; Stack_elt (option string) (Some "three") ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "2" (Some "three") }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_03.tzt b/tzt_reference_test_suite/update_bigmapstringstring_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..757f45ebd0d84a23850903fbcb1998194859bf00 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_03.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "2" ; Stack_elt (option string) None ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "2" None }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_04.tzt b/tzt_reference_test_suite/update_bigmapstringstring_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5b6c5c74f0d72e814a90968a82258fa1806e1543 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_04.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "3" ; Stack_elt (option string) None ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "3" None }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_05.tzt b/tzt_reference_test_suite/update_bigmapstringstring_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0563fc4dff2060e6725054010b04b7fa595652aa --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_05.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "1" ; Stack_elt (option string) None ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "1" None }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_06.tzt b/tzt_reference_test_suite/update_bigmapstringstring_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..5b6c5c74f0d72e814a90968a82258fa1806e1543 --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_06.tzt @@ -0,0 +1,4 @@ +code { UPDATE } ; +input { Stack_elt string "3" ; Stack_elt (option string) None ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "3" None }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_bigmapstringstring_07.tzt b/tzt_reference_test_suite/update_bigmapstringstring_07.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7e32d9ea2bebd3dad6e275ca03a55f88794e7ddd --- /dev/null +++ b/tzt_reference_test_suite/update_bigmapstringstring_07.tzt @@ -0,0 +1,5 @@ +code { UPDATE } ; +input { Stack_elt string "3" ; Stack_elt (option string) (Some "three") ; Stack_elt (big_map string string) 10 } ; +output { Stack_elt (big_map string string) (Pair 10 { Elt "3" (Some "three") }) } ; +big_maps { Big_map 10 string string { Elt "1" "one" ; Elt "2" "two" } ; + Big_map 11 string string { Elt "1" "one" ; Elt "2" "two" } } diff --git a/tzt_reference_test_suite/update_mapintint_00.tzt b/tzt_reference_test_suite/update_mapintint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f24a0a921051614478cf1ee32aed8416d2d82abe --- /dev/null +++ b/tzt_reference_test_suite/update_mapintint_00.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 1 ; Stack_elt (option int) None ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt (map int int) { Elt 5 2 } } diff --git a/tzt_reference_test_suite/update_mapintint_01.tzt b/tzt_reference_test_suite/update_mapintint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..441bce16f4874a7fa2da92d5578c340dac1bd456 --- /dev/null +++ b/tzt_reference_test_suite/update_mapintint_01.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 1 ; Stack_elt (option int) (Some 12) ; Stack_elt (map int int) { Elt 1 3 ; Elt 5 2 } } ; +output { Stack_elt (map int int) { Elt 1 12 ; Elt 5 2 } } diff --git a/tzt_reference_test_suite/update_setint_00.tzt b/tzt_reference_test_suite/update_setint_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f69e715906cdc596d24cd1279f49d80ee2b9fcdc --- /dev/null +++ b/tzt_reference_test_suite/update_setint_00.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 2 ; Stack_elt bool False ; Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } ; +output { Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } diff --git a/tzt_reference_test_suite/update_setint_01.tzt b/tzt_reference_test_suite/update_setint_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..9d7014921c42a95ac3a8eb54869f3d2f6c59b759 --- /dev/null +++ b/tzt_reference_test_suite/update_setint_01.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 5 ; Stack_elt bool False ; Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } ; +output { Stack_elt (set int) { 1 ; 3 ; 7 } } diff --git a/tzt_reference_test_suite/update_setint_02.tzt b/tzt_reference_test_suite/update_setint_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..cc360e133910215a72e2269b5be0c1be45528511 --- /dev/null +++ b/tzt_reference_test_suite/update_setint_02.tzt @@ -0,0 +1,3 @@ +code { UPDATE } ; +input { Stack_elt int 2 ; Stack_elt bool True ; Stack_elt (set int) { 1 ; 3 ; 5 ; 7 } } ; +output { Stack_elt (set int) { 1 ; 2 ; 3 ; 5 ; 7 } } diff --git a/tzt_reference_test_suite/xor_bool-bool_00.tzt b/tzt_reference_test_suite/xor_bool-bool_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..bcbfe3c6f3abf45930cbec1848760852e96b14dd --- /dev/null +++ b/tzt_reference_test_suite/xor_bool-bool_00.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bool False ; Stack_elt bool True } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/xor_bool-bool_01.tzt b/tzt_reference_test_suite/xor_bool-bool_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..b7d91e5d3fc0d3e4b3b7e89c74c18927f4da6e8c --- /dev/null +++ b/tzt_reference_test_suite/xor_bool-bool_01.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bool False ; Stack_elt bool False } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/xor_bool-bool_02.tzt b/tzt_reference_test_suite/xor_bool-bool_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..25375da649daa88fb6b5391e54f93d4d5a9f8763 --- /dev/null +++ b/tzt_reference_test_suite/xor_bool-bool_02.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bool True ; Stack_elt bool False } ; +output { Stack_elt bool True } diff --git a/tzt_reference_test_suite/xor_bool-bool_03.tzt b/tzt_reference_test_suite/xor_bool-bool_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..f85a5b5a20924794f41186d93f8f6a3b836683da --- /dev/null +++ b/tzt_reference_test_suite/xor_bool-bool_03.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bool True ; Stack_elt bool True } ; +output { Stack_elt bool False } diff --git a/tzt_reference_test_suite/xor_bytes-bytes_00.tzt b/tzt_reference_test_suite/xor_bytes-bytes_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4310d8af82cc9b0f6a5f56107895df53e515924b --- /dev/null +++ b/tzt_reference_test_suite/xor_bytes-bytes_00.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bytes 0x0C ; Stack_elt bytes 0x05 } ; +output { Stack_elt bytes 0x09 } diff --git a/tzt_reference_test_suite/xor_bytes-bytes_01.tzt b/tzt_reference_test_suite/xor_bytes-bytes_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ca12170b89cd2adf1164c574de50067a1bbd56b7 --- /dev/null +++ b/tzt_reference_test_suite/xor_bytes-bytes_01.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bytes 0xAB4C ; Stack_elt bytes 0xC5CD } ; +output { Stack_elt bytes 0x6e81 } diff --git a/tzt_reference_test_suite/xor_bytes-bytes_02.tzt b/tzt_reference_test_suite/xor_bytes-bytes_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..7ca4e2c468b6ae89027f1977ce57753d8aaa6c03 --- /dev/null +++ b/tzt_reference_test_suite/xor_bytes-bytes_02.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bytes 0x05 ; Stack_elt bytes 0x0C } ; +output { Stack_elt bytes 0x09 } diff --git a/tzt_reference_test_suite/xor_bytes-bytes_03.tzt b/tzt_reference_test_suite/xor_bytes-bytes_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..dd84c81fdd1c01ff3662d4718254aefdfd8f24d5 --- /dev/null +++ b/tzt_reference_test_suite/xor_bytes-bytes_03.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt bytes 0x ; Stack_elt bytes 0x10 } ; +output { Stack_elt bytes 0x10 } diff --git a/tzt_reference_test_suite/xor_nat-nat_00.tzt b/tzt_reference_test_suite/xor_nat-nat_00.tzt new file mode 100644 index 0000000000000000000000000000000000000000..07b9bce424c71ba0f887e397a7b3d3c6780389ba --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_00.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 5 ; Stack_elt nat 3 } ; +output { Stack_elt nat 6 } diff --git a/tzt_reference_test_suite/xor_nat-nat_01.tzt b/tzt_reference_test_suite/xor_nat-nat_01.tzt new file mode 100644 index 0000000000000000000000000000000000000000..76e2245dd0101dcbe329a035d0c2e73b44dc0fb2 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_01.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 0 ; Stack_elt nat 0 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/xor_nat-nat_02.tzt b/tzt_reference_test_suite/xor_nat-nat_02.tzt new file mode 100644 index 0000000000000000000000000000000000000000..790d635442f2132d1b240a964947a607ddf88c41 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_02.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 0 ; Stack_elt nat 1 } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/xor_nat-nat_03.tzt b/tzt_reference_test_suite/xor_nat-nat_03.tzt new file mode 100644 index 0000000000000000000000000000000000000000..e2a476fae076bd15ceb50f4dbd50d2956016bc34 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_03.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 1 ; Stack_elt nat 0 } ; +output { Stack_elt nat 1 } diff --git a/tzt_reference_test_suite/xor_nat-nat_04.tzt b/tzt_reference_test_suite/xor_nat-nat_04.tzt new file mode 100644 index 0000000000000000000000000000000000000000..4f6c2121a83fb8006537ba6b6ebdd2e7da1c31f2 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_04.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 1 ; Stack_elt nat 1 } ; +output { Stack_elt nat 0 } diff --git a/tzt_reference_test_suite/xor_nat-nat_05.tzt b/tzt_reference_test_suite/xor_nat-nat_05.tzt new file mode 100644 index 0000000000000000000000000000000000000000..ca7ceac980cc1197ef891b498b516815d68926b3 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_05.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 42 ; Stack_elt nat 21 } ; +output { Stack_elt nat 63 } diff --git a/tzt_reference_test_suite/xor_nat-nat_06.tzt b/tzt_reference_test_suite/xor_nat-nat_06.tzt new file mode 100644 index 0000000000000000000000000000000000000000..0aad11afe617f131c02d01bbb1584abb89babc68 --- /dev/null +++ b/tzt_reference_test_suite/xor_nat-nat_06.tzt @@ -0,0 +1,3 @@ +code { XOR } ; +input { Stack_elt nat 42 ; Stack_elt nat 63 } ; +output { Stack_elt nat 21 }