Fix for GHC module renaming
[nofib.git] / parallel / gray / Main.hs
1 -- Copyright (c) 2000 Galois Connections, Inc.
2 -- All rights reserved. This software is distributed as
3 -- free software under the license in the file "LICENSE",
4 -- which is included in the distribution.
5
6 -- Modified to read sample input directly from a file.
7
8 module Main where
9
10 import System.IO
11
12 import Parse
13 import Eval
14
15 main = do { str <- readFile "galois.gml"
16 ; hSetBinaryMode stdout True
17 ; mainEval (rayParse str)
18 }