<div dir="ltr"><div>The following compiles and runs perfectly:</div><div><br></div><div>main = do</div><div>  (inputFile:_)  <- getArgs</div><div>  input <- readFile inputFile</div><div>  let pairs = pairFilesToContents $ readSmsnLines input</div><div>  mapM_ f pairs where</div><div>    f :: (FilePath, String) -> IO ()</div><div>    f (name, content) = writeFile name content</div><div><br></div><div>But the following triggers the error "<span style="color:rgb(0,0,0);font-family:monospace">Not in scope: ‘root’".</span></div><span style="font-family:monospace">
<br></span><div><div>main' = do</div><div>  (root : inputFile :_)  <- getArgs</div><div>  input <- readFile inputFile</div><div>  let pairs = pairFilesToContents $ readSmsnLines input</div><div>  mapM_ f pairs where</div><div>    f :: (FilePath, String) -> IO ()</div><div>    f (name, content) = writeFile (root+name) content</div><div><br></div></div>-- <br><div class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div>Jeff Brown | Jeffrey Benjamin Brown</div><div dir="ltr"><a href="https://msu.edu/~brown202/" style="font-size:12.8px" target="_blank">Website</a>   |   <a href="https://www.facebook.com/mejeff.younotjeff" style="font-size:12.8px" target="_blank">Facebook</a>   |   <a href="https://www.linkedin.com/in/jeffreybenjaminbrown" style="font-size:12.8px" target="_blank">LinkedIn</a><span style="font-size:12.8px">(spammy, so I often miss messages here)   </span><span style="font-size:12.8px">|</span><span style="font-size:12.8px">   </span><a href="https://github.com/jeffreybenjaminbrown" style="font-size:12.8px" target="_blank">Github</a><span style="font-size:12.8px">   </span></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>
</div>