Hello, every one

Does anybody know how to translate an Union in a C code to Pascal? Please see the following codes in C (from source of gedit 2.0.2):

struct _GeditUndoAction
{

	GeditUndoActionType action_type;

	union {
		GeditUndoInsertAction	insert;
		GeditUndoDeleteAction   delete;
	} action;
	gboolean mergeable;
	gint order_in_group;
};

I want to translate it to Pascal, but I don't know how to handle the union Action in it.

Thank you very much.
mili

A union is the same as a variant record. Here's a possible translation:

type
   TAction = record
     case byte of
       1: (insert: GeditUndoInsertAction);
       2: (delete: GeditUndoDeleteAction);
   end;
   T_GeditUndoAction = record
     action_type: GeditUndoActionType;
     action: TAction;
     mergeable: gboolean;
     order_in_group: gint;
   end;

Jonas

milimeter wrote

Does anybody know how to translate an Union in a C code to Pascal?

A 'case' variant of a record should be a good equivalent.

Adam Naumowicz

====================================================================== Department of Applied Logic fax. +48 (85) 745-7662 Institute of Computer Science tel. +48 (85) 745-7559 (office) University of Bialystok e-mail:
Sosnowa 64, 15-887 Bialystok, Poland http://math.uwb.edu.pl/~adamn/ ======================================================================