CSPM-Interpreter-0.1.0.0: src/Main.hs

----------------------------------------------------------------------------
-- |
-- Module      :  CSPM.Interpreter.Test.Main
-- Copyright   :  (c) Fontaine 2010
-- License     :  BSD
-- 
-- Maintainer  :  Fontaine@cs.uni-duesseldorf.de
-- Stability   :  experimental
-- Portability :  GHC-only
--
-- Very rudimentary comand line interface to the interpreter.
----------------------------------------------------------------------------

module Main
where

import CSPM.Interpreter.Test.CLI
import System.Environment (getArgs)
-- | main-funtion for the command line.
-- (no help and no nothing)
main :: IO ()
main = do
  l <- getArgs
  case l of
    [filePath, expression] -> runFile filePath expression
    _ -> putStrLn "please start with two arguments: filename + expression"