module Main where

import Scheme
import System.Environment

-- | Get input from the command line and attempt to read it
main :: IO ()
main = do args <- getArgs
          if null args then runRepl else runOne $ args
