73 lines
1.8 KiB
C
Executable File
73 lines
1.8 KiB
C
Executable File
#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 */
|