{-# LINE 1 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE TupleSections #-} {-# LANGUAGE PatternSynonyms, ViewPatterns #-} {-# OPTIONS_GHC -Wall -fno-warn-tabs #-} module Stopgap.Graphics.UI.Gdk.Event.Motion where import Foreign.Ptr import Foreign.Storable import Foreign.C.Struct import Data.Word import Data.Int import Stopgap.Graphics.UI.Gdk.Event data GdkWindowTag data GdkDeviceTag type PtrGdkWindow = Ptr GdkWindowTag type PtrGdkDevice = Ptr GdkDeviceTag type PtrGdouble = Ptr Double {-# LINE 24 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} struct "M" (80) 8 {-# LINE 26 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [ ("type", ''Type, [| (\hsc_ptr -> peekByteOff hsc_ptr 0) |], {-# LINE 28 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 0) |]), {-# LINE 29 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("window", ''PtrGdkWindow, [| (\hsc_ptr -> peekByteOff hsc_ptr 8) |], {-# LINE 31 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 8) |]), {-# LINE 32 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("send_event", ''Int8, {-# LINE 33 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 16) |], {-# LINE 34 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 16) |]), {-# LINE 35 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("time", ''Word32, {-# LINE 36 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 20) |], {-# LINE 37 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 20) |]), {-# LINE 38 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("x", ''Double, {-# LINE 39 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 24) |], {-# LINE 40 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 24) |]), {-# LINE 41 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("y", ''Double, {-# LINE 42 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 32) |], {-# LINE 43 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 32) |]), {-# LINE 44 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("axes", ''PtrGdouble, [| (\hsc_ptr -> peekByteOff hsc_ptr 40) |], {-# LINE 46 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 40) |]), {-# LINE 47 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("state", ''Word32, {-# LINE 48 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 48) |], {-# LINE 49 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 48) |]), {-# LINE 50 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("is_hint", ''Int16, {-# LINE 51 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 52) |], {-# LINE 52 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 52) |]), {-# LINE 53 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("device", ''PtrGdkDevice, [| (\hsc_ptr -> peekByteOff hsc_ptr 56) |], {-# LINE 55 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 56) |]), {-# LINE 56 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("x_root", ''Double, {-# LINE 57 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 64) |], {-# LINE 58 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 64) |]), {-# LINE 59 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} ("y_root", ''Double, {-# LINE 60 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> peekByteOff hsc_ptr 72) |], {-# LINE 61 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [| (\hsc_ptr -> pokeByteOff hsc_ptr 72) |]) ] {-# LINE 62 "src/Stopgap/Graphics/UI/Gdk/Event/Motion.hsc" #-} [''Show, ''Eq, ''Ord, ''Storable]