blob: 29bd33fc088552a049ce830cbe1794e3fac1c5a5 (
plain)
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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "cpp.h"
/*
Nlist * pMacro;
Token * pTokenWhereMacroBecomesValid;
struct macroValidator *
pNext;
*/
void
mvl_init(MacroValidatorList * out_pValidators)
{
out_pValidators->pFirst = 0;
out_pValidators->nextFreeIdentifier = 1;
}
void
mvl_destruct(MacroValidatorList * out_pValidators)
{
MacroValidator * pV = out_pValidators->pFirst;
MacroValidator * pDel;
for ( pDel = out_pValidators->pFirst;
pDel != 0;
pDel = pV )
{
pV = pV->pNext;
pDel->pMacro->flag &= (~ISACTIVE);
dofree(pDel);
}
}
#define INVALID_TILL_ENDOFROW 32000
/* If in_pTokenWhereMacroBecomesValid == 0, the macro is at row end
and therefore there does not exist any token, where the macro becomes
valid again. It is revalidated, when the row was processed complete.
*/
void
mvl_add( MacroValidatorList * inout_pValidators,
Nlist * in_pMacro,
Token * in_pTokenWhereMacroBecomesValid )
{
MacroValidator * pNew = new(MacroValidator);
pNew->pMacro = in_pMacro;
if (in_pTokenWhereMacroBecomesValid == 0)
{
pNew->nTokenWhereMacroBecomesValid = INVALID_TILL_ENDOFROW;
}
else if (in_pTokenWhereMacroBecomesValid->identifier > 0)
{
pNew->nTokenWhereMacroBecomesValid = in_pTokenWhereMacroBecomesValid->identifier;
}
else
{
pNew->nTokenWhereMacroBecomesValid = inout_pValidators->nextFreeIdentifier;
in_pTokenWhereMacroBecomesValid->identifier = inout_pValidators->nextFreeIdentifier;
inout_pValidators->nextFreeIdentifier++;
}
pNew->pNext = inout_pValidators->pFirst;
inout_pValidators->pFirst = pNew;
}
/*
void
mvl_move( MacroValidatorList * inout_pValidators,
int in_nSpace )
{
MacroValidator * pV;
for ( pV = inout_pValidators->pFirst;
pV != 0;
pV = pV->pNext )
{
pV->pTokenWhereMacroBecomesValid += in_nSpace;
}
}
*/
void
mvl_check( MacroValidatorList * inout_pValidators,
Token * inout_pTokenToCheck)
{
MacroValidator * pV; /* Running pointer */
MacroValidator * pCheckedOnes; /* Here new list is built. */
pCheckedOnes = 0;
for ( pV = inout_pValidators->pFirst;
pV != 0;
pV = inout_pValidators->pFirst )
{
inout_pValidators->pFirst = pV->pNext;
if (pV->nTokenWhereMacroBecomesValid == inout_pTokenToCheck->identifier)
{
pV->pMacro->flag &= (~ISACTIVE);
dofree(pV);
}
else
{
pV->pNext = pCheckedOnes;
pCheckedOnes = pV;
}
} /* end for */
/* Assign new built list (too old ones were removed) to
original list:
*/
inout_pValidators->pFirst = pCheckedOnes;
}
void
tokenrow_zeroTokenIdentifiers(Tokenrow* trp)
{
Token * tp;
for (tp = trp->bp; tp < trp->lp; tp++)
{
tp->identifier = 0;
}
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
