Changeset 6793 for src/Main.hs

Timestamp:

09/06/05 14:11:41 (3 years ago)

Author:

autrijus

Message:

* massive retab for src/, expanding all tabs into spaces,

except for the generated PIL1.hs.

Files:

• src/Main.hs (modified) (2 diffs)

src/Main.hs

@@ -249 +249 @@
         env <- liftSTM $ readTVar menv
         return $ envBody $ parseProgram env "<interactive>" $
-          (decodeUTF8 prog)
+          (decodeUTF8 prog)
     theEnv = do
         ref <- if runOptSeparately opts
@@ -327 +327 @@
 
 printConfigInfo (item:_) = do
-        putStrLn $ createConfigLine item
+        putStrLn $ createConfigLine item
 
 compPIR :: String -> IO ()