#ifndef d2ada_HH
#define d2ada_HH

#define PUBLIC
#define PRIVATE static

/***********************************************************************
     "d2ada.hh": lotos Data language to ADA spec.
***********************************************************************/

/***********************************
  (C) Copyright 1993; dit/upm
   Distributed under the conditions stated in the
   TOPO General Public License (see file LICENSE)
 ***********************************
 $Log: d2ada.desc,v $
 * Revision 3.4  1995/01/17  09:57:19  lotos
 * dynamic table sizing
 *
 * Revision 3.3  1993/06/10  14:06:23  lotos
 * new annotation CALL
 *
 * 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;
} tPROG_FLAG;	/* program flag storage structure */

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

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

#endif
