Listing negative balances

[hcoop/zz_old/portal.git] / balance.sig

diff --git a/balance.sig b/balance.sig
index 06726a5..e7f9bf5 100644 (file)
--- a/balance.sig
+++ b/balance.sig
@@ -10,6 +10,7 @@ sig
     val listOwnedBalances : unit -> balance list
     val listUnownedBalances : unit -> balance list
     val listBalanceUsers : int -> Init.user list
+    val listNegativeOwnedBalances : unit -> balance list
 
     val validBalanceName : string -> bool
     val balanceNameToId : string -> int option