commit ce9e856c25494a74933d222e3ca38fda626bf688
parent a6ade832418011bc15e275ae2c69b445d837d9f0
Author: Vint Leenaars <vl.software@leenaa.rs>
Date: Wed, 7 May 2025 11:08:19 +0200
Re-order tests
Diffstat:
1 file changed, 20 insertions(+), 19 deletions(-)
diff --git a/test/Tests/Check.hs b/test/Tests/Check.hs
@@ -143,26 +143,28 @@ personTests :: Map Int Individual -> TestTree
personTests sanction_list =
testGroup "Individuals"
[ testGroup "Known Sanctioned"
- {- testTarget False SSID target_SSID sanction_list $ distribution ADDRESS DATE ID NAME NATIONALITY CONFIDENCE
- MAX_SCORE 150 100 200 125 50 0.75 -}
- [ testTarget False 5144 target_5144 sanction_list $ distribution 125 100 0 125 0 0.9
- , testTarget False 5266 target_5266 sanction_list $ distribution 0 0 0 125 0 0.5
-
+ {- testTarget False SSID target_SSID sanction_list $ distribution ADDRESS DATE ID NAME NATIONALITY CONFIDENCE
+ MAX_SCORE 150 100 200 125 50 0.75 -}
+ [ testTarget False 5144 target_5144 sanction_list $ distribution 125 100 0 125 0 0.9
+ , testTarget False 5266 target_5266 sanction_list $ distribution 0 0 0 125 0 0.5
+ , testTarget False 43462 target_43462 sanction_list $ distribution 0 100 0 125 0 0.75
+ , testTarget False 43616 target_43616 sanction_list $ distribution 0 0 0 125 0 0.75
+ , testTarget False 43641 target_43641 sanction_list $ distribution 0 100 0 125 0 0.75
+ , testTarget False 43718 target_43718 sanction_list $ distribution 0 100 0 125 0 0.75
+ , testTarget False 43662 target_43662 sanction_list $ distribution 0 100 0 125 0 0.75
+ , testTarget False 43611 target_43611 sanction_list $ distribution 0 0 0 125 0 0.75
+ , testTarget False 29723 target_29723 sanction_list $ distribution 0 100 0 125 0 0.75
+ , testTarget False 68815 target_68815 sanction_list $ distribution 75 100 0 125 50 0.75
+
+ {- testTargetVersions False SSID sanction_list $
+ , (target_SSID_vN, " vN", distribution ADDRESS DATE ID NAME NATIONALITY CONFIDENCE -}
, testTargetVersions False 49816 sanction_list $
- [ (target_49816_v1, " v1", distribution 0 100 0 125 0 0.75)
- , (target_49816_v2, " v2", distribution 0 100 0 0 0 0 )
- , (target_49816_v3, " v3", distribution 0 0 0 0 0 0 )
- , (target_49816_v4, " v4", distribution 0 100 0 125 0 0.75)
+ [ (target_49816_v1, " v1", distribution 0 100 0 125 0 0.75)
+ , (target_49816_v2, " v2", distribution 0 100 0 0 0 0 )
+ , (target_49816_v3, " v3", distribution 0 0 0 0 0 0 )
+ , (target_49816_v4, " v4", distribution 0 100 0 125 0 0.75)
]
- , testTarget False 43462 target_43462 sanction_list $ distribution 0 100 0 125 0 0.75
- , testTarget False 43616 target_43616 sanction_list $ distribution 0 0 0 125 0 0.75
- , testTarget False 43641 target_43641 sanction_list $ distribution 0 100 0 125 0 0.75
- , testTarget False 43718 target_43718 sanction_list $ distribution 0 100 0 125 0 0.75
- , testTarget False 43662 target_43662 sanction_list $ distribution 0 100 0 125 0 0.75
- , testTarget False 43611 target_43611 sanction_list $ distribution 0 0 0 125 0 0.75
- , testTarget False 29723 target_29723 sanction_list $ distribution 0 100 0 125 0 0.75
-
, testTargetVersions False 38925 sanction_list $
[ (target_38925_v1, " v1", distribution 100 0 0 0 0 0.75) -- Only address
, (target_38925_v2, " v2", distribution 0 0 0 125 0 0 ) -- Only name
@@ -171,13 +173,12 @@ personTests sanction_list =
, (target_38925_v5, " v5", distribution 100 100 0 0 0 0.75) -- Address + birthdate
]
- , testTarget False 68815 target_68815 sanction_list $ distribution 75 100 0 125 50 0.75
]
, testGroup "Fake target with XML file"
{- testFakeTarget False SSID target_SSID sanction_list $ distribution ADDRESS DATE ID NAME NATIONALITY CONFIDENCE
150 100 200 125 50 0.75 -}
- [ testFakeTarget False 6 target_6 sanction_list $ distribution 0 100 0 125 0 0.75
+ [ testFakeTarget False 6 target_6 sanction_list $ distribution 0 100 0 125 0 0.75
]
, testGroup "Public and imaginary figures"