@@ -87,7 +87,6 @@ map[loc, set[Message]] checkFile(loc l, set[loc] workspaceFolders, start[Module]
8787 job ("Building dependency graph" , bool (void (str , int ) step2 ) {
8888 while (tree <- checkForImports ) {
8989 step2 ("Calculating imports for <tree .top .header .name > " , 1 );
90- println ("Calculating imports for <tree .top .header .name > " );
9190 currentSrc = tree .src .top ;
9291 currentProject = inferProjectRoot (currentSrc );
9392 if (currentProject in workspaceFolders && currentProject .file notin {"rascal" , "rascal-lsp" }) {
@@ -127,30 +126,23 @@ map[loc, set[Message]] checkFile(loc l, set[loc] workspaceFolders, start[Module]
127126 modulesPerProject = classify (checkedForImports , loc (loc l ) {return inferProjectRoot (l );});
128127 msgs = [];
129128
130- print ("Modules per project: " );
131- iprintln (modulesPerProject );
132-
133129 upstreamDependencies = {project | project <- reverse (order (dependencies )), project in modulesPerProject , project != initialProject };
134130
135131 step ("Checking upstream dependencies " , 1 );
136132 job ("Checking upstream dependencies" , bool (void (str , int ) step3 ) {
137133 for (project <- upstreamDependencies ) {
138134 step3 ("Checked module in `<project .file > `" , 1 );
139- println ("Checking module in `<project .file > `" );
140135 pcfg = getPathConfig (project );
141136 checkOutdatedPathConfig (pcfg );
142137 modulesToCheck = calculateOutdated (modulesPerProject [project ], pcfg );
143138 if (modulesToCheck != []) {
144- print ("Checking modules: " );
145- iprintln (modulesToCheck );
146139 msgs += check (modulesToCheck , rascalCompilerConfig (pcfg ));
147140 }
148141 }
149142 return true ;
150143 }, totalWork =size (upstreamDependencies ));
151144
152145 step ("Checking module <l > " , 1 );
153- println ("Checking module <l > " );
154146 pcfg = getPathConfig (initialProject );
155147 checkOutdatedPathConfig (pcfg );
156148 msgs += check (calculateOutdated (modulesPerProject [initialProject ], pcfg ) + [l ], rascalCompilerConfig (pcfg ));
@@ -178,22 +170,18 @@ private bool tplExpired(loc m, PathConfig pcfg) {
178170loc pathConfigFile (PathConfig pcfg ) = pcfg .bin + "rascal.pathconfig" ;
179171
180172void checkOutdatedPathConfig (PathConfig pcfg ) {
181- print ("Checking if path config is outdated" );
182- iprintln (pcfg );
183173 pcfgFile = pathConfigFile (pcfg );
184174 try {
185175 if (!exists (pcfgFile ) || tplInputsChanged (pcfg , readBinaryValueFile (#PathConfig , pcfgFile ))) {
186176 // We do not know the previous path config, or it changed
187177 // Be safe and remove TPLs
188178 for (loc f <- find (pcfg .bin , "tpl" )) {
189179 try {
190- println ("Removing <f > " );
191180 remove (f );
192181 } catch IO (_): {
193182 jobWarning ("Cannot remove TPL" , f );
194183 }
195184 }
196- println ("Writing path config to <pcfgFile > " );
197185 writeBinaryValueFile (pcfgFile , pcfg );
198186 }
199187 } catch IO (str msg ): {
0 commit comments