summaryrefslogtreecommitdiff
path: root/src/preference_arrays.ads.old
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2017-01-09 19:55:12 +1100
committerJed Barber <jjbarber@y7mail.com>2017-01-09 19:55:12 +1100
commit50adbf5cdf9ef6924c47b6738dfd6139d19a0438 (patch)
tree31331251c0b40203ef4cda0b63b1c9d6ffa3b671 /src/preference_arrays.ads.old
parentbc0a9edd47dad7a0bf7df26941a0d870c0c3d0ad (diff)
Moved old code to separate directory
Diffstat (limited to 'src/preference_arrays.ads.old')
-rw-r--r--src/preference_arrays.ads.old38
1 files changed, 0 insertions, 38 deletions
diff --git a/src/preference_arrays.ads.old b/src/preference_arrays.ads.old
deleted file mode 100644
index c8245e0..0000000
--- a/src/preference_arrays.ads.old
+++ /dev/null
@@ -1,38 +0,0 @@
-
-
-with Interfaces.C;
-with System;
-
-
-package Preference_Arrays is
-
-
- function Create_Preference_Array
- (Number_Of_Ballots, Size_Of_Ballot : in Interfaces.C.int)
- return System.Address;
- pragma Export (C, Create_Preference_Array, "create_pref_array");
-
-
- procedure Free_Preference_Array
- (Number_Of_Ballots, Size_Of_Ballot : in Interfaces.C.int;
- Pref_Array_Address : in System.Address);
- pragma Export (C, Free_Preference_Array, "free_pref_array");
-
-
- procedure Poke_Preference_Array
- (Number_Of_Ballots, Size_Of_Ballot : in Interfaces.C.int;
- Pref_Array_Address : in System.Address;
- Ballot_Index, Box_Number, Rank : in Interfaces.C.int);
- pragma Export (C, Poke_Preference_Array, "poke_pref_array");
-
-
- function Peek_Preference_Array
- (Number_Of_Ballots, Size_Of_Ballot : in Interfaces.C.int;
- Pref_Array_Address : in System.Address;
- Ballot_Index, Box_Number, Rank : in Interfaces.C.int)
- return Interfaces.C.int;
- pragma Export (C, Peek_Preference_Array, "peek_pref_array");
-
-
-end Preference_Arrays;
-