#ifndef __TclDatabaseObjectWrapper_h_
#define __TclDatabaseObjectWrapper_h_

#include <tcl.h>

#include "../shared/DatabaseWithRetry.h"
#include "NamedReference.h"


/* This API allows TCL programmers to access the database.  Pointers to the
 * database and pointers to the database results are wrapped in a
 * NamedReference. 
 *
 * This unit replaces TclDatabaseWrapper.[Ch].  That had mostly the same
 * functionality, but the pointers were stored in TCL commands.  The user
 * had to remember to delete the commands or there would be a memory leak.
 */

namespace TclDatabaseObjectWrapper
{

  void addStandardDatabases(Tcl_Interp *interp);
  void addStandardCommands(Tcl_Interp *interp);
  
}


#endif