Eventloop.Module.StatefulGraphics

Documentation

setupStatefulGraphicsModuleConfiguration :: EventloopSetupModuleConfiguration

statefulGraphicsModuleIdentifier :: EventloopModuleIdentifier

statefulGraphicsInitializer :: Initializer

statefulGraphicsPostProcessor :: PostProcessor

type CanvasSystemReceiveBuffer = MVar SystemCanvasIn

type Opcode = Int

type ScreenMetric = Int

type ScreenX = ScreenMetric

type ScreenY = ScreenMetric

type ScreenWidth = ScreenMetric

type ScreenHeight = ScreenMetric

type ScreenRadius = ScreenMetric

type ScreenAngle

Arguments

 = ScreenMetric

In degrees

type ScreenPoint = (ScreenX, ScreenY)

type ScreenDimensions = (ScreenWidth, ScreenHeight)

type ScreenStartingPoint = ScreenPoint

type ScreenControlPoint = ScreenPoint

type ScreenEndPoint = ScreenPoint

type ScreenStartingAngle = ScreenAngle

type ScreenEndAngle = ScreenAngle

type CanvasId = NumericId

type ZIndex = Int

type ScreenColorMetric = Int

type ScreenRed = ScreenColorMetric

type ScreenGreen = ScreenColorMetric

type ScreenBlue = ScreenColorMetric

type ScreenAlpha = Float

type ScreenColor = (ScreenRed, ScreenGreen, ScreenBlue, ScreenAlpha)

type ScreenPixel = ScreenColor

type ColorStopOffset = Float

type ScreenCircle = (ScreenPoint, ScreenRadius)

type ScaleUnit = Float

type ScaleX = ScaleUnit

type ScaleY = ScaleUnit

type ScreenLineThickness = ScreenMetric

type FontFamily = [Char]

type FontSize = Int

data RoutedMessageIn

Constructors

InUserCanvas CanvasIn

InSystemCanvas SystemCanvasIn

Instances

Eq RoutedMessageIn

Methods

(==) :: RoutedMessageIn -> RoutedMessageIn -> Bool

(/=) :: RoutedMessageIn -> RoutedMessageIn -> Bool

Show RoutedMessageIn

Methods

showsPrec :: Int -> RoutedMessageIn -> ShowS

show :: RoutedMessageIn -> String

showList :: [RoutedMessageIn] -> ShowS

data RoutedMessageOut

Constructors

OutUserCanvas CanvasOut

OutSystemCanvas SystemCanvasOut

Instances

Eq RoutedMessageOut

Methods

(==) :: RoutedMessageOut -> RoutedMessageOut -> Bool

(/=) :: RoutedMessageOut -> RoutedMessageOut -> Bool

Show RoutedMessageOut

Methods

showsPrec :: Int -> RoutedMessageOut -> ShowS

show :: RoutedMessageOut -> String

showList :: [RoutedMessageOut] -> ShowS

Generic RoutedMessageOut

Associated Types

type Rep RoutedMessageOut :: * -> *

Methods

from :: RoutedMessageOut -> Rep RoutedMessageOut x

to :: Rep RoutedMessageOut x -> RoutedMessageOut

NFData RoutedMessageOut

Methods

rnf :: RoutedMessageOut -> ()

type Rep RoutedMessageOut

type Rep RoutedMessageOut = D1 (MetaData "RoutedMessageOut" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "OutUserCanvas" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasOut))) (C1 (MetaCons "OutSystemCanvas" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 SystemCanvasOut))))

data SystemCanvasIn

Opcode: 2100

Constructors

SystemMeasuredText CanvasText ScreenDimensions

Opcode: 2101

Instances

Eq SystemCanvasIn

Methods

(==) :: SystemCanvasIn -> SystemCanvasIn -> Bool

(/=) :: SystemCanvasIn -> SystemCanvasIn -> Bool

Show SystemCanvasIn

Methods

showsPrec :: Int -> SystemCanvasIn -> ShowS

show :: SystemCanvasIn -> String

showList :: [SystemCanvasIn] -> ShowS

data SystemCanvasOut

Opcode: 2000

Constructors

SystemMeasureText CanvasText

Opcode: 2001

Instances

Eq SystemCanvasOut

Methods

(==) :: SystemCanvasOut -> SystemCanvasOut -> Bool

(/=) :: SystemCanvasOut -> SystemCanvasOut -> Bool

Show SystemCanvasOut

Methods

showsPrec :: Int -> SystemCanvasOut -> ShowS

show :: SystemCanvasOut -> String

showList :: [SystemCanvasOut] -> ShowS

Generic SystemCanvasOut

Associated Types

type Rep SystemCanvasOut :: * -> *

Methods

from :: SystemCanvasOut -> Rep SystemCanvasOut x

to :: Rep SystemCanvasOut x -> SystemCanvasOut

NFData SystemCanvasOut

Methods

rnf :: SystemCanvasOut -> ()

type Rep SystemCanvasOut

type Rep SystemCanvasOut = D1 (MetaData "SystemCanvasOut" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) (C1 (MetaCons "SystemMeasureText" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasText)))

data CanvasIn

Opcode: 0100

Constructors

MeasuredText CanvasText ScreenDimensions

Opcode: 0101

Instances

Eq CanvasIn

Methods

(==) :: CanvasIn -> CanvasIn -> Bool

(/=) :: CanvasIn -> CanvasIn -> Bool

Show CanvasIn

Methods

showsPrec :: Int -> CanvasIn -> ShowS

show :: CanvasIn -> String

showList :: [CanvasIn] -> ShowS

data CanvasOut

Reserved type words Type: t | Opcode Arguments: a | List of arguments for that data type Route: r | Either s for system or u for user Object: o | The object that is beneath

Example: {r: s, o: {SystemMeasuredText object}}

SystemMeasuredText object: {t:2102, a:[CanvasId, CanvasText object, ScreenDimensions]}

Opcode: 0200

Constructors

SetupCanvas CanvasId ZIndex ScreenDimensions CSSPosition

Opcode: 0201

TeardownCanvas CanvasId

Opcode: 0202

CanvasOperations CanvasId [CanvasOperation]

Opcode: 0203

MeasureText CanvasText

Opcode: 0204

Instances

Eq CanvasOut

Methods

(==) :: CanvasOut -> CanvasOut -> Bool

(/=) :: CanvasOut -> CanvasOut -> Bool

Show CanvasOut

Methods

showsPrec :: Int -> CanvasOut -> ShowS

show :: CanvasOut -> String

showList :: [CanvasOut] -> ShowS

Generic CanvasOut

Associated Types

type Rep CanvasOut :: * -> *

Methods

from :: CanvasOut -> Rep CanvasOut x

to :: Rep CanvasOut x -> CanvasOut

NFData CanvasOut

Methods

rnf :: CanvasOut -> ()

type Rep CanvasOut

type Rep CanvasOut = D1 (MetaData "CanvasOut" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) ((:+:) (C1 (MetaCons "SetupCanvas" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasId)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ZIndex))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenDimensions)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CSSPosition))))) (C1 (MetaCons "TeardownCanvas" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasId)))) ((:+:) (C1 (MetaCons "CanvasOperations" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasId)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [CanvasOperation])))) (C1 (MetaCons "MeasureText" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasText)))))

data CanvasOperation

Opcode: 0300

Constructors

DrawPath ScreenStartingPoint [ScreenPathPart] PathStroke PathFill

Opcode: 0301

DrawText CanvasText ScreenPoint TextStroke TextFill

Opcode: 0302

DoTransform CanvasTransform

Opcode: 0303

Clear ClearPart

Opcode: 0304

Frame

Opcode: 0305

Instances

Eq CanvasOperation

Methods

(==) :: CanvasOperation -> CanvasOperation -> Bool

(/=) :: CanvasOperation -> CanvasOperation -> Bool

Show CanvasOperation

Methods

showsPrec :: Int -> CanvasOperation -> ShowS

show :: CanvasOperation -> String

showList :: [CanvasOperation] -> ShowS

Generic CanvasOperation

Associated Types

type Rep CanvasOperation :: * -> *

Methods

from :: CanvasOperation -> Rep CanvasOperation x

to :: Rep CanvasOperation x -> CanvasOperation

NFData CanvasOperation

Methods

rnf :: CanvasOperation -> ()

type Rep CanvasOperation

type Rep CanvasOperation = D1 (MetaData "CanvasOperation" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) ((:+:) (C1 (MetaCons "DrawPath" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenStartingPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [ScreenPathPart]))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 PathStroke)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 PathFill))))) (C1 (MetaCons "DrawText" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasText)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TextStroke)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TextFill)))))) ((:+:) (C1 (MetaCons "DoTransform" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasTransform))) ((:+:) (C1 (MetaCons "Clear" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ClearPart))) (C1 (MetaCons "Frame" PrefixI False) U1))))

data ScreenPathPart

Opcode: 0400

Constructors

MoveTo ScreenPoint

Opcode: 0401

LineTo ScreenPoint

Opcode: 0402

BezierCurveTo ScreenControlPoint ScreenControlPoint ScreenEndPoint

Opcode: 0403

QuadraticCurveTo ScreenControlPoint ScreenEndPoint

Opcode: 0404

ArcTo ScreenControlPoint ScreenControlPoint ScreenRadius

Opcode: 0405

Arc ScreenCircle ScreenStartingAngle ScreenEndAngle

Opcode: 0406

Rectangle ScreenPoint ScreenDimensions

Opcode: 0407

ClosePath

Opcode: 0408

Instances

Eq ScreenPathPart

Methods

(==) :: ScreenPathPart -> ScreenPathPart -> Bool

(/=) :: ScreenPathPart -> ScreenPathPart -> Bool

Show ScreenPathPart

Methods

showsPrec :: Int -> ScreenPathPart -> ShowS

show :: ScreenPathPart -> String

showList :: [ScreenPathPart] -> ShowS

Generic ScreenPathPart

Associated Types

type Rep ScreenPathPart :: * -> *

Methods

from :: ScreenPathPart -> Rep ScreenPathPart x

to :: Rep ScreenPathPart x -> ScreenPathPart

NFData ScreenPathPart

Methods

rnf :: ScreenPathPart -> ()

type Rep ScreenPathPart

type Rep ScreenPathPart = D1 (MetaData "ScreenPathPart" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) ((:+:) ((:+:) (C1 (MetaCons "MoveTo" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint))) (C1 (MetaCons "LineTo" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)))) ((:+:) (C1 (MetaCons "BezierCurveTo" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenControlPoint)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenControlPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenEndPoint))))) (C1 (MetaCons "QuadraticCurveTo" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenControlPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenEndPoint)))))) ((:+:) ((:+:) (C1 (MetaCons "ArcTo" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenControlPoint)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenControlPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenRadius))))) (C1 (MetaCons "Arc" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenCircle)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenStartingAngle)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenEndAngle)))))) ((:+:) (C1 (MetaCons "Rectangle" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenDimensions)))) (C1 (MetaCons "ClosePath" PrefixI False) U1))))

type PathRenderStrokeStyle = RenderStyle

Opcode: 0500

data PathStroke

Constructors

PathStroke ScreenLineThickness PathRenderStrokeStyle

Opcode: 0501

NoPathStroke

Opcode: 0502

Instances

Eq PathStroke

Methods

(==) :: PathStroke -> PathStroke -> Bool

(/=) :: PathStroke -> PathStroke -> Bool

Show PathStroke

Methods

showsPrec :: Int -> PathStroke -> ShowS

show :: PathStroke -> String

showList :: [PathStroke] -> ShowS

Generic PathStroke

Associated Types

type Rep PathStroke :: * -> *

Methods

from :: PathStroke -> Rep PathStroke x

to :: Rep PathStroke x -> PathStroke

NFData PathStroke

Methods

rnf :: PathStroke -> ()

type Rep PathStroke

type Rep PathStroke = D1 (MetaData "PathStroke" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "PathStroke" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenLineThickness)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 PathRenderStrokeStyle)))) (C1 (MetaCons "NoPathStroke" PrefixI False) U1))

type PathRenderFillStyle = RenderStyle

Opcode: 0600

data PathFill

Constructors

PathFill PathRenderFillStyle

Opcode: 0601

NoPathFill

Opcode: 0602

Instances

Eq PathFill

Methods

(==) :: PathFill -> PathFill -> Bool

(/=) :: PathFill -> PathFill -> Bool

Show PathFill

Methods

showsPrec :: Int -> PathFill -> ShowS

show :: PathFill -> String

showList :: [PathFill] -> ShowS

Generic PathFill

Associated Types

type Rep PathFill :: * -> *

Methods

from :: PathFill -> Rep PathFill x

to :: Rep PathFill x -> PathFill

NFData PathFill

Methods

rnf :: PathFill -> ()

type Rep PathFill

type Rep PathFill = D1 (MetaData "PathFill" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "PathFill" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 PathRenderFillStyle))) (C1 (MetaCons "NoPathFill" PrefixI False) U1))

type CanvasColorStop = (ColorStopOffset, ScreenColor)

Opcode: 0700

data RenderStyle

Constructors

CanvasColor ScreenColor

Opcode: 0701

CanvasGradient CanvasGradientType [CanvasColorStop]

Opcode:0702

CanvasPattern CanvasImage PatternRepetition

Opcode: 0703

Instances

Eq RenderStyle

Methods

(==) :: RenderStyle -> RenderStyle -> Bool

(/=) :: RenderStyle -> RenderStyle -> Bool

Show RenderStyle

Methods

showsPrec :: Int -> RenderStyle -> ShowS

show :: RenderStyle -> String

showList :: [RenderStyle] -> ShowS

Generic RenderStyle

Associated Types

type Rep RenderStyle :: * -> *

Methods

from :: RenderStyle -> Rep RenderStyle x

to :: Rep RenderStyle x -> RenderStyle

NFData RenderStyle

Methods

rnf :: RenderStyle -> ()

type Rep RenderStyle

type Rep RenderStyle = D1 (MetaData "RenderStyle" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "CanvasColor" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenColor))) ((:+:) (C1 (MetaCons "CanvasGradient" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasGradientType)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [CanvasColorStop])))) (C1 (MetaCons "CanvasPattern" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasImage)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 PatternRepetition))))))

data CanvasImage

Opcode: 0800

Constructors

CanvasElement CanvasId ScreenPoint ScreenDimensions

Opcode: 0801

ImageData ScreenDimensions [ScreenPixel]

Opcode: 0802 [ScreenPixel] should be as long as width * height * 4. Each quad is red,green,blue,alpha

Instances

Eq CanvasImage

Methods

(==) :: CanvasImage -> CanvasImage -> Bool

(/=) :: CanvasImage -> CanvasImage -> Bool

Show CanvasImage

Methods

showsPrec :: Int -> CanvasImage -> ShowS

show :: CanvasImage -> String

showList :: [CanvasImage] -> ShowS

Generic CanvasImage

Associated Types

type Rep CanvasImage :: * -> *

Methods

from :: CanvasImage -> Rep CanvasImage x

to :: Rep CanvasImage x -> CanvasImage

NFData CanvasImage

Methods

rnf :: CanvasImage -> ()

type Rep CanvasImage

type Rep CanvasImage = D1 (MetaData "CanvasImage" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "CanvasElement" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CanvasId)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenDimensions))))) (C1 (MetaCons "ImageData" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenDimensions)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [ScreenPixel])))))

data PatternRepetition

Opcode: 0900

Constructors

Repeat

Opcode: 0901

RepeatX

Opcode: 0902

RepeatY

Opcode: 0903

NoRepeat

Opcode: 0904

Instances

Eq PatternRepetition

Methods

(==) :: PatternRepetition -> PatternRepetition -> Bool

(/=) :: PatternRepetition -> PatternRepetition -> Bool

Show PatternRepetition

Methods

showsPrec :: Int -> PatternRepetition -> ShowS

show :: PatternRepetition -> String

showList :: [PatternRepetition] -> ShowS

Generic PatternRepetition

Associated Types

type Rep PatternRepetition :: * -> *

Methods

from :: PatternRepetition -> Rep PatternRepetition x

to :: Rep PatternRepetition x -> PatternRepetition

NFData PatternRepetition

Methods

rnf :: PatternRepetition -> ()

type Rep PatternRepetition

type Rep PatternRepetition = D1 (MetaData "PatternRepetition" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) ((:+:) (C1 (MetaCons "Repeat" PrefixI False) U1) (C1 (MetaCons "RepeatX" PrefixI False) U1)) ((:+:) (C1 (MetaCons "RepeatY" PrefixI False) U1) (C1 (MetaCons "NoRepeat" PrefixI False) U1)))

data CanvasGradientType

Opcode: 1000

Constructors

RadialGradient ScreenCircle ScreenCircle

Opcode: 1001 First circle = inner circle, Second circle is enclosing circle

LinearGradient ScreenPoint ScreenPoint

Opcode: 1002

Instances

Eq CanvasGradientType

Methods

(==) :: CanvasGradientType -> CanvasGradientType -> Bool

(/=) :: CanvasGradientType -> CanvasGradientType -> Bool

Show CanvasGradientType

Methods

showsPrec :: Int -> CanvasGradientType -> ShowS

show :: CanvasGradientType -> String

showList :: [CanvasGradientType] -> ShowS

Generic CanvasGradientType

Associated Types

type Rep CanvasGradientType :: * -> *

Methods

from :: CanvasGradientType -> Rep CanvasGradientType x

to :: Rep CanvasGradientType x -> CanvasGradientType

NFData CanvasGradientType

Methods

rnf :: CanvasGradientType -> ()

type Rep CanvasGradientType

type Rep CanvasGradientType = D1 (MetaData "CanvasGradientType" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "RadialGradient" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenCircle)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenCircle)))) (C1 (MetaCons "LinearGradient" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)))))

data CanvasText

Opcode: 1200

Constructors

CanvasText [Char] Font Alignment

Opcode: 1201

Instances

Eq CanvasText

Methods

(==) :: CanvasText -> CanvasText -> Bool

(/=) :: CanvasText -> CanvasText -> Bool

Show CanvasText

Methods

showsPrec :: Int -> CanvasText -> ShowS

show :: CanvasText -> String

showList :: [CanvasText] -> ShowS

Generic CanvasText

Associated Types

type Rep CanvasText :: * -> *

Methods

from :: CanvasText -> Rep CanvasText x

to :: Rep CanvasText x -> CanvasText

NFData CanvasText

Methods

rnf :: CanvasText -> ()

type Rep CanvasText

type Rep CanvasText = D1 (MetaData "CanvasText" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) (C1 (MetaCons "CanvasText" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Char])) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Font)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Alignment)))))

data Font

Opcode: 1300

Constructors

Font FontFamily FontSize

Opcode: 1301

Instances

Eq Font

Methods

(==) :: Font -> Font -> Bool

(/=) :: Font -> Font -> Bool

Show Font

Methods

showsPrec :: Int -> Font -> ShowS

show :: Font -> String

showList :: [Font] -> ShowS

Generic Font

Associated Types

type Rep Font :: * -> *

Methods

from :: Font -> Rep Font x

to :: Rep Font x -> Font

NFData Font

Methods

rnf :: Font -> ()

type Rep Font

type Rep Font = D1 (MetaData "Font" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) (C1 (MetaCons "Font" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 FontFamily)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 FontSize))))

type TextStrokeRenderStyle = RenderStyle

Opcode: 1400

type TextFillRenderStyle = RenderStyle

data TextStroke

Constructors

TextStroke ScreenLineThickness TextStrokeRenderStyle

Opcode: 1401

NoTextStroke

Opcode: 1402

Instances

Eq TextStroke

Methods

(==) :: TextStroke -> TextStroke -> Bool

(/=) :: TextStroke -> TextStroke -> Bool

Show TextStroke

Methods

showsPrec :: Int -> TextStroke -> ShowS

show :: TextStroke -> String

showList :: [TextStroke] -> ShowS

Generic TextStroke

Associated Types

type Rep TextStroke :: * -> *

Methods

from :: TextStroke -> Rep TextStroke x

to :: Rep TextStroke x -> TextStroke

NFData TextStroke

Methods

rnf :: TextStroke -> ()

type Rep TextStroke

type Rep TextStroke = D1 (MetaData "TextStroke" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "TextStroke" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenLineThickness)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TextStrokeRenderStyle)))) (C1 (MetaCons "NoTextStroke" PrefixI False) U1))

data TextFill

Opcode: 2400

Constructors

TextFill TextFillRenderStyle

Opcode: 2401

NoTextFill

Opcode: 2402

Instances

Eq TextFill

Methods

(==) :: TextFill -> TextFill -> Bool

(/=) :: TextFill -> TextFill -> Bool

Show TextFill

Methods

showsPrec :: Int -> TextFill -> ShowS

show :: TextFill -> String

showList :: [TextFill] -> ShowS

Generic TextFill

Associated Types

type Rep TextFill :: * -> *

Methods

from :: TextFill -> Rep TextFill x

to :: Rep TextFill x -> TextFill

NFData TextFill

Methods

rnf :: TextFill -> ()

type Rep TextFill

type Rep TextFill = D1 (MetaData "TextFill" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "TextFill" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TextFillRenderStyle))) (C1 (MetaCons "NoTextFill" PrefixI False) U1))

data Alignment

Opcode: 1500

Constructors

AlignLeft

Opcode: 1501

AlignRight

Opcode: 1502

AlignCenter

Opcode: 1503

Instances

Eq Alignment

Methods

(==) :: Alignment -> Alignment -> Bool

(/=) :: Alignment -> Alignment -> Bool

Show Alignment

Methods

showsPrec :: Int -> Alignment -> ShowS

show :: Alignment -> String

showList :: [Alignment] -> ShowS

Generic Alignment

Associated Types

type Rep Alignment :: * -> *

Methods

from :: Alignment -> Rep Alignment x

to :: Rep Alignment x -> Alignment

NFData Alignment

Methods

rnf :: Alignment -> ()

type Rep Alignment

type Rep Alignment = D1 (MetaData "Alignment" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "AlignLeft" PrefixI False) U1) ((:+:) (C1 (MetaCons "AlignRight" PrefixI False) U1) (C1 (MetaCons "AlignCenter" PrefixI False) U1)))

type TransformUnit = Float

Opcode: 1600

type TransformationMatrix = (TransformUnit, TransformUnit, TransformUnit, TransformUnit, TransformUnit, TransformUnit)

data CanvasTransform

Constructors

Save

Opcode: 1601

Restore

Opcode: 1602

Translate ScreenPoint

Opcode: 1603

Rotate ScreenAngle

Opcode: 1604

Scale ScaleX ScaleY

Opcode: 1605

Transform TransformationMatrix

Opcode: 1606

SetTransform TransformationMatrix

Opcode: 1607

ResetTransform

Opcode: 1608

Instances

Eq CanvasTransform

Methods

(==) :: CanvasTransform -> CanvasTransform -> Bool

(/=) :: CanvasTransform -> CanvasTransform -> Bool

Show CanvasTransform

Methods

showsPrec :: Int -> CanvasTransform -> ShowS

show :: CanvasTransform -> String

showList :: [CanvasTransform] -> ShowS

Generic CanvasTransform

Associated Types

type Rep CanvasTransform :: * -> *

Methods

from :: CanvasTransform -> Rep CanvasTransform x

to :: Rep CanvasTransform x -> CanvasTransform

NFData CanvasTransform

Methods

rnf :: CanvasTransform -> ()

type Rep CanvasTransform

type Rep CanvasTransform = D1 (MetaData "CanvasTransform" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) ((:+:) ((:+:) (C1 (MetaCons "Save" PrefixI False) U1) (C1 (MetaCons "Restore" PrefixI False) U1)) ((:+:) (C1 (MetaCons "Translate" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint))) (C1 (MetaCons "Rotate" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenAngle))))) ((:+:) ((:+:) (C1 (MetaCons "Scale" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScaleX)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScaleY)))) (C1 (MetaCons "Transform" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TransformationMatrix)))) ((:+:) (C1 (MetaCons "SetTransform" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 TransformationMatrix))) (C1 (MetaCons "ResetTransform" PrefixI False) U1))))

type CSSLeftOffset = CSSUnit

Opcode: 2200

type CSSTopOffset = CSSUnit

type CSSMeasurements = (CSSLeftOffset, CSSTopOffset)

data CSSPosition

Constructors

CSSPosition CSSBindPoint CSSMeasurements

Opcode: 2201

Instances

Eq CSSPosition

Methods

(==) :: CSSPosition -> CSSPosition -> Bool

(/=) :: CSSPosition -> CSSPosition -> Bool

Show CSSPosition

Methods

showsPrec :: Int -> CSSPosition -> ShowS

show :: CSSPosition -> String

showList :: [CSSPosition] -> ShowS

Generic CSSPosition

Associated Types

type Rep CSSPosition :: * -> *

Methods

from :: CSSPosition -> Rep CSSPosition x

to :: Rep CSSPosition x -> CSSPosition

NFData CSSPosition

Methods

rnf :: CSSPosition -> ()

type Rep CSSPosition

type Rep CSSPosition = D1 (MetaData "CSSPosition" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) (C1 (MetaCons "CSSPosition" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CSSBindPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 CSSMeasurements))))

data CSSBindPoint

Opcode: 2300

Constructors

CSSFromCenter

Opcode: 2301

CSSFromDefault

Opcode: 2302 Usually this is the top left corner of the element

Instances

Eq CSSBindPoint

Methods

(==) :: CSSBindPoint -> CSSBindPoint -> Bool

(/=) :: CSSBindPoint -> CSSBindPoint -> Bool

Show CSSBindPoint

Methods

showsPrec :: Int -> CSSBindPoint -> ShowS

show :: CSSBindPoint -> String

showList :: [CSSBindPoint] -> ShowS

Generic CSSBindPoint

Associated Types

type Rep CSSBindPoint :: * -> *

Methods

from :: CSSBindPoint -> Rep CSSBindPoint x

to :: Rep CSSBindPoint x -> CSSBindPoint

NFData CSSBindPoint

Methods

rnf :: CSSBindPoint -> ()

type Rep CSSBindPoint

type Rep CSSBindPoint = D1 (MetaData "CSSBindPoint" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "CSSFromCenter" PrefixI False) U1) (C1 (MetaCons "CSSFromDefault" PrefixI False) U1))

data CSSUnit

Opcode: 1800

Constructors

CSSPixels Int

Opcode: 1801

CSSPercentage Int

Opcode: 1802

Instances

Eq CSSUnit

Methods

(==) :: CSSUnit -> CSSUnit -> Bool

(/=) :: CSSUnit -> CSSUnit -> Bool

Show CSSUnit

Methods

showsPrec :: Int -> CSSUnit -> ShowS

show :: CSSUnit -> String

showList :: [CSSUnit] -> ShowS

Generic CSSUnit

Associated Types

type Rep CSSUnit :: * -> *

Methods

from :: CSSUnit -> Rep CSSUnit x

to :: Rep CSSUnit x -> CSSUnit

NFData CSSUnit

Methods

rnf :: CSSUnit -> ()

type Rep CSSUnit

type Rep CSSUnit = D1 (MetaData "CSSUnit" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "CSSPixels" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int))) (C1 (MetaCons "CSSPercentage" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int))))

data ClearPart

Opcode: 1900

Constructors

ClearRectangle ScreenPoint ScreenDimensions

Opcode: 1901

ClearCanvas

Opcode: 1902

Instances

Eq ClearPart

Methods

(==) :: ClearPart -> ClearPart -> Bool

(/=) :: ClearPart -> ClearPart -> Bool

Show ClearPart

Methods

showsPrec :: Int -> ClearPart -> ShowS

show :: ClearPart -> String

showList :: [ClearPart] -> ShowS

Generic ClearPart

Associated Types

type Rep ClearPart :: * -> *

Methods

from :: ClearPart -> Rep ClearPart x

to :: Rep ClearPart x -> ClearPart

NFData ClearPart

Methods

rnf :: ClearPart -> ()

type Rep ClearPart

type Rep ClearPart = D1 (MetaData "ClearPart" "Eventloop.Module.Websocket.Canvas.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "ClearRectangle" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenPoint)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ScreenDimensions)))) (C1 (MetaCons "ClearCanvas" PrefixI False) U1))

data StatefulGraphicsOut

Constructors

Draw StatefulGraphic

Remove NamedId

Instances

Eq StatefulGraphicsOut

Methods

(==) :: StatefulGraphicsOut -> StatefulGraphicsOut -> Bool

(/=) :: StatefulGraphicsOut -> StatefulGraphicsOut -> Bool

Show StatefulGraphicsOut

Methods

showsPrec :: Int -> StatefulGraphicsOut -> ShowS

show :: StatefulGraphicsOut -> String

showList :: [StatefulGraphicsOut] -> ShowS

Generic StatefulGraphicsOut

Associated Types

type Rep StatefulGraphicsOut :: * -> *

Methods

from :: StatefulGraphicsOut -> Rep StatefulGraphicsOut x

to :: Rep StatefulGraphicsOut x -> StatefulGraphicsOut

NFData StatefulGraphicsOut

Methods

rnf :: StatefulGraphicsOut -> ()

type Rep StatefulGraphicsOut

type Rep StatefulGraphicsOut = D1 (MetaData "StatefulGraphicsOut" "Eventloop.Module.StatefulGraphics.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) ((:+:) (C1 (MetaCons "Draw" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 StatefulGraphic))) (C1 (MetaCons "Remove" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 NamedId))))

data GraphicPerformed

Constructors

Drawn StatefulBB

Modified StatefulBB StatefulBB

Removed StatefulBB

NoOp

data StatefulGraphic

Constructors

Stateful NamedId ZIndex Shape

Instances

Eq StatefulGraphic

Methods

(==) :: StatefulGraphic -> StatefulGraphic -> Bool

(/=) :: StatefulGraphic -> StatefulGraphic -> Bool

Show StatefulGraphic

Methods

showsPrec :: Int -> StatefulGraphic -> ShowS

show :: StatefulGraphic -> String

showList :: [StatefulGraphic] -> ShowS

Generic StatefulGraphic

Associated Types

type Rep StatefulGraphic :: * -> *

Methods

from :: StatefulGraphic -> Rep StatefulGraphic x

to :: Rep StatefulGraphic x -> StatefulGraphic

NFData StatefulGraphic

Methods

rnf :: StatefulGraphic -> ()

Overlaps StatefulGraphic

Methods

overlaps :: Overlaps b => StatefulGraphic -> b -> Bool

contains :: Overlaps b => StatefulGraphic -> b -> Bool

touches :: Overlaps b => StatefulGraphic -> b -> Bool

ToBoundingBox StatefulGraphic

Methods

toBoundingBox :: StatefulGraphic -> BoundingBox

ToPrimitives StatefulGraphic

Methods

toPrimitives :: StatefulGraphic -> [GeometricPrimitive]

type Rep StatefulGraphic

type Rep StatefulGraphic = D1 (MetaData "StatefulGraphic" "Eventloop.Module.StatefulGraphics.Types" "eventloop-0.8.2.1-G7ysJx2qRNZBUYxQgu0TzS" False) (C1 (MetaCons "Stateful" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 NamedId)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ZIndex)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Shape)))))

data StatefulBB

Constructors

StatefulBB StatefulGraphic BoundingBox

Instances

Eq StatefulBB

Methods

(==) :: StatefulBB -> StatefulBB -> Bool

(/=) :: StatefulBB -> StatefulBB -> Bool

Show StatefulBB

Methods

showsPrec :: Int -> StatefulBB -> ShowS

show :: StatefulBB -> String

showList :: [StatefulBB] -> ShowS

Overlaps StatefulBB

Methods

overlaps :: Overlaps b => StatefulBB -> b -> Bool

contains :: Overlaps b => StatefulBB -> b -> Bool

touches :: Overlaps b => StatefulBB -> b -> Bool

ToBoundingBox StatefulBB

Methods

toBoundingBox :: StatefulBB -> BoundingBox

ToPrimitives StatefulBB

Methods

toPrimitives :: StatefulBB -> [GeometricPrimitive]

type GraphicsState = [StatefulBB]

type GraphicsStates = [(CanvasId, GraphicsState)]

class NoDimChange a where

Minimal complete definition

noDimChange

Methods

noDimChange :: a -> a -> Bool