From 348dc88775fac78f5c1afa30c4f00d6d14dff592 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sun, 12 Feb 2017 23:07:52 +1100
Subject: Election counting now works, logging improved from Haskell version,
 still need to fix exhausted paper collection

---
 src/bundles.ads | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/bundles.ads')

diff --git a/src/bundles.ads b/src/bundles.ads
index a58a232..5a0c274 100644
--- a/src/bundles.ads
+++ b/src/bundles.ads
@@ -40,6 +40,12 @@ package Bundles is
         return Natural;
 
 
+    procedure Count_Both
+           (This   : in     Bundle;
+            Votes  :    out Natural;
+            Papers :    out Natural);
+
+
     function "<"
            (Left, Right : in Bundle)
         return Boolean;
-- 
cgit