mirror of
https://github.com/open-simh/simtools.git
synced 2026-04-28 20:57:22 +00:00
35 lines
815 B
C
35 lines
815 B
C
/* Descrip.h v1.2 Definitions for descriptors */
|
|
|
|
/*
|
|
This is part of ODS2 written by Paul Nankervis,
|
|
email address: Paulnank@au1.ibm.com
|
|
|
|
ODS2 is distributed freely for all members of the
|
|
VMS community to use. However all derived works
|
|
must maintain comments in their source to acknowledge
|
|
the contibution of the original author.
|
|
*/
|
|
|
|
|
|
#if defined(VMS) && !defined(__GNUC__)
|
|
|
|
#include <descrip.h>
|
|
|
|
#else
|
|
|
|
#ifndef DSC$K_DTYPE_T
|
|
#define DSC$K_DTYPE_T 0
|
|
#define DSC$K_CLASS_S 0
|
|
|
|
struct dsc$descriptor {
|
|
unsigned short dsc$w_length;
|
|
unsigned char dsc$w_type;
|
|
unsigned char dsc$w_class;
|
|
char *dsc$a_pointer;
|
|
};
|
|
|
|
#define $DESCRIPTOR(string,name) struct dsc$descriptor name = {sizeof(sring)-1,0,0,string};
|
|
|
|
#endif
|
|
#endif
|