fix: prompt was not visible outside interactive mode, flush stdout so it's visible

Main.hs

@@ -9,6 +9,7 @@ module Main where
 import Data.List
 import Data.Maybe
 import Proj2
+import System.IO (hFlush, stdout)
 
 -- | Guess the given target, counting and showing the guesses.
 guessTest :: [Pitch] -> IO ()
@@ -39,5 +40,6 @@ toChord = fromJust . mapM toPitch . words
 main :: IO ()
 main = do
   putStr "Target chord (3 pitches separated by spaces): "
+  hFlush stdout
   text <- getLine
   guessTest $ toChord text