From 8cb13207d408d834ee52c7058e42deee288e7bf6 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Rapha=C3=ABl=20Cauderlier?= Date: Fri, 26 Jan 2024 13:33:12 +0100 Subject: [PATCH 1/2] Tests/Proto/AI: unplug slow activation tests --- .../test_adaptive_issuance_launch.ml | 24 ++++++++++++------- 1 file changed, 16 insertions(+), 8 deletions(-) diff --git a/src/proto_alpha/lib_protocol/test/integration/test_adaptive_issuance_launch.ml b/src/proto_alpha/lib_protocol/test/integration/test_adaptive_issuance_launch.ml index 9af0c2c7c22f..74eeb18928b1 100644 --- a/src/proto_alpha/lib_protocol/test/integration/test_adaptive_issuance_launch.ml +++ b/src/proto_alpha/lib_protocol/test/integration/test_adaptive_issuance_launch.ml @@ -553,11 +553,26 @@ let tests = test_launch_without_vote; Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ - issuance launches (very low threshold, vote enabled)" + issuance launches (vote enabled)" `Quick (test_launch 1000000l (* This means that the threshold is set at 0.05% *) 88l); + Tztest.tztest + "the EMA reaches the vote threshold at the expected level and adaptive \ + issuance does not launch (vote disabled)" + `Quick + (test_does_not_launch_without_feature_flag + 1000000l (* This means that the threshold is set at 0.05% *) + 88l); + ] + +(* These tests have been unplugged because they are too long for the + CI (more than 3 minutes). For unit tests of the fact that the 80% + threshold can be reached by iteration of the EMA update function, + see ../unit/test_adaptive_issuance_ema.ml *) +let _unplugged_tests = + [ Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ issuance launches (realistic threshold, vote enabled)" @@ -569,13 +584,6 @@ let tests = (* This vote duration is consistent with the result of the unit test for this EMA in ../unit/test_adaptive_issuance_ema.ml*)); - Tztest.tztest - "the EMA reaches the vote threshold at the expected level and adaptive \ - issuance does not launch (very low threshold, vote disabled)" - `Quick - (test_does_not_launch_without_feature_flag - 1000000l (* This means that the threshold is set at 0.05% *) - 88l); Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ issuance does not launch (realistic threshold, vote disabled)" -- GitLab From a0797414d446719bdba92f92e076f80a93d0ecf5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Rapha=C3=ABl=20Cauderlier?= Date: Fri, 26 Jan 2024 13:38:18 +0100 Subject: [PATCH 2/2] Tests/Proto/AI: backport prev commit to Oxford --- .../test_adaptive_issuance_launch.ml | 24 ++++++++++++------- 1 file changed, 16 insertions(+), 8 deletions(-) diff --git a/src/proto_018_Proxford/lib_protocol/test/integration/test_adaptive_issuance_launch.ml b/src/proto_018_Proxford/lib_protocol/test/integration/test_adaptive_issuance_launch.ml index 5c23e260aba3..64b4987bb7aa 100644 --- a/src/proto_018_Proxford/lib_protocol/test/integration/test_adaptive_issuance_launch.ml +++ b/src/proto_018_Proxford/lib_protocol/test/integration/test_adaptive_issuance_launch.ml @@ -465,11 +465,26 @@ let tests = [ Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ - issuance launches (very low threshold, vote enabled)" + issuance launches (vote enabled)" `Quick (test_launch 1000000l (* This means that the threshold is set at 0.05% *) 59l); + Tztest.tztest + "the EMA reaches the vote threshold at the expected level and adaptive \ + issuance does not launch (vote disabled)" + `Quick + (test_does_not_launch_without_feature_flag + 1000000l (* This means that the threshold is set at 0.05% *) + 59l); + ] + +(* These tests have been unplugged because they are too long for the + CI (more than 3 minutes). For unit tests of the fact that the 80% + threshold can be reached by iteration of the EMA update function, + see ../unit/test_adaptive_issuance_ema.ml *) +let _unplugged_tests = + [ Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ issuance launches (realistic threshold, vote enabled)" @@ -481,13 +496,6 @@ let tests = (* This vote duration is consistent with the result of the unit test for this EMA in ../unit/test_adaptive_issuance_ema.ml*)); - Tztest.tztest - "the EMA reaches the vote threshold at the expected level and adaptive \ - issuance does not launch (very low threshold, vote disabled)" - `Quick - (test_does_not_launch_without_feature_flag - 1000000l (* This means that the threshold is set at 0.05% *) - 59l); Tztest.tztest "the EMA reaches the vote threshold at the expected level and adaptive \ issuance does not launch (realistic threshold, vote disabled)" -- GitLab