1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
typedef int SLONG;
typedef char SCHAR;
typedef short SSHORT;
typedef char TEXT;
typedef long ISC_STATUS;
const SLONG gds_arg_string = 2;
const SLONG gds_sys_request = 335544373L;
enum jrd_blk_t
{
type_str, type_dcc, type_sbm, type_smb, type_blb, type_irb, type_jrn
};
struct blk
{
};
template < class RPT, SSHORT BLOCK_TYPE = 0 > class pool_alloc_rpt:public blk
{
};
class jrn:public pool_alloc_rpt < SCHAR, type_jrn >
{
public:ISC_STATUS * jrn_status_vector;
TEXT jrn_server[1];
};
typedef jrn *JRN;
extern void IBERR_build_status (ISC_STATUS *, ISC_STATUS, ...);
static void
error (ISC_STATUS * status_vector, JRN journal, int status, TEXT * string)
{
IBERR_build_status (status_vector, gds_sys_request, gds_arg_string, string,
gds_arg_string, (journal) ? journal->jrn_server : "",
0);
}
|
