Skip to content
This repository was archived by the owner on Mar 5, 2025. It is now read-only.

Commit 65051dd

Browse files
committed
Improved overlap checking tool
1 parent 7539d67 commit 65051dd

File tree

1 file changed

+7
-6
lines changed

1 file changed

+7
-6
lines changed

src/org/rascalmpl/core/library/lang/rascalcore/compile/Examples/OverlappingFiles.rsc

Lines changed: 7 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -23,21 +23,22 @@ void main(){
2323
rascalCoreDir = |file:///Users/paulklint/git/rascal-core/src/|;
2424
typepalDir = |file:///Users/paulklint/git/typepal/src|;
2525

26-
rfiles = getFiles(rascalDir);
27-
rcfiles = getFiles(rascalCoreDir);
28-
tyfiles = getFiles(typepalDir);
29-
identical = range(rfiles) & range(rcfiles);
26+
srcDir = rascalCoreDir;
27+
rascalFiles = getFiles(rascalDir);
28+
srcFiles = getFiles(srcDir);
29+
30+
identical = range(rascalFiles) & range(srcFiles);
3031
println("<size(identical)> identical files:");
3132
iprintln(identical);
3233

3334
approved = {"AST.rsc", "TestGrammars.rsc", "Characters.rsc", "Names.rsc", "Keywords.rsc",
3435
"PicoGrammar.rsc", "CGrammar.rsc", "Layout.rsc", "LayoutTests.rsc", "LiteralsTests.rsc",
3536
"Attributes.rsc"};
36-
sameName = domain(rfiles) & domain(rcfiles) - approved;
37+
sameName = domain(rascalFiles) & domain(srcFiles) - approved;
3738

3839
println("<size(sameName)> files with same name:");
3940
for(c <- sameName){
40-
println("<c>:<for(f <- rfiles[c]+rcfiles[c]){>
41+
println("<c>:<for(f <- rascalFiles[c]+srcFiles[c]){>
4142
' <f><}>");
4243

4344
}

0 commit comments

Comments
 (0)