16 lines
287 B
Haskell
16 lines
287 B
Haskell
{-# LANGUAGE StrictData #-}
|
|
--{-# LANGUAGE TemplateHaskell #-}
|
|
|
|
module Dodge.Data.Object where
|
|
|
|
import Dodge.Data.Wall
|
|
import Dodge.Data.Creature
|
|
import Dodge.Data.PulseLaser
|
|
|
|
data Object
|
|
= OPulseBall PulseBall
|
|
| OCreature Creature
|
|
| OWall Wall
|
|
| OFloor
|
|
| OChasmWall
|