remove obsolete debug output

This commit is contained in:
nek0 2021-04-28 16:40:23 +02:00
parent 3079ee74e1
commit 6f816eedef

View file

@ -10,8 +10,6 @@ import Linear
import qualified Data.Vector as V
import qualified Data.Vector.Storable as VS
import Data.String (fromString)
import Control.Arrow ((***))
-- internal imports
@ -104,16 +102,9 @@ populate layers props actors =
else V.maximum (is V.++ lis V.++ pis) + 1)
cisRaw
in
A.log A.Debug
("layer: " <> (fromString $ show num) <>
",\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.zip (V.fromList [0 ..]) layers)