mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-10-19 22:33:11 -06:00
During the compilation, the final message "OK" should be displayed only if we are not in silent mode. This was changed incidentally on the way.
This commit is contained in:
1 parent
822a70cf7a
commit
2d3340b48a
1 file changed
+1
-1
@@ -58,7 +58,7 @@ link opts cnc gr = do
|
||||
putPointE Normal opts "linking ... " $ do
|
||||
pgf <- ioeIO (mkCanon2pgf opts cnc gr)
|
||||
probs <- ioeIO (maybe (return . defaultProbabilities) readProbabilitiesFromFile (flag optProbsFile opts) pgf)
|
||||
ioeIO $ putStrLn "OK"
|
||||
ioeIO $ when (verbAtLeast opts Normal) $ putStrFlush "OK"
|
||||
return $ setProbabilities probs
|
||||
$ if flag optOptimizePGF opts then optimizePGF pgf else pgf
|
||||
|
||||
|
||||
Reference in new issue
Block a user