/* * * OBJFMT -- "EVAX" IDC - random entity ident consistency check */ #ifndef _EIDCDEF_H #define _EIDCDEF_H /*Match control values */ #define EIDC$C_LEQ 0 #define EIDC$C_EQUAL 1 struct eidcdef { unsigned short eidc$w_gsdtyp; /* type field */ unsigned short eidc$w_size; /* size of this EIDCDEF */ union { unsigned long eidc$l_flags; /* flags */ struct { unsigned eidc$v_binident : 1; /* ident is binary longword rather than ASCIC */ unsigned eidc$v_idmatch : 2; /* field for ident match control if binary ident */ unsigned eidc$v_errsev : 3; /* error severity (default is warning-0) */ unsigned : 2; unsigned : 24; /* padding */ } eidc$r_flags_bits; } eidc$r_flags_overlay; union { unsigned char eidc$b_namlng; /* length of entity name */ struct { unsigned : 8; /* char fill; */ char eidc$t_name[1]; /* followed by entity name followed by byte of length of name of object followed by the object name followed by byte of ident length ident string (length = string length) or ident binary value (length = 4) */ } eidc$r_namlng_fields; } eidc$r_namlng_overlay; }; #endif /*_EIDCDEF_H*/