Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
 Path: blob/master/src/lib/libpp/ppline.c
1808 views
1
/***********************************************************************

2
*                                                                      *

3
*               This software is part of the ast package               *

4
*          Copyright (c) 1986-2012 AT&T Intellectual Property          *

5
*                      and is licensed under the                       *

6
*                 Eclipse Public License, Version 1.0                  *

7
*                    by AT&T Intellectual Property                     *

8
*                                                                      *

9
*                A copy of the License is available at                 *

10
*          http://www.eclipse.org/org/documents/epl-v10.html           *

11
*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *

12
*                                                                      *

13
*              Information and Software Systems Research               *

14
*                            AT&T Research                             *

15
*                           Florham Park NJ                            *

16
*                                                                      *

17
*                 Glenn Fowler <[email protected]>                  *

18
*                                                                      *

19
***********************************************************************/

20
#pragma prototyped

21
/*

22
 * Glenn Fowler

23
 * AT&T Research

24
 *

25
 * common preprocessor line sync handler

26
 */

27


28
#include "pplib.h"

29


30
void

31
ppline(int line, char* file)

32
{

33
	char*		s;

34
	static char	type[5];

35


36
	if (pp.flags & PP_lineignore)

37
	{

38
		pp.flags &= ~PP_lineignore;

39
		if (!(pp.flags & PP_linetype) || *pp.lineid)

40
		{

41
			ppline(1, file);

42
			file = error_info.file;

43
		}

44
		else

45
			type[1] = PP_sync_ignore;

46
	}

47
	else if (file != pp.lastfile)

48
	{

49
		if (!pp.firstfile)

50
			pp.firstfile = file;

51
		type[1] = ((pp.flags & PP_linetype) && !*pp.lineid && pp.lastfile) ? (line <= 1 ? (file == pp.firstfile ? PP_sync : PP_sync_push) : PP_sync_pop) : PP_sync;

52
		pp.lastfile = file;

53
	}

54
	else

55
	{

56
		if (!(pp.flags & PP_linefile))

57
			file = 0;

58
		type[1] = ((pp.flags & (PP_hosted|PP_linehosted)) == (PP_hosted|PP_linehosted)) ? PP_sync_hosted : PP_sync;

59
	}

60
	if (!(pp.flags & PP_linetype) || *pp.lineid || type[1] == PP_sync)

61
		type[0] = 0;

62
	else

63
	{

64
		type[0] = ' ';

65
		if ((pp.flags & (PP_hosted|PP_linehosted)) == (PP_hosted|PP_linehosted) && type[1] != PP_sync_hosted)

66
		{

67
			type[2] = ' ';

68
			type[3] = PP_sync_hosted;

69
		}

70
		else

71
			type[2] = 0;

72
	}

73


74
	/*

75
	 * some front ends can't handle two line syncs in a row

76
	 */

77


78
	if (pp.pending == pppendout() || pplastout() != '\n')

79
		ppputchar('\n');

80
	if (file)

81
		ppprintf("#%s %d \"%s\"%s\n", pp.lineid, line, (pp.flags & PP_linebase) && (s = strrchr(file, '/')) ? s + 1 : file, type);

82
	else

83
		ppprintf("#%s %d\n", pp.lineid, line);

84
	if (!pp.macref)

85
		pp.pending = pppendout();

86
}

87


88