Cleanup
This commit is contained in:
@@ -1,29 +0,0 @@
|
||||
module Dodge.Default.Block where
|
||||
|
||||
import Dodge.Block.Debris
|
||||
import Dodge.Data.Block
|
||||
import LensHelp
|
||||
|
||||
defaultBlock :: Block
|
||||
defaultBlock =
|
||||
Block
|
||||
{ _blID = 0
|
||||
, _blWallIDs = mempty
|
||||
, _blHP = 1000
|
||||
, _blShadows = []
|
||||
, _blFootprint = []
|
||||
, _blPos = 0
|
||||
, _blDir = 0
|
||||
, _blDraw = const mempty
|
||||
, _blDeath = makeBlockDebris
|
||||
, _blObstructs =
|
||||
[]
|
||||
<<<<<<< HEAD
|
||||
=======
|
||||
, _blPaths =
|
||||
[]
|
||||
>>>>>>> efficientRuntime
|
||||
}
|
||||
|
||||
defaultDirtBlock :: Block
|
||||
defaultDirtBlock = defaultBlock & blHP .~ 50
|
||||
Reference in New Issue
Block a user