add gnc_lot_count_splits() function

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7033 57a11ea4-9604-0410-9ed3-97b8803252fd

src/engine/gnc-lot.c

@@ -169,6 +169,12 @@ gnc_lot_get_split_list (GNCLot *lot)
    return lot->splits;
 }
 
+gint gnc_lot_count_splits (GNCLot *lot)
+{
+   if (!lot) return 0;
+   return g_list_length (lot->splits);
+}
+
 /* ============================================================= */
 
 gnc_numeric

src/engine/gnc-lot.h

@@ -61,6 +61,7 @@ void gnc_lot_remove_split (GNCLot *, Split *);
  *    invalidate the returned pointer.
  */
 SplitList * gnc_lot_get_split_list (GNCLot *);
+gint gnc_lot_count_splits (GNCLot *);
 
 /* The gnc_lot_get_account() routine returns the account with which 
  *    this lot is associated. */