tldm-universe/Ardent/UV/gcidir/include/exesave.h

73 lines
1.8 KiB
C
Raw Permalink Normal View History

2024-09-09 21:51:08 +00:00
#ifndef h_exesave
#define h_exesave
/******************************************************************************
*
* definitions for the symbolic debugger and execute
*
* Module %M% Version %I% Date %H%
*
* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
* This is unpublished proprietary source code of Ardent Software Inc.
* The copyright notice above does not evidence any actual or intented
* publication of such source code.
*
*******************************************************************************
*
* Maintenence log - insert most recent change descriptions at top
*
* Date.... GTAR# WHO Description.........................................
* 10/14/98 23801 SAP Change copyrights.
* 06/20/95 15958 CSM Remove TXDESC element from exesave structure
* 11/30/94 15166 GMM renamed stat structure member to exestat
* 07/21/94 14134 WLG Add TX_active to EXESAVE structure
* 11/02/92 10501 LPC Add opcode to EXESAVE structure
* 11/13/90 7643 JWT COL1 and COL2 should be part of EXESAVE structure
* 11/13/89 6143 JSM Initial implementation
*
*****************************************************************************/
#include "RUNDATA.h"
typedef struct exesel
{
int pass;
DATUM *in,
*out;
}EXESEL;
typedef struct exestuf
{
DATUM *in,
*out,
*exestat;
EXESEL select[NSELECT];
}EXESTUF;
typedef struct exesav
{
LAYER *layer;
int g_tab,
g_col1,
g_col2,
printon;
int errcode;
double holdstart;
ushort **gsbstack;
int ssptr;
RUNDATA Domain;
ushort *trap_stat;
ushort *trap_char;
ushort *pc;
ushort opcode;
int for_flag;
EXESTUF exe_master;
PROGRAM *prog;
int totmode;
STRING **chainstr;
DATUM **args;
int toplevel;
struct exesav *next;
} EXESAVE;
#endif /* end of exesave.h */