remove obsolete debug output

This commit is contained in:
nek0 2021-04-28 16:40:23 +02:00
parent 3079ee74e1
commit 6f816eedef
1 changed files with 3 additions and 12 deletions

View File

@ -10,8 +10,6 @@ import Linear
import qualified Data.Vector as V import qualified Data.Vector as V
import qualified Data.Vector.Storable as VS import qualified Data.Vector.Storable as VS
import Data.String (fromString)
import Control.Arrow ((***)) import Control.Arrow ((***))
-- internal imports -- internal imports
@ -104,16 +102,9 @@ populate layers props actors =
else V.maximum (is V.++ lis V.++ pis) + 1) else V.maximum (is V.++ lis V.++ pis) + 1)
cisRaw cisRaw
in in
A.log A.Debug ( is V.++ lis V.++ pis V.++ cis
("layer: " <> (fromString $ show num) <> , vs V.++ lvs V.++ pvs V.++ cvs
",\nactors: " <> (fromString $ V.foldl (\acc (Cast c) -> acc ++ show c ++ " ") "" actorsHere) <> )
",\nprops: " <> (fromString $ V.foldl (\acc (StageSet s) -> acc ++ show s ++ " ") "" propsHere)
)
(
( is V.++ lis V.++ pis V.++ cis
, vs V.++ lvs V.++ pvs V.++ cvs
)
)
) )
(V.empty, V.empty) (V.empty, V.empty)
(V.zip (V.fromList [0 ..]) layers) (V.zip (V.fromList [0 ..]) layers)