19 Apr
2005
19 Apr
'05
5:29 a.m.
Thanks for the comments. Indeed I knew the solution - once I isolated the problem. Note that ghc(i) behaves differently when running main2 below (it says "file is locked"). (hugs does not complain.) import System main1 = do system "echo A > foo" a <- readFile "foo" system "echo B > foo" b <- readFile "foo" print (a == b) main2 = do writeFile "foo" "A" a <- readFile "foo" writeFile "foo" "B" b <- readFile "foo" print (a == b) -- -- Johannes Waldmann -- Tel/Fax (0341) 3076 6479/80 -- ---- http://www.imn.htwk-leipzig.de/~waldmann/ -------