More ifdefs \o/ (fix build even more) 0.9.21
authorunc0rr
Thu, 04 Jun 2015 19:57:04 +0300
branch0.9.21
changeset 10773 c91811e09361
parent 10771 ac06370b7436
child 10775 a0b9b678b46e
More ifdefs \o/ (fix build even more)
gameServer/EngineInteraction.hs
--- a/gameServer/EngineInteraction.hs	Wed Jun 03 23:24:56 2015 +0300
+++ b/gameServer/EngineInteraction.hs	Thu Jun 04 19:57:04 2015 +0300
@@ -21,7 +21,7 @@
 #if defined(OFFICIAL_SERVER)
 module EngineInteraction(replayToDemo, checkNetCmd, toEngineMsg, drawnMapData) where
 #else
-module EngineInteraction(checkNetCmd, toEngineMsg, drawnMapData) where
+module EngineInteraction(checkNetCmd, toEngineMsg) where
 #endif
 
 import qualified Data.Set as Set
@@ -40,6 +40,7 @@
 import CoreTypes
 import Utils
 
+#if defined(OFFICIAL_SERVER)
 {-
     this is snippet from http://stackoverflow.com/questions/10043102/how-to-catch-the-decompress-ioerror
     because standard 'catch' doesn't seem to catch decompression errors for some reason
@@ -55,6 +56,7 @@
         cons chunk = right (chunk :)
         finalise = right BL.fromChunks
 {- end snippet  -}
+#endif
 
 toEngineMsg :: B.ByteString -> B.ByteString
 toEngineMsg msg = B.pack $ Base64.encode (fromIntegral (BW.length msg) : BW.unpack msg)
@@ -154,7 +156,6 @@
                             ])
                         $ hedgehogs t
                         )
-#endif
 
 drawnMapData :: B.ByteString -> [B.ByteString]
 drawnMapData =
@@ -221,6 +222,4 @@
         , 0x02000000
         , 0x04000000
         ]
-
-
-
+#endif