src/AST/Effects.hs · elk

on df41ae8 help sign in

elk/src/AST/Effects.hs

27 lines 458 B history raw

1module AST.Effects where

3import qualified Reporting.Annotation as A

4import qualified Reporting.Region as R

8data Effects

9 = None

10 | Effect Info

11 | Foreign

14data Info =

15 Info

16 { _tag :: R.Region

17 , _init :: R.Region

18 , _onEffects :: R.Region

19 , _onSelfMsg :: R.Region

20 , _type :: ManagerType

21 }

24data ManagerType

25 = CmdManager (A.Located String)

26 | SubManager (A.Located String)

27 | FxManager (A.Located String) (A.Located String)