@@ -75,7 +75,7 @@ private predicate stateInsideBacktracking(State s) {
75
75
/**
76
76
* A infinitely repeating quantifier that might backtrack.
77
77
*/
78
- class MaybeBacktrackingRepetition extends InfiniteRepetitionQuantifier {
78
+ private class MaybeBacktrackingRepetition extends InfiniteRepetitionQuantifier {
79
79
MaybeBacktrackingRepetition ( ) {
80
80
exists ( RegExpTerm child |
81
81
child instanceof RegExpAlt or
@@ -89,7 +89,7 @@ class MaybeBacktrackingRepetition extends InfiniteRepetitionQuantifier {
89
89
/**
90
90
* A state in the product automaton.
91
91
*/
92
- newtype TStatePair =
92
+ private newtype TStatePair =
93
93
/**
94
94
* We lazily only construct those states that we are actually
95
95
* going to need: `(q, q)` for every fork state `q`, and any
@@ -112,7 +112,7 @@ newtype TStatePair =
112
112
* Gets a unique number for a `state`.
113
113
* Is used to create an ordering of states, where states with the same `toString()` will be ordered differently.
114
114
*/
115
- int rankState ( State state ) {
115
+ private int rankState ( State state ) {
116
116
state =
117
117
rank [ result ] ( State s , Location l |
118
118
l = s .getRepr ( ) .getLocation ( )
@@ -124,7 +124,7 @@ int rankState(State state) {
124
124
/**
125
125
* A state in the product automaton.
126
126
*/
127
- class StatePair extends TStatePair {
127
+ private class StatePair extends TStatePair {
128
128
State q1 ;
129
129
State q2 ;
130
130
@@ -159,7 +159,7 @@ private predicate delta2(StatePair q, StatePair r) { step(q, _, _, r) }
159
159
* Gets the minimum length of a path from `q` to `r` in the
160
160
* product automaton.
161
161
*/
162
- int statePairDist ( StatePair q , StatePair r ) =
162
+ private int statePairDist ( StatePair q , StatePair r ) =
163
163
shortestDistances( isStatePair / 1 , delta2 / 2 ) ( q , r , result )
164
164
165
165
/**
@@ -222,7 +222,7 @@ private predicate isFork(State q, InputSymbol s1, InputSymbol s2, State r1, Stat
222
222
* Gets the state pair `(q1, q2)` or `(q2, q1)`; note that only
223
223
* one or the other is defined.
224
224
*/
225
- StatePair mkStatePair ( State q1 , State q2 ) {
225
+ private StatePair mkStatePair ( State q1 , State q2 ) {
226
226
result = MkStatePair ( q1 , q2 ) or result = MkStatePair ( q2 , q1 )
227
227
}
228
228
@@ -268,7 +268,7 @@ private newtype TTrace =
268
268
* A list of pairs of input symbols that describe a path in the product automaton
269
269
* starting from some fork state.
270
270
*/
271
- class Trace extends TTrace {
271
+ private class Trace extends TTrace {
272
272
/** Gets a textual representation of this element. */
273
273
string toString ( ) {
274
274
this = Nil ( ) and result = "Nil()"
@@ -282,7 +282,7 @@ class Trace extends TTrace {
282
282
/**
283
283
* Gets a string corresponding to the trace `t`.
284
284
*/
285
- string concretise ( Trace t ) {
285
+ private string concretise ( Trace t ) {
286
286
t = Nil ( ) and result = ""
287
287
or
288
288
exists ( InputSymbol s1 , InputSymbol s2 , Trace rest | t = Step ( s1 , s2 , rest ) |
@@ -316,7 +316,7 @@ private predicate isReachableFromFork(State fork, StatePair r, Trace w, int rem)
316
316
* Gets a state in the product automaton from which `(fork, fork)` is
317
317
* reachable in zero or more epsilon transitions.
318
318
*/
319
- StatePair getAForkPair ( State fork ) {
319
+ private StatePair getAForkPair ( State fork ) {
320
320
isFork ( fork , _, _, _, _) and
321
321
result = MkStatePair ( epsilonPred * ( fork ) , epsilonPred * ( fork ) )
322
322
}
0 commit comments