(loan_owed): New, factored out common code.

(coll, fina, repa, shark, disloan): Use it.
This commit is contained in:
Markus Armbruster 2004-08-20 11:46:01 +00:00
parent 2feef76102
commit d1bf11a015

View file

@ -79,6 +79,7 @@ extern int trade_desc(struct trdstr *, union trdgenstr *);
extern int trade_getitem(struct trdstr *, union trdgenstr *);
extern long get_couval(int);
extern long get_outstand(int);
extern double loan_owed(struct lonstr *loan, time_t paytime);
#define gettrade(n, p) \
ef_read(EF_TRADE, n, (caddr_t)p)