Renamed transfer compiler and interpreter.

1 files changed, 0 insertions, 25 deletions

diff --git a/transfer/compile_to_core.hs b/transfer/compile_to_core.hs
deleted file mode 100644
index b35d906d0..000000000
--- a/transfer/compile_to_core.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-module Main where
-
-import Transfer.CompilerAPI
-
-import Data.List (partition, isPrefixOf)
-import System.Environment
-import System.Exit
-import System.IO
-
-die :: String -> IO a
-die s = do
-        hPutStrLn stderr s
-        exitFailure
-
-main :: IO ()
-main = do 
-       args <- getArgs
-       let (flags,files) = partition ("-" `isPrefixOf`) args
-           path = [ p | ('-':'i':p) <- flags ]
-       case files of
-         [f] -> do
-                cf <- compileFile path f
-                putStrLn $ "Wrote " ++ cf
-                return ()
-         _   -> die "Usage: compile_to_core [-i<path> [-i<path> ... ]] <file>"