--- a/tools/PascalPreprocessor.hs Fri Jul 13 16:39:20 2012 +0400
+++ b/tools/PascalPreprocessor.hs Thu Jul 26 21:56:47 2012 +0400
@@ -18,6 +18,8 @@
initDefines = Map.fromList [
("FPC", "")
, ("PAS2C", "")
+ , ("ENDIAN_LITTLE", "")
+ , ("S3D_DISABLED", "")
]
preprocess :: String -> IO String