branch | webgl |
changeset 7965 | b518458f83e6 |
parent 7961 | 620331af6b9a |
--- a/tools/pas2c.hs Sun Nov 04 03:04:20 2012 +0100 +++ b/tools/pas2c.hs Sun Nov 04 06:11:39 2012 +0100 @@ -1,5 +1,5 @@ {-# LANGUAGE ScopedTypeVariables #-} -module Main where +module Pas2C where import Text.PrettyPrint.HughesPJ import Data.Maybe @@ -1083,9 +1083,3 @@ op2C "/" = "/(float)" op2C a = a -main = do - let programName = "hwengine" - let inputPath = "../hedgewars/" - let outputPath = "./" - let alternateInputPath = "./" - pas2C programName inputPath alternateInputPath outputPath