1*da2e3ebdSchin /*********************************************************************** 2*da2e3ebdSchin * * 3*da2e3ebdSchin * This software is part of the ast package * 4*da2e3ebdSchin * Copyright (c) 1986-2007 AT&T Knowledge Ventures * 5*da2e3ebdSchin * and is licensed under the * 6*da2e3ebdSchin * Common Public License, Version 1.0 * 7*da2e3ebdSchin * by AT&T Knowledge Ventures * 8*da2e3ebdSchin * * 9*da2e3ebdSchin * A copy of the License is available at * 10*da2e3ebdSchin * http://www.opensource.org/licenses/cpl1.0.txt * 11*da2e3ebdSchin * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) * 12*da2e3ebdSchin * * 13*da2e3ebdSchin * Information and Software Systems Research * 14*da2e3ebdSchin * AT&T Research * 15*da2e3ebdSchin * Florham Park NJ * 16*da2e3ebdSchin * * 17*da2e3ebdSchin * Glenn Fowler <gsf@research.att.com> * 18*da2e3ebdSchin * * 19*da2e3ebdSchin ***********************************************************************/ 20*da2e3ebdSchin #pragma prototyped 21*da2e3ebdSchin /* 22*da2e3ebdSchin * Glenn Fowler 23*da2e3ebdSchin * AT&T Research 24*da2e3ebdSchin * 25*da2e3ebdSchin * common preprocessor line sync handler 26*da2e3ebdSchin */ 27*da2e3ebdSchin 28*da2e3ebdSchin #include "pplib.h" 29*da2e3ebdSchin 30*da2e3ebdSchin void 31*da2e3ebdSchin ppline(int line, char* file) 32*da2e3ebdSchin { 33*da2e3ebdSchin char* s; 34*da2e3ebdSchin static char type[5]; 35*da2e3ebdSchin 36*da2e3ebdSchin if (pp.flags & PP_lineignore) 37*da2e3ebdSchin { 38*da2e3ebdSchin pp.flags &= ~PP_lineignore; 39*da2e3ebdSchin if (!(pp.flags & PP_linetype) || *pp.lineid) 40*da2e3ebdSchin { 41*da2e3ebdSchin ppline(1, file); 42*da2e3ebdSchin file = error_info.file; 43*da2e3ebdSchin } 44*da2e3ebdSchin else 45*da2e3ebdSchin type[1] = PP_sync_ignore; 46*da2e3ebdSchin } 47*da2e3ebdSchin else if (file != pp.lastfile) 48*da2e3ebdSchin { 49*da2e3ebdSchin if (!pp.firstfile) 50*da2e3ebdSchin pp.firstfile = file; 51*da2e3ebdSchin 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*da2e3ebdSchin pp.lastfile = file; 53*da2e3ebdSchin } 54*da2e3ebdSchin else 55*da2e3ebdSchin { 56*da2e3ebdSchin if (!(pp.flags & PP_linefile)) 57*da2e3ebdSchin file = 0; 58*da2e3ebdSchin type[1] = PP_sync; 59*da2e3ebdSchin } 60*da2e3ebdSchin if (!(pp.flags & PP_linetype) || *pp.lineid || type[1] == PP_sync) 61*da2e3ebdSchin type[0] = 0; 62*da2e3ebdSchin else 63*da2e3ebdSchin { 64*da2e3ebdSchin type[0] = ' '; 65*da2e3ebdSchin if ((pp.flags & (PP_hosted|PP_linehosted)) == (PP_hosted|PP_linehosted)) 66*da2e3ebdSchin { 67*da2e3ebdSchin type[2] = ' '; 68*da2e3ebdSchin type[3] = PP_sync_hosted; 69*da2e3ebdSchin } 70*da2e3ebdSchin else 71*da2e3ebdSchin type[2] = 0; 72*da2e3ebdSchin } 73*da2e3ebdSchin 74*da2e3ebdSchin /* 75*da2e3ebdSchin * some front ends can't handle two line syncs in a row 76*da2e3ebdSchin */ 77*da2e3ebdSchin 78*da2e3ebdSchin if (pp.pending == pppendout() || pplastout() != '\n') 79*da2e3ebdSchin ppputchar('\n'); 80*da2e3ebdSchin if (file) 81*da2e3ebdSchin ppprintf("#%s %d \"%s\"%s\n", pp.lineid, line, (pp.flags & PP_linebase) && (s = strrchr(file, '/')) ? s + 1 : file, type); 82*da2e3ebdSchin else 83*da2e3ebdSchin ppprintf("#%s %d\n", pp.lineid, line); 84*da2e3ebdSchin if (!pp.macref) 85*da2e3ebdSchin pp.pending = pppendout(); 86*da2e3ebdSchin } 87