WebSVN – tendra.SVN – Diff – /trunk/src/installers/common/diag/diagtypes.h

+/*
+ * Copyright (c) 2002-2005 The TenDRA Project <http://www.tendra.org/>.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ *    this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ *    this list of conditions and the following disclaimer in the documentation
+ *    and/or other materials provided with the distribution.
+ * 3. Neither the name of The TenDRA Project nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific, prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS
+ * IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
+ * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
+ * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
+ * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+ * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
+ * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * $Id$
+ */
 /*
     		 Crown Copyright (c) 1997
     This TenDRA(r) Computer Program is subject to Copyright
     owned by the United Kingdom Secretary of State for Defence
     acting through the Defence Evaluation and Research Agency
     (DERA).  It is made available to Recipients with a
     royalty-free licence for its use, reproduction, transfer
     to other parties and amendment for any purpose not excluding
     product development provided that any such use et cetera
     shall be deemed to be acceptance of the following conditions:-
         (1) Its Recipients shall ensure that this Notice is
         reproduced upon any copies or amended versions of it;
         (2) Any amended version of it shall be clearly marked to
         show both the nature of and the organisation responsible
         for the relevant amendment or amendments;
         (3) Its onward transfer from a recipient to another
         party shall be deemed to be that party's acceptance of
         these conditions;
         (4) DERA gives no warranty or assurance as to its
         quality or suitability for any purpose and DERA accepts
         no liability whatsoever in relation to any use to which
         it may be put.
 */
 #ifndef diagtypes_key
 #define diagtypes_key 1
 #ifdef NEWDIAGS
 typedef dg_name diag_descriptor;
 typedef dg_name_list diag_descriptor_list;
 typedef dg_name_list diag_unit;
 typedef dg_tag diag_tag;
 typedef dgtag_struct diag_tagdef;
 typedef dg_classmem diag_field;
 typedef dg_classmem_list diag_field_list;
 typedef int diag_tq;
 typedef dg_filename filename;
 typedef dg_sourcepos sourcemark;
 typedef int diag_type_unit;
 #else
 				/* temp hacsk to check syntax */
 				/* end hacks */
 				/* dummy defs of lists */
 				/* end dummy defs */
 				/* forward defns for compiler pacification */
 #include "diagtypes1.h"
-				/* end forward defns */
-struct filename_t
-{
-  nat		date;
-  tdfstring	machine;
-  tdfstring	file;
+				/* end forward defns */
-};
-typedef	struct sourcemark_t
+struct filename_t {
+	nat		date;
+	tdfstring	machine;
+	tdfstring	file;
+};
-{
+typedef	struct sourcemark_t {
-  filename	file;
+	filename	file;
-  nat		line_no;
+	nat		line_no;
-  nat		char_off;
+	nat		char_off;
 } sourcemark;
-struct enum_values_t
+struct enum_values_t {
-{
-  exp		val;
+	exp		val;
-  tdfstring	nme;
+	tdfstring	nme;
 };
-typedef struct enum_values_t *	enum_values;
+typedef struct enum_values_t *enum_values;
-struct enum_values_list_t
-{
-  int		len;
-  int		lastused;
-  enum_values *		array;
-};
-typedef struct enum_values_list_t *	enum_values_list;
-struct diag_field_t
-{
-  tdfstring	field_name;
-  exp		where;
-  diag_type	field_type;
-};
-typedef struct diag_field_t *diag_field;
-struct diag_field_list_t
-{
-  int		len;
-  int		lastused;
-  diag_field *	array;
-};
-typedef struct diag_field_list_t *	diag_field_list;
+struct enum_values_list_t {
+	int		len;
+	int		lastused;
+	enum_values	*array;
+};
+typedef struct enum_values_list_t *enum_values_list;
+struct diag_field_t {
+	tdfstring	field_name;
+	exp		where;
+	diag_type	field_type;
+};
+typedef struct diag_field_t *diag_field;
-struct diag_type_list_t
+struct diag_field_list_t {
+	int		len;
+	int		lastused;
+	diag_field	*array;
+};
+typedef struct diag_field_list_t *diag_field_list;
-{
+struct diag_type_list_t {
-  int		len;
+	int		len;
-  int		lastused;
+	int		lastused;
-  diag_type 		*array;
+	diag_type 		*array;
 };
 typedef struct diag_type_list_t *diag_type_list;
-typedef struct
+typedef struct {
-{
-  unsigned	is_const:1;
+	unsigned	is_const:1;
-  unsigned	is_volatile:1;
+	unsigned	is_volatile:1;
 } diag_tq;
 typedef tdfint diag_tag;
-struct diag_tagdef_t
+struct diag_tagdef_t {
-{
-  diag_tag	d_tag;
+	diag_tag	d_tag;
-  char        *	ext_name;
+	char        	*ext_name;
-  diag_type	d_type;
+	diag_type	d_type;
 };
 typedef struct diag_tagdef_t diag_tagdef;
-typedef enum
+typedef enum {
-{
-  DIAG_TYPE_UNINIT,
+	DIAG_TYPE_UNINIT,
-  DIAG_TYPE_ARRAY,
+	DIAG_TYPE_ARRAY,
-  DIAG_TYPE_BITFIELD,
+	DIAG_TYPE_BITFIELD,
-  DIAG_TYPE_ENUM,
+	DIAG_TYPE_ENUM,
-  DIAG_TYPE_FLOAT,
+	DIAG_TYPE_FLOAT,
-  DIAG_TYPE_LOC,
+	DIAG_TYPE_LOC,
-  DIAG_TYPE_PROC,
+	DIAG_TYPE_PROC,
-  DIAG_TYPE_PTR,
+	DIAG_TYPE_PTR,
-  DIAG_TYPE_STRUCT,
+	DIAG_TYPE_STRUCT,
-  DIAG_TYPE_NULL,
+	DIAG_TYPE_NULL,
-  DIAG_TYPE_UNION,
+	DIAG_TYPE_UNION,
-  DIAG_TYPE_VARIETY,
+	DIAG_TYPE_VARIETY,
-  DIAG_TYPE_INITED
+	DIAG_TYPE_INITED
 } diag_type_key;
-struct diag_type_t
+struct diag_type_t {
-{
-  diag_type_key	key;
+	diag_type_key	key;
-  OUTPUT_REC been_outed;
+	OUTPUT_REC been_outed;
-  union
+	union {
-  {
-    struct
+		struct {
-    {
-      diag_type		element_type;
+			diag_type		element_type;
-      exp		stride;
+			exp			stride;
-      exp		lower_b;
+			exp			lower_b;
-      exp		upper_b;
+			exp			upper_b;
-      diag_type		index_type;
+			diag_type		index_type;
-    } array;
+		} array;
-    struct
+		struct {
-    {
-      diag_type		result_type;
+			diag_type		result_type;
-      nat		no_of_bits;
+			nat			no_of_bits;
-    } bitfield;
+		} bitfield;
-    struct
+		struct {
-    {
-      diag_type		base_type;
+			diag_type		base_type;
-      tdfstring		nme;
+			tdfstring		nme;
-      enum_values_list	values;
+			enum_values_list	values;
-    } t_enum;
+		} t_enum;
-    floating_variety	f_var;
+		floating_variety		f_var;
-    struct
+		struct {
-    {
-      diag_type		object;
+			diag_type		object;
-      diag_tq		qualifier;
+			diag_tq			qualifier;
-    } loc;
+		} loc;
-    struct
+		struct {
-    {
-      diag_type_list	params;
+			diag_type_list		params;
-      bool 		opt_args;
+			bool 			opt_args;
-      diag_type		result_type;
+			diag_type		result_type;
-    } proc;
+		} proc;
-    struct
+		struct {
-    {
-      diag_type		object;
+			diag_type		object;
-      diag_tq		qualifier;
+			diag_tq			qualifier;
-    } ptr;
+		} ptr;
-    struct
+		struct {
-    {
-      shape		tdf_shape;
+			shape			tdf_shape;
-      tdfstring		nme;
+			tdfstring		nme;
-      diag_field_list fields;
+			diag_field_list 	fields;
-    } t_struct;
+		} t_struct;
-    struct
+		struct {
-    {
-      shape		tdf_shape;
+			shape			tdf_shape;
-      tdfstring		nme;
+			tdfstring		nme;
-      diag_field_list fields;
+			diag_field_list 	fields;
-    } t_union;
+		} t_union;
-    variety		var;
+		variety		var;
-  } data;
+	} data;
 };
-typedef enum
+typedef enum {
-{
-  DIAG_UNINIT,
+	DIAG_UNINIT,
-  DIAG_ID_KEY,
+	DIAG_ID_KEY,
-  DIAG_STRUCT_KEY,
+	DIAG_STRUCT_KEY,
-  DIAG_TYPEDEF_KEY
+	DIAG_TYPEDEF_KEY
 } diag_desc_key;
-typedef struct diagdef_t
+typedef struct diagdef_t {
-{
-  diag_desc_key 	key;
+	diag_desc_key 	key;
-  char * 		ext_name;
+	char		*ext_name;
-  union
+	union {
-  {
-    struct
+		struct {
-    {
-      tdfstring 	nme;
+			tdfstring 	nme;
-      diag_type 	new_type;
+			diag_type 	new_type;
-      sourcemark 	whence;
+			sourcemark 	whence;
-      exp		access;
+			exp		access;
-    } id;
+		} id;
-    struct
+		struct {
-    {
-      tdfstring 	nme;
+			tdfstring 	nme;
-      diag_type		new_type;
+			diag_type	new_type;
-      sourcemark 	whence;
+			sourcemark 	whence;
-    } struc;
+		} struc;
-    struct
+		struct {
-    {
-      tdfstring		nme;
+			tdfstring	nme;
-      diag_type		new_type;
+			diag_type	new_type;
-      sourcemark 	whence;
+			sourcemark 	whence;
-    } typ;
+		} typ;
-  } data;
+	} data;
 } diagdef;
 				/* diag_descriptor is in diagtypes1.h */
-typedef struct diag_unit_t
+typedef struct diag_unit_t {
-{
-  int		len;
+	int		len;
-  int		lastused;
+	int		lastused;
-  diag_descriptor *	array;
+	diag_descriptor *array;
 } diag_unit;
 typedef diag_unit diag_descriptor_list;
 typedef int diag_type_unit;
 #include "diaginfo.h"
 #endif
 #endif

Subversion Repositories tendra.SVN

(root)/trunk/src/installers/common/diag/diagtypes.h – Rev 2 → 7