In this chapter, we use Common Lisp to design and implement a
CORBA server using the LispWorks ORB. Our server presents an
object-oriented interface to a object and its accounts. Because
we want the bank's account records to persist beyond the
lifetime of the server, we would store the account records in a
database. This database could be manipulated by the server using
an SQL interface, such as that currently available with the
LispWorks product. Since the primary motivation for this
tutorial is to illustrate the use of CORBA, we simply simulate
the database using a hash table. It would be fairly easy to
replace this implementation with code that manipulates a real
database. The hash table simply uses a structure instance for
each row: (defstruct database-row name balance limit) In the
case of an account that does not allow an overdraft will be nil.