


    /* EPC Imp to C Translation Release 4 Version Apr 95 */


#include "imptoc.h"

/* Copyright (c) 1991, Edinburgh Portable Compilers Ltd. All Rights Reserved  */
/*                                                                           */
/*                                                                  dwarf3.inc*/
/** 23/06/93 Move Dwarfproducer from elfput into this file(pds)              */
/*                                                                 dwarf2.inc*/
/** 23/04/93  add   ATEPCPrologue         (pds)                              */
/*                                                            dwarfimp1.inc  */
/** 09/03/93  add    ATprogram = (16_0230!FORMSTRING)                        */	/*gm from sl variant*/
/*                                                                           */
/* dwarfimp.inc    Sun Feb  9 12:55:43 EST 1992                              */
/*                                                                           */
/* Derived automatically from ./dwarf.h by lawrence                          */
/* using deriveimp                                                           */
 
#define tagpadding (0x0)
#define tagarraytype (0x1)
#define tagclasstype (0x2)
#define tagentrypoint (0x3)
#define tagenumerationtype (0x4)
#define tagformalparameter (0x5)
#define tagglobalsubroutine (0x6)
#define tagglobalvariable (0x7)
#define tagimporteddeclaration (0x8)
#define taginlinesubroutine (0x9)
#define taglabel (0xA)
#define taglexicalblock (0xB)
#define taglocalvariable (0xC)
#define tagmember (0xD)
#define tagmemberfunction (0xE)
#define tagpointertype (0xF)
#define tagreferencetype (0x10)
#define tagcompileunit (0x11)
#define tagsourcefile (0x11)
#define tagstringtype (0x12)
#define tagstructuretype (0x13)
#define tagsubroutine (0x14)
#define tagsubroutinetype (0x15)
#define tagtypedef (0x16)
#define taguniontype (0x17)
#define tagunspecifiedparameters (0x18)
#define tagvariant (0x19)
#define tagformat (0x20)
#define tagwithstmt (0x21)
#define tagsettype (0x22)
#define tagcommonblock (0x1A)
#define tagcommoninclusion (0x1B)
#define taglouser (0x8000)
#define taghiuser (0xFFFF)
#define formnone (0x0)
#define formaddr (0x1)
#define formref (0x2)
#define formblock2 (0x3)
#define formblock4 (0x4)
#define formdata2 (0x5)
#define formdata4 (0x6)
#define formdata8 (0x7)
#define formstring (0x8)
#define atpadding ((0x0|formnone))
#define atsibling ((0x10|formref))
#define atlocation ((0x20|formblock2))
#define atname ((0x30|formstring))
#define atfundtype ((0x50|formdata2))
#define atmodfundtype ((0x60|formblock2))
#define atuserdeftype ((0x70|formref))
#define atmodudtype ((0x80|formblock2))
#define atordering ((0x90|formdata2))
#define atsubscrdata ((0xA0|formblock2))
#define atbytesize ((0xB0|formdata4))
#define atbitoffset ((0xC0|formdata2))
#define atbitsize ((0xD0|formdata4))
#define atderivlist ((0xE0|formblock2))
#define atelementlist ((0xF0|formblock4))
#define atstmtlist ((0x100|formdata4))
#define atlowpc ((0x110|formaddr))
#define athighpc ((0x120|formaddr))
#define atepcprologue (0x8150|formaddr)
#define atlanguage ((0x130|formdata4))
#define atmember ((0x140|formref))
#define atdiscr ((0x150|formref))
#define atdiscrvalue ((0x160|formblock2))
#define atvisibility ((0x170|formdata2))
#define atimport ((0x180|formref))
#define atstringlength ((0x190|formblock2))
#define atcommonreference ((0x1A0|formref))
#define atcompdir ((0x1B0|formstring))
#define atloclist ((0x1C0|formdata4))
#define atframebase ((0x1D0|formdata4))
#define atincomplete ((0x1E0|formdata2))
#define atstartscope ((0x1F0|formdata4))
#define atstridesize ((0x200|formdata4))
#define atprogram ((0x230|formstring))
#define atproducer ((0x250|formstring))
#define atlouser (0x2000)
#define athiuser (0x3FF0)
#define opunk (0x0)
#define opreg (0x1)
#define opbasereg (0x2)
#define opaddr (0x3)
#define opconst (0x4)
#define opderef2 (0x5)
#define opderef4 (0x6)
#define opadd (0x7)
#define ftchar (0x1)
#define ftsignedchar (0x2)
#define ftunsignedchar (0x3)
#define ftshort (0x4)
#define ftsignedshort (0x5)
#define ftunsignedshort (0x6)
#define ftinteger (0x7)
#define ftsignedinteger (0x8)
#define ftunsignedinteger (0x9)
#define ftlong (0xA)
#define ftsignedlong (0xB)
#define ftunsignedlong (0xC)
#define ftpointer (0xD)
#define ftfloat (0xE)
#define ftdblprecfloat (0xF)
#define ftextprecfloat (0x10)
#define ftcomplex (0x11)
#define ftdblpreccomplex (0x12)
#define ftboolean (0x13)
#define ftvoid (0x14)
#define ftlouser (0x8000)
#define modnone (0x0)
#define modpointerto (0x1)
#define modreferenceto (0x2)
#define modconst (0x3)
#define modvolatile (0x4)
#define modlouser (0x80)
#define modhiuser (0xFF)
#define vislocal (0x0)
#define visexported (0x1)
#define vislouser (0x80)
#define vishiuser (0xFF)
#define ordrowmajor 0
#define ordcolmajor 1
#define fmtftcc (0x0)
#define fmtftcx (0x1)
#define fmtftxc (0x2)
#define fmtftxx (0x3)
#define fmtutcc (0x4)
#define fmtutcx (0x5)
#define fmtutxc (0x6)
#define fmtutxx (0x7)
#define fmtet (0x8)
#define langnone (0x0)
#define langc89 (0x1)
#define langc (0x2)
#define langcplusplus (0x3)
#define langfortran77 (0x4)
#define langfortran90 (0x5)
#define langpascal83 (0x6)
#define langmodula2 (0x7)
#define langada83 (0x8)
#define langcobol74 (0x9)
#define langcobol85 (0x10)
#define langlouser (0x8000)
#define langhiuser (0xFFFF)
#define parmvar (0x1)
#define parmvalue (0x2)
 
/*                                                                           */
/* select which part of the compiler does the dwarf production               */
/*                                                                           */
#define frontend 1
#define backend 2
#define PUT 3
 
#define dwarfproducer PUT
 
#define debugwithedb 1
#define debugwithsdb 2
#define debuggertype debugwithedb

/* end of automatic translation */

