@@ -90,22 +90,18 @@ private predicate relevantPackage(string package) {
90
90
summaryModel ( package , _, _, _, _, _, _, _, _, _, _)
91
91
}
92
92
93
- /**
94
- * Holds if `package` and `subpkg` have MaD framework coverage and `subpkg`
95
- * is a subpackage of `package`.
96
- */
97
- private predicate packageHasASubpackage ( string package , string subpkg ) {
98
- relevantPackage ( package ) and
99
- relevantPackage ( subpkg ) and
100
- subpkg .prefix ( subpkg .indexOf ( "." ) ) = package
93
+ private predicate packageLink ( string shortpkg , string longpkg ) {
94
+ relevantPackage ( shortpkg ) and
95
+ relevantPackage ( longpkg ) and
96
+ longpkg .prefix ( longpkg .indexOf ( "." ) ) = shortpkg
101
97
}
102
98
103
99
/**
104
100
* Holds if `package` has MaD framework coverage and it is not a subpackage of
105
101
* any other package with MaD framework coverage.
106
102
*/
107
103
private predicate canonicalPackage ( string package ) {
108
- relevantPackage ( package ) and not packageHasASubpackage ( _, package )
104
+ relevantPackage ( package ) and not packageLink ( _, package )
109
105
}
110
106
111
107
/**
@@ -115,7 +111,7 @@ private predicate canonicalPackage(string package) {
115
111
*/
116
112
private predicate canonicalPackageHasASubpackage ( string package , string subpkg ) {
117
113
canonicalPackage ( package ) and
118
- ( subpkg = package or packageHasASubpackage ( package , subpkg ) )
114
+ ( subpkg = package or packageLink ( package , subpkg ) )
119
115
}
120
116
121
117
/**
0 commit comments