File: ce_init.c

package info (click to toggle)
fis-gtm 7.1-006-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 32,908 kB
  • sloc: ansic: 344,906; asm: 5,184; csh: 4,859; sh: 2,000; awk: 294; makefile: 73; sed: 13
file content (41 lines) | stat: -rwxr-xr-x 978 bytes parent folder | download | duplicates (7)
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
32
33
34
35
36
37
38
39
40
41
/****************************************************************
 *								*
 *	Copyright 2001 Sanchez Computer Associates, Inc.	*
 *								*
 *	This source code contains the intellectual property	*
 *	of its copyright holder(s), and is made available	*
 *	under a license.  If you do not know the terms of	*
 *	the license, please stop and do not read further.	*
 *								*
 ****************************************************************/

#include "mdef.h"
#include "comp_esc.h"


GBLDEF bool			ce_init_done = FALSE;
GBLDEF struct ce_sentinel_desc	*ce_def_list;


int ce_init (void)
{
	int4	(*compiler_escape_init)();
	mstr	filename_logical, filename_translation;
	char	buffer[256];

	uint4	status;


	status = 1;
	if (!ce_init_done)
	{
		ce_def_list = NULL;

		/* Check for existence of logical name; if present, invoke corresponding entry point. */
		/* No Unix code yet -- this is just a stub to initialize ce_def_list */

		ce_init_done = TRUE;
	}

	return status;
}