#ifndef _TMACROX_H_

#define _TMACROX_H_

#ifndef FUNCPROTO

#define FUNCPROTO 0xFF

#endif

#include <xm xm.h=""></xm>

#include <xm bulletinb.h=""></xm>

#include <xm frame.h=""></xm>

#include "tmacro.h"

/*---------------------------------------------------------------------------*/

#if XtSpecificationRelease >= 5

typedef int xargc_t;

#else

typedef unsigned int xargc_t;

#endif

/*---------------------------------------------------------------------------*/

/* macro per la gestione delle liste di argomenti */

#define TX_ARG_VARS(num) \

	Cardinal TxArgN = 0; \

	Arg TxArgs[num]

#define TX_ADD_ARG(resource, value)                                     \

	{                                                                   \

		if (TxArgN >= sizeof(TxArgs) / sizeof(Arg)) {                   \

			fprintf(stderr, "TX_ADD_ARG error in file %s at line %d\n", \

					__FILE__, __LINE__);                                \

			abort();                                                    \

		}                                                               \

		XtSetArg(TxArgs[TxArgN], resource, value);                      \

		TxArgN++;                                                       \

	}

#define TX_RESET_ARGS TxArgN = 0;

#define TX_ARGS TxArgs, TxArgN

#define TX_N_ARGS TxArgN

/*---------------------------------------------------------------------------*/

/* macro per la gestione dei form */

/* nota: l'attachment che e' widget o form a seconda che il widget ci sia o no

   e' una correzione veloce per lesstif (linux) che scrive un warning,

   ma andrebbe lasciato solo di tipo XmATTACH_WIDGET e corretto il codice

   che usa la macro sbagliata

*/

#define TX_ADD_LEFT_FORM(offset)                      \

	{                                                 \

		TX_ADD_ARG(XmNleftAttachment, XmATTACH_FORM); \

		TX_ADD_ARG(XmNleftOffset, offset)             \

	}

#define TX_ADD_LEFT_WIDGET(widget, offset)                                       \

	{                                                                            \

		TX_ADD_ARG(XmNleftAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \

		TX_ADD_ARG(XmNleftWidget, widget);                                       \

		TX_ADD_ARG(XmNleftOffset, offset)                                        \

	}

#define TX_ADD_LEFT_OPPOSITE(widget, offset)                     \

	{                                                            \

		TX_ADD_ARG(XmNleftAttachment, XmATTACH_OPPOSITE_WIDGET); \

		TX_ADD_ARG(XmNleftWidget, widget);                       \

		TX_ADD_ARG(XmNleftOffset, offset)                        \

	}

#define TX_ADD_RIGHT_FORM(offset)                      \

	{                                                  \

		TX_ADD_ARG(XmNrightAttachment, XmATTACH_FORM); \

		TX_ADD_ARG(XmNrightOffset, offset)             \

	}

#define TX_ADD_RIGHT_WIDGET(widget, offset)                                       \

	{                                                                             \

		TX_ADD_ARG(XmNrightAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \

		TX_ADD_ARG(XmNrightWidget, widget);                                       \

		TX_ADD_ARG(XmNrightOffset, offset)                                        \

	}

#define TX_ADD_RIGHT_OPPOSITE(widget, offset)                     \

	{                                                             \

		TX_ADD_ARG(XmNrightAttachment, XmATTACH_OPPOSITE_WIDGET); \

		TX_ADD_ARG(XmNrightWidget, widget);                       \

		TX_ADD_ARG(XmNrightOffset, offset)                        \

	}

#define TX_ADD_TOP_FORM(offset)                      \

	{                                                \

		TX_ADD_ARG(XmNtopAttachment, XmATTACH_FORM); \

		TX_ADD_ARG(XmNtopOffset, offset)             \

	}

#define TX_ADD_TOP_WIDGET(widget, offset)                                       \

	{                                                                           \

		TX_ADD_ARG(XmNtopAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \

		TX_ADD_ARG(XmNtopWidget, widget);                                       \

		TX_ADD_ARG(XmNtopOffset, offset)                                        \

	}

#define TX_ADD_TOP_OPPOSITE(widget, offset)                     \

	{                                                           \

		TX_ADD_ARG(XmNtopAttachment, XmATTACH_OPPOSITE_WIDGET); \

		TX_ADD_ARG(XmNtopWidget, widget);                       \

		TX_ADD_ARG(XmNtopOffset, offset)                        \

	}

#define TX_ADD_BOTTOM_FORM(offset)                      \

	{                                                   \

		TX_ADD_ARG(XmNbottomAttachment, XmATTACH_FORM); \

		TX_ADD_ARG(XmNbottomOffset, offset)             \

	}

#define TX_ADD_BOTTOM_WIDGET(widget, offset)                                       \

	{                                                                              \

		TX_ADD_ARG(XmNbottomAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \

		TX_ADD_ARG(XmNbottomWidget, widget);                                       \

		TX_ADD_ARG(XmNbottomOffset, offset)                                        \

	}

#define TX_ADD_BOTTOM_OPPOSITE(widget, offset)                     \

	{                                                              \

		TX_ADD_ARG(XmNbottomAttachment, XmATTACH_OPPOSITE_WIDGET); \

		TX_ADD_ARG(XmNbottomWidget, widget);                       \

		TX_ADD_ARG(XmNbottomOffset, offset)                        \

	}

/*---------------------------------------------------------------------------*/

/* macro per actions e translations */

#define TX_ADD_ACTIONS(w, action_table)              \

	XtAppAddActions(XtWidgetToApplicationContext(w), \

					(action_table), XtNumber(action_table));

#define TX_OVERRIDE_TRANSLATIONS(w, translation_table) \

	XtOverrideTranslations((w), XtParseTranslationTable(translation_table));

#define TX_ADD_ACTIONS_AND_TRANSLATIONS(w, action_table, translation_table) \

	{                                                                       \

		TX_ADD_ACTIONS((w), (action_table))                                 \

		TX_OVERRIDE_TRANSLATIONS((w), (translation_table))                  \

	}

#endif