#ifndef d2ada_b_HH
#define d2ada_b_HH

#define PUBLIC
#define PRIVATE static

/***********************************************************************
     "d2ada_b.hh": lotos Data language to ADA Body.
***********************************************************************/

/***********************************
  (C) Copyright 1993; dit/upm
   Distributed under the conditions stated in the
   TOPO General Public License (see file LICENSE)
 ***********************************
 $Log: d2ada_b.desc,v $
 * Revision 3.3  1995/01/17  09:57:38  lotos
 * dynamic table sizing
 *
 * Revision 3.2  1993/05/28  10:58:04  lotos
 * comentarios por niveles
 *
 * Revision 3.1  1993/05/25  11:08:41  lotos
 * new release
 *
 ***********************************/

#include "dtok.hh"
#include "adalng.hh"


typedef struct
{ int put_help;
  int add_cmt;
  int indt_incr;
  int splt_pics;
  char *splt_prfx;
  int full_clng;
  char *spec_file;
} tPROG_FLAG;	/* program flag storage structure */

/* program name */
#ifndef d2ada_b_IMP
extern	char *prog_name;
#else
	char *prog_name= NULL;
#endif

/* program flag storage */
#ifndef d2ada_b_IMP
extern	tPROG_FLAG prog_flag;
#else
	tPROG_FLAG prog_flag= { FALSE, 0, 0, 0, NULL, FALSE, NULL };
#endif

#endif
