diff options
author | Jed Barber <jjbarber@y7mail.com> | 2017-07-05 22:12:59 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2017-07-05 22:12:59 +1000 |
commit | 36a5b38d4602aab2ab8607069282afc7ce0c392b (patch) | |
tree | 8907ed02fce539bd6e4ca6e9f27cb46899729195 /src/stv.adb | |
parent | 52eb6622ee81c50dd41cfbc8ba53cc210c0e9b1e (diff) |
Removed extraneous Candidate_Range type in Bundles.Containers
Diffstat (limited to 'src/stv.adb')
-rw-r--r-- | src/stv.adb | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/stv.adb b/src/stv.adb index 29b18c9..20b5b29 100644 --- a/src/stv.adb +++ b/src/stv.adb @@ -237,9 +237,6 @@ begin -- Set up and run the election singleton declare - subtype Valid_CandidateID is Candidates.CandidateID - range Candidate_Data.First_Index .. Candidate_Data.Last_Index; - package Given_Prefs is new Preferences (Above_Ballot => Above_Ballot, Below_Ballot => Below_Ballot); @@ -248,7 +245,8 @@ begin (Given_Prefs => Given_Prefs); package Vote_Bundle_Containers is new Vote_Bundles.Containers - (Candidate_Range => Valid_CandidateID); + (Min_Valid => Candidate_Data.First_Index, + Max_Valid => Candidate_Data.Last_Index); package This_Election is new Election (Given_Bundles => Vote_Bundles, |