#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Poppler.Enums
(
ActionLayerAction(..) ,
ActionMovieOperation(..) ,
ActionType(..) ,
AdditionalActionType(..) ,
AnnotExternalDataType(..) ,
AnnotFreeTextQuadding(..) ,
AnnotMarkupReplyType(..) ,
AnnotTextState(..) ,
AnnotType(..) ,
Backend(..) ,
DestType(..) ,
Error(..) ,
catchError ,
handleError ,
FontType(..) ,
FormButtonType(..) ,
FormChoiceType(..) ,
FormFieldType(..) ,
FormTextType(..) ,
MoviePlayMode(..) ,
PDFConformance(..) ,
PDFPart(..) ,
PDFSubtype(..) ,
PageLayout(..) ,
PageMode(..) ,
PageTransitionAlignment(..) ,
PageTransitionDirection(..) ,
PageTransitionType(..) ,
PrintScaling(..) ,
SelectionStyle(..) ,
StructureBlockAlign(..) ,
StructureBorderStyle(..) ,
StructureElementKind(..) ,
StructureFormRole(..) ,
StructureFormState(..) ,
StructureGlyphOrientation(..) ,
StructureInlineAlign(..) ,
StructureListNumbering(..) ,
StructurePlacement(..) ,
StructureRubyAlign(..) ,
StructureRubyPosition(..) ,
StructureTableScope(..) ,
StructureTextAlign(..) ,
StructureTextDecoration(..) ,
StructureWritingMode(..) ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
data StructureWritingMode =
StructureWritingModeLrTb
| StructureWritingModeRlTb
| StructureWritingModeTbRl
| AnotherStructureWritingMode Int
deriving (Show, Eq)
instance P.Enum StructureWritingMode where
fromEnum StructureWritingModeLrTb = 0
fromEnum StructureWritingModeRlTb = 1
fromEnum StructureWritingModeTbRl = 2
fromEnum (AnotherStructureWritingMode k) = k
toEnum 0 = StructureWritingModeLrTb
toEnum 1 = StructureWritingModeRlTb
toEnum 2 = StructureWritingModeTbRl
toEnum k = AnotherStructureWritingMode k
instance P.Ord StructureWritingMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_writing_mode_get_type" c_poppler_structure_writing_mode_get_type ::
IO GType
instance BoxedEnum StructureWritingMode where
boxedEnumType _ = c_poppler_structure_writing_mode_get_type
data StructureTextDecoration =
StructureTextDecorationNone
| StructureTextDecorationUnderline
| StructureTextDecorationOverline
| StructureTextDecorationLinethrough
| AnotherStructureTextDecoration Int
deriving (Show, Eq)
instance P.Enum StructureTextDecoration where
fromEnum StructureTextDecorationNone = 0
fromEnum StructureTextDecorationUnderline = 1
fromEnum StructureTextDecorationOverline = 2
fromEnum StructureTextDecorationLinethrough = 3
fromEnum (AnotherStructureTextDecoration k) = k
toEnum 0 = StructureTextDecorationNone
toEnum 1 = StructureTextDecorationUnderline
toEnum 2 = StructureTextDecorationOverline
toEnum 3 = StructureTextDecorationLinethrough
toEnum k = AnotherStructureTextDecoration k
instance P.Ord StructureTextDecoration where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_text_decoration_get_type" c_poppler_structure_text_decoration_get_type ::
IO GType
instance BoxedEnum StructureTextDecoration where
boxedEnumType _ = c_poppler_structure_text_decoration_get_type
data StructureTextAlign =
StructureTextAlignStart
| StructureTextAlignCenter
| StructureTextAlignEnd
| StructureTextAlignJustify
| AnotherStructureTextAlign Int
deriving (Show, Eq)
instance P.Enum StructureTextAlign where
fromEnum StructureTextAlignStart = 0
fromEnum StructureTextAlignCenter = 1
fromEnum StructureTextAlignEnd = 2
fromEnum StructureTextAlignJustify = 3
fromEnum (AnotherStructureTextAlign k) = k
toEnum 0 = StructureTextAlignStart
toEnum 1 = StructureTextAlignCenter
toEnum 2 = StructureTextAlignEnd
toEnum 3 = StructureTextAlignJustify
toEnum k = AnotherStructureTextAlign k
instance P.Ord StructureTextAlign where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_text_align_get_type" c_poppler_structure_text_align_get_type ::
IO GType
instance BoxedEnum StructureTextAlign where
boxedEnumType _ = c_poppler_structure_text_align_get_type
data StructureTableScope =
StructureTableScopeRow
| StructureTableScopeColumn
| StructureTableScopeBoth
| AnotherStructureTableScope Int
deriving (Show, Eq)
instance P.Enum StructureTableScope where
fromEnum StructureTableScopeRow = 0
fromEnum StructureTableScopeColumn = 1
fromEnum StructureTableScopeBoth = 2
fromEnum (AnotherStructureTableScope k) = k
toEnum 0 = StructureTableScopeRow
toEnum 1 = StructureTableScopeColumn
toEnum 2 = StructureTableScopeBoth
toEnum k = AnotherStructureTableScope k
instance P.Ord StructureTableScope where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_table_scope_get_type" c_poppler_structure_table_scope_get_type ::
IO GType
instance BoxedEnum StructureTableScope where
boxedEnumType _ = c_poppler_structure_table_scope_get_type
data StructureRubyPosition =
StructureRubyPositionBefore
| StructureRubyPositionAfter
| StructureRubyPositionWarichu
| StructureRubyPositionInline
| AnotherStructureRubyPosition Int
deriving (Show, Eq)
instance P.Enum StructureRubyPosition where
fromEnum StructureRubyPositionBefore = 0
fromEnum StructureRubyPositionAfter = 1
fromEnum StructureRubyPositionWarichu = 2
fromEnum StructureRubyPositionInline = 3
fromEnum (AnotherStructureRubyPosition k) = k
toEnum 0 = StructureRubyPositionBefore
toEnum 1 = StructureRubyPositionAfter
toEnum 2 = StructureRubyPositionWarichu
toEnum 3 = StructureRubyPositionInline
toEnum k = AnotherStructureRubyPosition k
instance P.Ord StructureRubyPosition where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_ruby_position_get_type" c_poppler_structure_ruby_position_get_type ::
IO GType
instance BoxedEnum StructureRubyPosition where
boxedEnumType _ = c_poppler_structure_ruby_position_get_type
data StructureRubyAlign =
StructureRubyAlignStart
| StructureRubyAlignCenter
| StructureRubyAlignEnd
| StructureRubyAlignJustify
| StructureRubyAlignDistribute
| AnotherStructureRubyAlign Int
deriving (Show, Eq)
instance P.Enum StructureRubyAlign where
fromEnum StructureRubyAlignStart = 0
fromEnum StructureRubyAlignCenter = 1
fromEnum StructureRubyAlignEnd = 2
fromEnum StructureRubyAlignJustify = 3
fromEnum StructureRubyAlignDistribute = 4
fromEnum (AnotherStructureRubyAlign k) = k
toEnum 0 = StructureRubyAlignStart
toEnum 1 = StructureRubyAlignCenter
toEnum 2 = StructureRubyAlignEnd
toEnum 3 = StructureRubyAlignJustify
toEnum 4 = StructureRubyAlignDistribute
toEnum k = AnotherStructureRubyAlign k
instance P.Ord StructureRubyAlign where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_ruby_align_get_type" c_poppler_structure_ruby_align_get_type ::
IO GType
instance BoxedEnum StructureRubyAlign where
boxedEnumType _ = c_poppler_structure_ruby_align_get_type
data StructurePlacement =
StructurePlacementBlock
| StructurePlacementInline
| StructurePlacementBefore
| StructurePlacementStart
| StructurePlacementEnd
| AnotherStructurePlacement Int
deriving (Show, Eq)
instance P.Enum StructurePlacement where
fromEnum StructurePlacementBlock = 0
fromEnum StructurePlacementInline = 1
fromEnum StructurePlacementBefore = 2
fromEnum StructurePlacementStart = 3
fromEnum StructurePlacementEnd = 4
fromEnum (AnotherStructurePlacement k) = k
toEnum 0 = StructurePlacementBlock
toEnum 1 = StructurePlacementInline
toEnum 2 = StructurePlacementBefore
toEnum 3 = StructurePlacementStart
toEnum 4 = StructurePlacementEnd
toEnum k = AnotherStructurePlacement k
instance P.Ord StructurePlacement where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_placement_get_type" c_poppler_structure_placement_get_type ::
IO GType
instance BoxedEnum StructurePlacement where
boxedEnumType _ = c_poppler_structure_placement_get_type
data StructureListNumbering =
StructureListNumberingNone
| StructureListNumberingDisc
| StructureListNumberingCircle
| StructureListNumberingSquare
| StructureListNumberingDecimal
| StructureListNumberingUpperRoman
| StructureListNumberingLowerRoman
| StructureListNumberingUpperAlpha
| StructureListNumberingLowerAlpha
| AnotherStructureListNumbering Int
deriving (Show, Eq)
instance P.Enum StructureListNumbering where
fromEnum StructureListNumberingNone = 0
fromEnum StructureListNumberingDisc = 1
fromEnum StructureListNumberingCircle = 2
fromEnum StructureListNumberingSquare = 3
fromEnum StructureListNumberingDecimal = 4
fromEnum StructureListNumberingUpperRoman = 5
fromEnum StructureListNumberingLowerRoman = 6
fromEnum StructureListNumberingUpperAlpha = 7
fromEnum StructureListNumberingLowerAlpha = 8
fromEnum (AnotherStructureListNumbering k) = k
toEnum 0 = StructureListNumberingNone
toEnum 1 = StructureListNumberingDisc
toEnum 2 = StructureListNumberingCircle
toEnum 3 = StructureListNumberingSquare
toEnum 4 = StructureListNumberingDecimal
toEnum 5 = StructureListNumberingUpperRoman
toEnum 6 = StructureListNumberingLowerRoman
toEnum 7 = StructureListNumberingUpperAlpha
toEnum 8 = StructureListNumberingLowerAlpha
toEnum k = AnotherStructureListNumbering k
instance P.Ord StructureListNumbering where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_list_numbering_get_type" c_poppler_structure_list_numbering_get_type ::
IO GType
instance BoxedEnum StructureListNumbering where
boxedEnumType _ = c_poppler_structure_list_numbering_get_type
data StructureInlineAlign =
StructureInlineAlignStart
| StructureInlineAlignCenter
| StructureInlineAlignEnd
| AnotherStructureInlineAlign Int
deriving (Show, Eq)
instance P.Enum StructureInlineAlign where
fromEnum StructureInlineAlignStart = 0
fromEnum StructureInlineAlignCenter = 1
fromEnum StructureInlineAlignEnd = 2
fromEnum (AnotherStructureInlineAlign k) = k
toEnum 0 = StructureInlineAlignStart
toEnum 1 = StructureInlineAlignCenter
toEnum 2 = StructureInlineAlignEnd
toEnum k = AnotherStructureInlineAlign k
instance P.Ord StructureInlineAlign where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_inline_align_get_type" c_poppler_structure_inline_align_get_type ::
IO GType
instance BoxedEnum StructureInlineAlign where
boxedEnumType _ = c_poppler_structure_inline_align_get_type
data StructureGlyphOrientation =
StructureGlyphOrientationAuto
| StructureGlyphOrientation0
| StructureGlyphOrientation90
| StructureGlyphOrientation180
| StructureGlyphOrientation270
| AnotherStructureGlyphOrientation Int
deriving (Show, Eq)
instance P.Enum StructureGlyphOrientation where
fromEnum StructureGlyphOrientationAuto = 0
fromEnum StructureGlyphOrientation0 = 0
fromEnum StructureGlyphOrientation90 = 1
fromEnum StructureGlyphOrientation180 = 2
fromEnum StructureGlyphOrientation270 = 3
fromEnum (AnotherStructureGlyphOrientation k) = k
toEnum 0 = StructureGlyphOrientationAuto
toEnum 1 = StructureGlyphOrientation90
toEnum 2 = StructureGlyphOrientation180
toEnum 3 = StructureGlyphOrientation270
toEnum k = AnotherStructureGlyphOrientation k
instance P.Ord StructureGlyphOrientation where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_glyph_orientation_get_type" c_poppler_structure_glyph_orientation_get_type ::
IO GType
instance BoxedEnum StructureGlyphOrientation where
boxedEnumType _ = c_poppler_structure_glyph_orientation_get_type
data StructureFormState =
StructureFormStateOn
| StructureFormStateOff
| StructureFormStateNeutral
| AnotherStructureFormState Int
deriving (Show, Eq)
instance P.Enum StructureFormState where
fromEnum StructureFormStateOn = 0
fromEnum StructureFormStateOff = 1
fromEnum StructureFormStateNeutral = 2
fromEnum (AnotherStructureFormState k) = k
toEnum 0 = StructureFormStateOn
toEnum 1 = StructureFormStateOff
toEnum 2 = StructureFormStateNeutral
toEnum k = AnotherStructureFormState k
instance P.Ord StructureFormState where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_form_state_get_type" c_poppler_structure_form_state_get_type ::
IO GType
instance BoxedEnum StructureFormState where
boxedEnumType _ = c_poppler_structure_form_state_get_type
data StructureFormRole =
StructureFormRoleUndefined
| StructureFormRoleRadioButton
| StructureFormRolePushButton
| StructureFormRoleTextValue
| StructureFormRoleCheckbox
| AnotherStructureFormRole Int
deriving (Show, Eq)
instance P.Enum StructureFormRole where
fromEnum StructureFormRoleUndefined = 0
fromEnum StructureFormRoleRadioButton = 1
fromEnum StructureFormRolePushButton = 2
fromEnum StructureFormRoleTextValue = 3
fromEnum StructureFormRoleCheckbox = 4
fromEnum (AnotherStructureFormRole k) = k
toEnum 0 = StructureFormRoleUndefined
toEnum 1 = StructureFormRoleRadioButton
toEnum 2 = StructureFormRolePushButton
toEnum 3 = StructureFormRoleTextValue
toEnum 4 = StructureFormRoleCheckbox
toEnum k = AnotherStructureFormRole k
instance P.Ord StructureFormRole where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_form_role_get_type" c_poppler_structure_form_role_get_type ::
IO GType
instance BoxedEnum StructureFormRole where
boxedEnumType _ = c_poppler_structure_form_role_get_type
data StructureElementKind =
StructureElementKindContent
| StructureElementKindObjectReference
| StructureElementKindDocument
| StructureElementKindPart
| StructureElementKindArticle
| StructureElementKindSection
| StructureElementKindDiv
| StructureElementKindSpan
| StructureElementKindQuote
| StructureElementKindNote
| StructureElementKindReference
| StructureElementKindBibentry
| StructureElementKindCode
| StructureElementKindLink
| StructureElementKindAnnot
| StructureElementKindBlockquote
| StructureElementKindCaption
| StructureElementKindNonstruct
| StructureElementKindToc
| StructureElementKindTocItem
| StructureElementKindIndex
| StructureElementKindPrivate
| StructureElementKindParagraph
| StructureElementKindHeading
| StructureElementKindHeading1
| StructureElementKindHeading2
| StructureElementKindHeading3
| StructureElementKindHeading4
| StructureElementKindHeading5
| StructureElementKindHeading6
| StructureElementKindList
| StructureElementKindListItem
| StructureElementKindListLabel
| StructureElementKindListBody
| StructureElementKindTable
| StructureElementKindTableRow
| StructureElementKindTableHeading
| StructureElementKindTableData
| StructureElementKindTableHeader
| StructureElementKindTableFooter
| StructureElementKindTableBody
| StructureElementKindRuby
| StructureElementKindRubyBaseText
| StructureElementKindRubyAnnotText
| StructureElementKindRubyPunctuation
| StructureElementKindWarichu
| StructureElementKindWarichuText
| StructureElementKindWarichuPunctuation
| StructureElementKindFigure
| StructureElementKindFormula
| StructureElementKindForm
| AnotherStructureElementKind Int
deriving (Show, Eq)
instance P.Enum StructureElementKind where
fromEnum StructureElementKindContent = 0
fromEnum StructureElementKindObjectReference = 1
fromEnum StructureElementKindDocument = 2
fromEnum StructureElementKindPart = 3
fromEnum StructureElementKindArticle = 4
fromEnum StructureElementKindSection = 5
fromEnum StructureElementKindDiv = 6
fromEnum StructureElementKindSpan = 7
fromEnum StructureElementKindQuote = 8
fromEnum StructureElementKindNote = 9
fromEnum StructureElementKindReference = 10
fromEnum StructureElementKindBibentry = 11
fromEnum StructureElementKindCode = 12
fromEnum StructureElementKindLink = 13
fromEnum StructureElementKindAnnot = 14
fromEnum StructureElementKindBlockquote = 15
fromEnum StructureElementKindCaption = 16
fromEnum StructureElementKindNonstruct = 17
fromEnum StructureElementKindToc = 18
fromEnum StructureElementKindTocItem = 19
fromEnum StructureElementKindIndex = 20
fromEnum StructureElementKindPrivate = 21
fromEnum StructureElementKindParagraph = 22
fromEnum StructureElementKindHeading = 23
fromEnum StructureElementKindHeading1 = 24
fromEnum StructureElementKindHeading2 = 25
fromEnum StructureElementKindHeading3 = 26
fromEnum StructureElementKindHeading4 = 27
fromEnum StructureElementKindHeading5 = 28
fromEnum StructureElementKindHeading6 = 29
fromEnum StructureElementKindList = 30
fromEnum StructureElementKindListItem = 31
fromEnum StructureElementKindListLabel = 32
fromEnum StructureElementKindListBody = 33
fromEnum StructureElementKindTable = 34
fromEnum StructureElementKindTableRow = 35
fromEnum StructureElementKindTableHeading = 36
fromEnum StructureElementKindTableData = 37
fromEnum StructureElementKindTableHeader = 38
fromEnum StructureElementKindTableFooter = 39
fromEnum StructureElementKindTableBody = 40
fromEnum StructureElementKindRuby = 41
fromEnum StructureElementKindRubyBaseText = 42
fromEnum StructureElementKindRubyAnnotText = 43
fromEnum StructureElementKindRubyPunctuation = 44
fromEnum StructureElementKindWarichu = 45
fromEnum StructureElementKindWarichuText = 46
fromEnum StructureElementKindWarichuPunctuation = 47
fromEnum StructureElementKindFigure = 48
fromEnum StructureElementKindFormula = 49
fromEnum StructureElementKindForm = 50
fromEnum (AnotherStructureElementKind k) = k
toEnum 0 = StructureElementKindContent
toEnum 1 = StructureElementKindObjectReference
toEnum 2 = StructureElementKindDocument
toEnum 3 = StructureElementKindPart
toEnum 4 = StructureElementKindArticle
toEnum 5 = StructureElementKindSection
toEnum 6 = StructureElementKindDiv
toEnum 7 = StructureElementKindSpan
toEnum 8 = StructureElementKindQuote
toEnum 9 = StructureElementKindNote
toEnum 10 = StructureElementKindReference
toEnum 11 = StructureElementKindBibentry
toEnum 12 = StructureElementKindCode
toEnum 13 = StructureElementKindLink
toEnum 14 = StructureElementKindAnnot
toEnum 15 = StructureElementKindBlockquote
toEnum 16 = StructureElementKindCaption
toEnum 17 = StructureElementKindNonstruct
toEnum 18 = StructureElementKindToc
toEnum 19 = StructureElementKindTocItem
toEnum 20 = StructureElementKindIndex
toEnum 21 = StructureElementKindPrivate
toEnum 22 = StructureElementKindParagraph
toEnum 23 = StructureElementKindHeading
toEnum 24 = StructureElementKindHeading1
toEnum 25 = StructureElementKindHeading2
toEnum 26 = StructureElementKindHeading3
toEnum 27 = StructureElementKindHeading4
toEnum 28 = StructureElementKindHeading5
toEnum 29 = StructureElementKindHeading6
toEnum 30 = StructureElementKindList
toEnum 31 = StructureElementKindListItem
toEnum 32 = StructureElementKindListLabel
toEnum 33 = StructureElementKindListBody
toEnum 34 = StructureElementKindTable
toEnum 35 = StructureElementKindTableRow
toEnum 36 = StructureElementKindTableHeading
toEnum 37 = StructureElementKindTableData
toEnum 38 = StructureElementKindTableHeader
toEnum 39 = StructureElementKindTableFooter
toEnum 40 = StructureElementKindTableBody
toEnum 41 = StructureElementKindRuby
toEnum 42 = StructureElementKindRubyBaseText
toEnum 43 = StructureElementKindRubyAnnotText
toEnum 44 = StructureElementKindRubyPunctuation
toEnum 45 = StructureElementKindWarichu
toEnum 46 = StructureElementKindWarichuText
toEnum 47 = StructureElementKindWarichuPunctuation
toEnum 48 = StructureElementKindFigure
toEnum 49 = StructureElementKindFormula
toEnum 50 = StructureElementKindForm
toEnum k = AnotherStructureElementKind k
instance P.Ord StructureElementKind where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_element_kind_get_type" c_poppler_structure_element_kind_get_type ::
IO GType
instance BoxedEnum StructureElementKind where
boxedEnumType _ = c_poppler_structure_element_kind_get_type
data StructureBorderStyle =
StructureBorderStyleNone
| StructureBorderStyleHidden
| StructureBorderStyleDotted
| StructureBorderStyleDashed
| StructureBorderStyleSolid
| StructureBorderStyleDouble
| StructureBorderStyleGroove
| StructureBorderStyleInset
| StructureBorderStyleOutset
| AnotherStructureBorderStyle Int
deriving (Show, Eq)
instance P.Enum StructureBorderStyle where
fromEnum StructureBorderStyleNone = 0
fromEnum StructureBorderStyleHidden = 1
fromEnum StructureBorderStyleDotted = 2
fromEnum StructureBorderStyleDashed = 3
fromEnum StructureBorderStyleSolid = 4
fromEnum StructureBorderStyleDouble = 5
fromEnum StructureBorderStyleGroove = 6
fromEnum StructureBorderStyleInset = 7
fromEnum StructureBorderStyleOutset = 8
fromEnum (AnotherStructureBorderStyle k) = k
toEnum 0 = StructureBorderStyleNone
toEnum 1 = StructureBorderStyleHidden
toEnum 2 = StructureBorderStyleDotted
toEnum 3 = StructureBorderStyleDashed
toEnum 4 = StructureBorderStyleSolid
toEnum 5 = StructureBorderStyleDouble
toEnum 6 = StructureBorderStyleGroove
toEnum 7 = StructureBorderStyleInset
toEnum 8 = StructureBorderStyleOutset
toEnum k = AnotherStructureBorderStyle k
instance P.Ord StructureBorderStyle where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_border_style_get_type" c_poppler_structure_border_style_get_type ::
IO GType
instance BoxedEnum StructureBorderStyle where
boxedEnumType _ = c_poppler_structure_border_style_get_type
data StructureBlockAlign =
StructureBlockAlignBefore
| StructureBlockAlignMiddle
| StructureBlockAlignAfter
| StructureBlockAlignJustify
| AnotherStructureBlockAlign Int
deriving (Show, Eq)
instance P.Enum StructureBlockAlign where
fromEnum StructureBlockAlignBefore = 0
fromEnum StructureBlockAlignMiddle = 1
fromEnum StructureBlockAlignAfter = 2
fromEnum StructureBlockAlignJustify = 3
fromEnum (AnotherStructureBlockAlign k) = k
toEnum 0 = StructureBlockAlignBefore
toEnum 1 = StructureBlockAlignMiddle
toEnum 2 = StructureBlockAlignAfter
toEnum 3 = StructureBlockAlignJustify
toEnum k = AnotherStructureBlockAlign k
instance P.Ord StructureBlockAlign where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_structure_block_align_get_type" c_poppler_structure_block_align_get_type ::
IO GType
instance BoxedEnum StructureBlockAlign where
boxedEnumType _ = c_poppler_structure_block_align_get_type
data SelectionStyle =
SelectionStyleGlyph
| SelectionStyleWord
| SelectionStyleLine
| AnotherSelectionStyle Int
deriving (Show, Eq)
instance P.Enum SelectionStyle where
fromEnum SelectionStyleGlyph = 0
fromEnum SelectionStyleWord = 1
fromEnum SelectionStyleLine = 2
fromEnum (AnotherSelectionStyle k) = k
toEnum 0 = SelectionStyleGlyph
toEnum 1 = SelectionStyleWord
toEnum 2 = SelectionStyleLine
toEnum k = AnotherSelectionStyle k
instance P.Ord SelectionStyle where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_selection_style_get_type" c_poppler_selection_style_get_type ::
IO GType
instance BoxedEnum SelectionStyle where
boxedEnumType _ = c_poppler_selection_style_get_type
data PrintScaling =
PrintScalingAppDefault
| PrintScalingNone
| AnotherPrintScaling Int
deriving (Show, Eq)
instance P.Enum PrintScaling where
fromEnum PrintScalingAppDefault = 0
fromEnum PrintScalingNone = 1
fromEnum (AnotherPrintScaling k) = k
toEnum 0 = PrintScalingAppDefault
toEnum 1 = PrintScalingNone
toEnum k = AnotherPrintScaling k
instance P.Ord PrintScaling where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_print_scaling_get_type" c_poppler_print_scaling_get_type ::
IO GType
instance BoxedEnum PrintScaling where
boxedEnumType _ = c_poppler_print_scaling_get_type
data PageTransitionType =
PageTransitionTypeReplace
| PageTransitionTypeSplit
| PageTransitionTypeBlinds
| PageTransitionTypeBox
| PageTransitionTypeWipe
| PageTransitionTypeDissolve
| PageTransitionTypeGlitter
| PageTransitionTypeFly
| PageTransitionTypePush
| PageTransitionTypeCover
| PageTransitionTypeUncover
| PageTransitionTypeFade
| AnotherPageTransitionType Int
deriving (Show, Eq)
instance P.Enum PageTransitionType where
fromEnum PageTransitionTypeReplace = 0
fromEnum PageTransitionTypeSplit = 1
fromEnum PageTransitionTypeBlinds = 2
fromEnum PageTransitionTypeBox = 3
fromEnum PageTransitionTypeWipe = 4
fromEnum PageTransitionTypeDissolve = 5
fromEnum PageTransitionTypeGlitter = 6
fromEnum PageTransitionTypeFly = 7
fromEnum PageTransitionTypePush = 8
fromEnum PageTransitionTypeCover = 9
fromEnum PageTransitionTypeUncover = 10
fromEnum PageTransitionTypeFade = 11
fromEnum (AnotherPageTransitionType k) = k
toEnum 0 = PageTransitionTypeReplace
toEnum 1 = PageTransitionTypeSplit
toEnum 2 = PageTransitionTypeBlinds
toEnum 3 = PageTransitionTypeBox
toEnum 4 = PageTransitionTypeWipe
toEnum 5 = PageTransitionTypeDissolve
toEnum 6 = PageTransitionTypeGlitter
toEnum 7 = PageTransitionTypeFly
toEnum 8 = PageTransitionTypePush
toEnum 9 = PageTransitionTypeCover
toEnum 10 = PageTransitionTypeUncover
toEnum 11 = PageTransitionTypeFade
toEnum k = AnotherPageTransitionType k
instance P.Ord PageTransitionType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_page_transition_type_get_type" c_poppler_page_transition_type_get_type ::
IO GType
instance BoxedEnum PageTransitionType where
boxedEnumType _ = c_poppler_page_transition_type_get_type
data PageTransitionDirection =
PageTransitionDirectionInward
| PageTransitionDirectionOutward
| AnotherPageTransitionDirection Int
deriving (Show, Eq)
instance P.Enum PageTransitionDirection where
fromEnum PageTransitionDirectionInward = 0
fromEnum PageTransitionDirectionOutward = 1
fromEnum (AnotherPageTransitionDirection k) = k
toEnum 0 = PageTransitionDirectionInward
toEnum 1 = PageTransitionDirectionOutward
toEnum k = AnotherPageTransitionDirection k
instance P.Ord PageTransitionDirection where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_page_transition_direction_get_type" c_poppler_page_transition_direction_get_type ::
IO GType
instance BoxedEnum PageTransitionDirection where
boxedEnumType _ = c_poppler_page_transition_direction_get_type
data PageTransitionAlignment =
PageTransitionAlignmentHorizontal
| PageTransitionAlignmentVertical
| AnotherPageTransitionAlignment Int
deriving (Show, Eq)
instance P.Enum PageTransitionAlignment where
fromEnum PageTransitionAlignmentHorizontal = 0
fromEnum PageTransitionAlignmentVertical = 1
fromEnum (AnotherPageTransitionAlignment k) = k
toEnum 0 = PageTransitionAlignmentHorizontal
toEnum 1 = PageTransitionAlignmentVertical
toEnum k = AnotherPageTransitionAlignment k
instance P.Ord PageTransitionAlignment where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_page_transition_alignment_get_type" c_poppler_page_transition_alignment_get_type ::
IO GType
instance BoxedEnum PageTransitionAlignment where
boxedEnumType _ = c_poppler_page_transition_alignment_get_type
data PageMode =
PageModeUnset
| PageModeNone
| PageModeUseOutlines
| PageModeUseThumbs
| PageModeFullScreen
| PageModeUseOc
| PageModeUseAttachments
| AnotherPageMode Int
deriving (Show, Eq)
instance P.Enum PageMode where
fromEnum PageModeUnset = 0
fromEnum PageModeNone = 1
fromEnum PageModeUseOutlines = 2
fromEnum PageModeUseThumbs = 3
fromEnum PageModeFullScreen = 4
fromEnum PageModeUseOc = 5
fromEnum PageModeUseAttachments = 6
fromEnum (AnotherPageMode k) = k
toEnum 0 = PageModeUnset
toEnum 1 = PageModeNone
toEnum 2 = PageModeUseOutlines
toEnum 3 = PageModeUseThumbs
toEnum 4 = PageModeFullScreen
toEnum 5 = PageModeUseOc
toEnum 6 = PageModeUseAttachments
toEnum k = AnotherPageMode k
instance P.Ord PageMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_page_mode_get_type" c_poppler_page_mode_get_type ::
IO GType
instance BoxedEnum PageMode where
boxedEnumType _ = c_poppler_page_mode_get_type
data PageLayout =
PageLayoutUnset
| PageLayoutSinglePage
| PageLayoutOneColumn
| PageLayoutTwoColumnLeft
| PageLayoutTwoColumnRight
| PageLayoutTwoPageLeft
| PageLayoutTwoPageRight
| AnotherPageLayout Int
deriving (Show, Eq)
instance P.Enum PageLayout where
fromEnum PageLayoutUnset = 0
fromEnum PageLayoutSinglePage = 1
fromEnum PageLayoutOneColumn = 2
fromEnum PageLayoutTwoColumnLeft = 3
fromEnum PageLayoutTwoColumnRight = 4
fromEnum PageLayoutTwoPageLeft = 5
fromEnum PageLayoutTwoPageRight = 6
fromEnum (AnotherPageLayout k) = k
toEnum 0 = PageLayoutUnset
toEnum 1 = PageLayoutSinglePage
toEnum 2 = PageLayoutOneColumn
toEnum 3 = PageLayoutTwoColumnLeft
toEnum 4 = PageLayoutTwoColumnRight
toEnum 5 = PageLayoutTwoPageLeft
toEnum 6 = PageLayoutTwoPageRight
toEnum k = AnotherPageLayout k
instance P.Ord PageLayout where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_page_layout_get_type" c_poppler_page_layout_get_type ::
IO GType
instance BoxedEnum PageLayout where
boxedEnumType _ = c_poppler_page_layout_get_type
data PDFSubtype =
PDFSubtypeUnset
| PDFSubtypePdfA
| PDFSubtypePdfE
| PDFSubtypePdfUa
| PDFSubtypePdfVt
| PDFSubtypePdfX
| PDFSubtypeNone
| AnotherPDFSubtype Int
deriving (Show, Eq)
instance P.Enum PDFSubtype where
fromEnum PDFSubtypeUnset = 0
fromEnum PDFSubtypePdfA = 1
fromEnum PDFSubtypePdfE = 2
fromEnum PDFSubtypePdfUa = 3
fromEnum PDFSubtypePdfVt = 4
fromEnum PDFSubtypePdfX = 5
fromEnum PDFSubtypeNone = 6
fromEnum (AnotherPDFSubtype k) = k
toEnum 0 = PDFSubtypeUnset
toEnum 1 = PDFSubtypePdfA
toEnum 2 = PDFSubtypePdfE
toEnum 3 = PDFSubtypePdfUa
toEnum 4 = PDFSubtypePdfVt
toEnum 5 = PDFSubtypePdfX
toEnum 6 = PDFSubtypeNone
toEnum k = AnotherPDFSubtype k
instance P.Ord PDFSubtype where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_pdf_subtype_get_type" c_poppler_pdf_subtype_get_type ::
IO GType
instance BoxedEnum PDFSubtype where
boxedEnumType _ = c_poppler_pdf_subtype_get_type
data PDFPart =
PDFPartUnset
| PDFPart1
| PDFPart2
| PDFPart3
| PDFPart4
| PDFPart5
| PDFPart6
| PDFPart7
| PDFPart8
| PDFPartNone
| AnotherPDFPart Int
deriving (Show, Eq)
instance P.Enum PDFPart where
fromEnum PDFPartUnset = 0
fromEnum PDFPart1 = 1
fromEnum PDFPart2 = 2
fromEnum PDFPart3 = 3
fromEnum PDFPart4 = 4
fromEnum PDFPart5 = 5
fromEnum PDFPart6 = 6
fromEnum PDFPart7 = 7
fromEnum PDFPart8 = 8
fromEnum PDFPartNone = 9
fromEnum (AnotherPDFPart k) = k
toEnum 0 = PDFPartUnset
toEnum 1 = PDFPart1
toEnum 2 = PDFPart2
toEnum 3 = PDFPart3
toEnum 4 = PDFPart4
toEnum 5 = PDFPart5
toEnum 6 = PDFPart6
toEnum 7 = PDFPart7
toEnum 8 = PDFPart8
toEnum 9 = PDFPartNone
toEnum k = AnotherPDFPart k
instance P.Ord PDFPart where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_pdf_part_get_type" c_poppler_pdf_part_get_type ::
IO GType
instance BoxedEnum PDFPart where
boxedEnumType _ = c_poppler_pdf_part_get_type
data PDFConformance =
PDFConformanceUnset
| PDFConformanceA
| PDFConformanceB
| PDFConformanceG
| PDFConformanceN
| PDFConformanceP
| PDFConformancePg
| PDFConformanceU
| PDFConformanceNone
| AnotherPDFConformance Int
deriving (Show, Eq)
instance P.Enum PDFConformance where
fromEnum PDFConformanceUnset = 0
fromEnum PDFConformanceA = 1
fromEnum PDFConformanceB = 2
fromEnum PDFConformanceG = 3
fromEnum PDFConformanceN = 4
fromEnum PDFConformanceP = 5
fromEnum PDFConformancePg = 6
fromEnum PDFConformanceU = 7
fromEnum PDFConformanceNone = 8
fromEnum (AnotherPDFConformance k) = k
toEnum 0 = PDFConformanceUnset
toEnum 1 = PDFConformanceA
toEnum 2 = PDFConformanceB
toEnum 3 = PDFConformanceG
toEnum 4 = PDFConformanceN
toEnum 5 = PDFConformanceP
toEnum 6 = PDFConformancePg
toEnum 7 = PDFConformanceU
toEnum 8 = PDFConformanceNone
toEnum k = AnotherPDFConformance k
instance P.Ord PDFConformance where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_pdf_conformance_get_type" c_poppler_pdf_conformance_get_type ::
IO GType
instance BoxedEnum PDFConformance where
boxedEnumType _ = c_poppler_pdf_conformance_get_type
data MoviePlayMode =
MoviePlayModeOnce
| MoviePlayModeOpen
| MoviePlayModeRepeat
| MoviePlayModePalindrome
| AnotherMoviePlayMode Int
deriving (Show, Eq)
instance P.Enum MoviePlayMode where
fromEnum MoviePlayModeOnce = 0
fromEnum MoviePlayModeOpen = 1
fromEnum MoviePlayModeRepeat = 2
fromEnum MoviePlayModePalindrome = 3
fromEnum (AnotherMoviePlayMode k) = k
toEnum 0 = MoviePlayModeOnce
toEnum 1 = MoviePlayModeOpen
toEnum 2 = MoviePlayModeRepeat
toEnum 3 = MoviePlayModePalindrome
toEnum k = AnotherMoviePlayMode k
instance P.Ord MoviePlayMode where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_movie_play_mode_get_type" c_poppler_movie_play_mode_get_type ::
IO GType
instance BoxedEnum MoviePlayMode where
boxedEnumType _ = c_poppler_movie_play_mode_get_type
data FormTextType =
FormTextTypeNormal
| FormTextTypeMultiline
| FormTextTypeFileSelect
| AnotherFormTextType Int
deriving (Show, Eq)
instance P.Enum FormTextType where
fromEnum FormTextTypeNormal = 0
fromEnum FormTextTypeMultiline = 1
fromEnum FormTextTypeFileSelect = 2
fromEnum (AnotherFormTextType k) = k
toEnum 0 = FormTextTypeNormal
toEnum 1 = FormTextTypeMultiline
toEnum 2 = FormTextTypeFileSelect
toEnum k = AnotherFormTextType k
instance P.Ord FormTextType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_form_text_type_get_type" c_poppler_form_text_type_get_type ::
IO GType
instance BoxedEnum FormTextType where
boxedEnumType _ = c_poppler_form_text_type_get_type
data FormFieldType =
FormFieldTypeUnknown
| FormFieldTypeButton
| FormFieldTypeText
| FormFieldTypeChoice
| FormFieldTypeSignature
| AnotherFormFieldType Int
deriving (Show, Eq)
instance P.Enum FormFieldType where
fromEnum FormFieldTypeUnknown = 0
fromEnum FormFieldTypeButton = 1
fromEnum FormFieldTypeText = 2
fromEnum FormFieldTypeChoice = 3
fromEnum FormFieldTypeSignature = 4
fromEnum (AnotherFormFieldType k) = k
toEnum 0 = FormFieldTypeUnknown
toEnum 1 = FormFieldTypeButton
toEnum 2 = FormFieldTypeText
toEnum 3 = FormFieldTypeChoice
toEnum 4 = FormFieldTypeSignature
toEnum k = AnotherFormFieldType k
instance P.Ord FormFieldType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_form_field_type_get_type" c_poppler_form_field_type_get_type ::
IO GType
instance BoxedEnum FormFieldType where
boxedEnumType _ = c_poppler_form_field_type_get_type
data FormChoiceType =
FormChoiceTypeCombo
| FormChoiceTypeList
| AnotherFormChoiceType Int
deriving (Show, Eq)
instance P.Enum FormChoiceType where
fromEnum FormChoiceTypeCombo = 0
fromEnum FormChoiceTypeList = 1
fromEnum (AnotherFormChoiceType k) = k
toEnum 0 = FormChoiceTypeCombo
toEnum 1 = FormChoiceTypeList
toEnum k = AnotherFormChoiceType k
instance P.Ord FormChoiceType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_form_choice_type_get_type" c_poppler_form_choice_type_get_type ::
IO GType
instance BoxedEnum FormChoiceType where
boxedEnumType _ = c_poppler_form_choice_type_get_type
data FormButtonType =
FormButtonTypePush
| FormButtonTypeCheck
| FormButtonTypeRadio
| AnotherFormButtonType Int
deriving (Show, Eq)
instance P.Enum FormButtonType where
fromEnum FormButtonTypePush = 0
fromEnum FormButtonTypeCheck = 1
fromEnum FormButtonTypeRadio = 2
fromEnum (AnotherFormButtonType k) = k
toEnum 0 = FormButtonTypePush
toEnum 1 = FormButtonTypeCheck
toEnum 2 = FormButtonTypeRadio
toEnum k = AnotherFormButtonType k
instance P.Ord FormButtonType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_form_button_type_get_type" c_poppler_form_button_type_get_type ::
IO GType
instance BoxedEnum FormButtonType where
boxedEnumType _ = c_poppler_form_button_type_get_type
data FontType =
FontTypeUnknown
| FontTypeType1
| FontTypeType1c
| FontTypeType1cot
| FontTypeType3
| FontTypeTruetype
| FontTypeTruetypeot
| FontTypeCidType0
| FontTypeCidType0c
| FontTypeCidType0cot
| FontTypeCidType2
| FontTypeCidType2ot
| AnotherFontType Int
deriving (Show, Eq)
instance P.Enum FontType where
fromEnum FontTypeUnknown = 0
fromEnum FontTypeType1 = 1
fromEnum FontTypeType1c = 2
fromEnum FontTypeType1cot = 3
fromEnum FontTypeType3 = 4
fromEnum FontTypeTruetype = 5
fromEnum FontTypeTruetypeot = 6
fromEnum FontTypeCidType0 = 7
fromEnum FontTypeCidType0c = 8
fromEnum FontTypeCidType0cot = 9
fromEnum FontTypeCidType2 = 10
fromEnum FontTypeCidType2ot = 11
fromEnum (AnotherFontType k) = k
toEnum 0 = FontTypeUnknown
toEnum 1 = FontTypeType1
toEnum 2 = FontTypeType1c
toEnum 3 = FontTypeType1cot
toEnum 4 = FontTypeType3
toEnum 5 = FontTypeTruetype
toEnum 6 = FontTypeTruetypeot
toEnum 7 = FontTypeCidType0
toEnum 8 = FontTypeCidType0c
toEnum 9 = FontTypeCidType0cot
toEnum 10 = FontTypeCidType2
toEnum 11 = FontTypeCidType2ot
toEnum k = AnotherFontType k
instance P.Ord FontType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_font_type_get_type" c_poppler_font_type_get_type ::
IO GType
instance BoxedEnum FontType where
boxedEnumType _ = c_poppler_font_type_get_type
data Error =
ErrorInvalid
| ErrorEncrypted
| ErrorOpenFile
| ErrorBadCatalog
| ErrorDamaged
| AnotherError Int
deriving (Show, Eq)
instance P.Enum Error where
fromEnum ErrorInvalid = 0
fromEnum ErrorEncrypted = 1
fromEnum ErrorOpenFile = 2
fromEnum ErrorBadCatalog = 3
fromEnum ErrorDamaged = 4
fromEnum (AnotherError k) = k
toEnum 0 = ErrorInvalid
toEnum 1 = ErrorEncrypted
toEnum 2 = ErrorOpenFile
toEnum 3 = ErrorBadCatalog
toEnum 4 = ErrorDamaged
toEnum k = AnotherError k
instance P.Ord Error where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
instance GErrorClass Error where
gerrorClassDomain _ = "poppler-quark"
catchError ::
IO a ->
(Error -> GErrorMessage -> IO a) ->
IO a
catchError = catchGErrorJustDomain
handleError ::
(Error -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleError = handleGErrorJustDomain
foreign import ccall "poppler_error_get_type" c_poppler_error_get_type ::
IO GType
instance BoxedEnum Error where
boxedEnumType _ = c_poppler_error_get_type
data DestType =
DestTypeUnknown
| DestTypeXyz
| DestTypeFit
| DestTypeFith
| DestTypeFitv
| DestTypeFitr
| DestTypeFitb
| DestTypeFitbh
| DestTypeFitbv
| DestTypeNamed
| AnotherDestType Int
deriving (Show, Eq)
instance P.Enum DestType where
fromEnum DestTypeUnknown = 0
fromEnum DestTypeXyz = 1
fromEnum DestTypeFit = 2
fromEnum DestTypeFith = 3
fromEnum DestTypeFitv = 4
fromEnum DestTypeFitr = 5
fromEnum DestTypeFitb = 6
fromEnum DestTypeFitbh = 7
fromEnum DestTypeFitbv = 8
fromEnum DestTypeNamed = 9
fromEnum (AnotherDestType k) = k
toEnum 0 = DestTypeUnknown
toEnum 1 = DestTypeXyz
toEnum 2 = DestTypeFit
toEnum 3 = DestTypeFith
toEnum 4 = DestTypeFitv
toEnum 5 = DestTypeFitr
toEnum 6 = DestTypeFitb
toEnum 7 = DestTypeFitbh
toEnum 8 = DestTypeFitbv
toEnum 9 = DestTypeNamed
toEnum k = AnotherDestType k
instance P.Ord DestType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_dest_type_get_type" c_poppler_dest_type_get_type ::
IO GType
instance BoxedEnum DestType where
boxedEnumType _ = c_poppler_dest_type_get_type
data Backend =
BackendUnknown
| BackendSplash
| BackendCairo
| AnotherBackend Int
deriving (Show, Eq)
instance P.Enum Backend where
fromEnum BackendUnknown = 0
fromEnum BackendSplash = 1
fromEnum BackendCairo = 2
fromEnum (AnotherBackend k) = k
toEnum 0 = BackendUnknown
toEnum 1 = BackendSplash
toEnum 2 = BackendCairo
toEnum k = AnotherBackend k
instance P.Ord Backend where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_backend_get_type" c_poppler_backend_get_type ::
IO GType
instance BoxedEnum Backend where
boxedEnumType _ = c_poppler_backend_get_type
data AnnotType =
AnnotTypeUnknown
| AnnotTypeText
| AnnotTypeLink
| AnnotTypeFreeText
| AnnotTypeLine
| AnnotTypeSquare
| AnnotTypeCircle
| AnnotTypePolygon
| AnnotTypePolyLine
| AnnotTypeHighlight
| AnnotTypeUnderline
| AnnotTypeSquiggly
| AnnotTypeStrikeOut
| AnnotTypeStamp
| AnnotTypeCaret
| AnnotTypeInk
| AnnotTypePopup
| AnnotTypeFileAttachment
| AnnotTypeSound
| AnnotTypeMovie
| AnnotTypeWidget
| AnnotTypeScreen
| AnnotTypePrinterMark
| AnnotTypeTrapNet
| AnnotTypeWatermark
| AnnotType3d
| AnotherAnnotType Int
deriving (Show, Eq)
instance P.Enum AnnotType where
fromEnum AnnotTypeUnknown = 0
fromEnum AnnotTypeText = 1
fromEnum AnnotTypeLink = 2
fromEnum AnnotTypeFreeText = 3
fromEnum AnnotTypeLine = 4
fromEnum AnnotTypeSquare = 5
fromEnum AnnotTypeCircle = 6
fromEnum AnnotTypePolygon = 7
fromEnum AnnotTypePolyLine = 8
fromEnum AnnotTypeHighlight = 9
fromEnum AnnotTypeUnderline = 10
fromEnum AnnotTypeSquiggly = 11
fromEnum AnnotTypeStrikeOut = 12
fromEnum AnnotTypeStamp = 13
fromEnum AnnotTypeCaret = 14
fromEnum AnnotTypeInk = 15
fromEnum AnnotTypePopup = 16
fromEnum AnnotTypeFileAttachment = 17
fromEnum AnnotTypeSound = 18
fromEnum AnnotTypeMovie = 19
fromEnum AnnotTypeWidget = 20
fromEnum AnnotTypeScreen = 21
fromEnum AnnotTypePrinterMark = 22
fromEnum AnnotTypeTrapNet = 23
fromEnum AnnotTypeWatermark = 24
fromEnum AnnotType3d = 25
fromEnum (AnotherAnnotType k) = k
toEnum 0 = AnnotTypeUnknown
toEnum 1 = AnnotTypeText
toEnum 2 = AnnotTypeLink
toEnum 3 = AnnotTypeFreeText
toEnum 4 = AnnotTypeLine
toEnum 5 = AnnotTypeSquare
toEnum 6 = AnnotTypeCircle
toEnum 7 = AnnotTypePolygon
toEnum 8 = AnnotTypePolyLine
toEnum 9 = AnnotTypeHighlight
toEnum 10 = AnnotTypeUnderline
toEnum 11 = AnnotTypeSquiggly
toEnum 12 = AnnotTypeStrikeOut
toEnum 13 = AnnotTypeStamp
toEnum 14 = AnnotTypeCaret
toEnum 15 = AnnotTypeInk
toEnum 16 = AnnotTypePopup
toEnum 17 = AnnotTypeFileAttachment
toEnum 18 = AnnotTypeSound
toEnum 19 = AnnotTypeMovie
toEnum 20 = AnnotTypeWidget
toEnum 21 = AnnotTypeScreen
toEnum 22 = AnnotTypePrinterMark
toEnum 23 = AnnotTypeTrapNet
toEnum 24 = AnnotTypeWatermark
toEnum 25 = AnnotType3d
toEnum k = AnotherAnnotType k
instance P.Ord AnnotType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_annot_type_get_type" c_poppler_annot_type_get_type ::
IO GType
instance BoxedEnum AnnotType where
boxedEnumType _ = c_poppler_annot_type_get_type
data AnnotTextState =
AnnotTextStateMarked
| AnnotTextStateUnmarked
| AnnotTextStateAccepted
| AnnotTextStateRejected
| AnnotTextStateCancelled
| AnnotTextStateCompleted
| AnnotTextStateNone
| AnnotTextStateUnknown
| AnotherAnnotTextState Int
deriving (Show, Eq)
instance P.Enum AnnotTextState where
fromEnum AnnotTextStateMarked = 0
fromEnum AnnotTextStateUnmarked = 1
fromEnum AnnotTextStateAccepted = 2
fromEnum AnnotTextStateRejected = 3
fromEnum AnnotTextStateCancelled = 4
fromEnum AnnotTextStateCompleted = 5
fromEnum AnnotTextStateNone = 6
fromEnum AnnotTextStateUnknown = 7
fromEnum (AnotherAnnotTextState k) = k
toEnum 0 = AnnotTextStateMarked
toEnum 1 = AnnotTextStateUnmarked
toEnum 2 = AnnotTextStateAccepted
toEnum 3 = AnnotTextStateRejected
toEnum 4 = AnnotTextStateCancelled
toEnum 5 = AnnotTextStateCompleted
toEnum 6 = AnnotTextStateNone
toEnum 7 = AnnotTextStateUnknown
toEnum k = AnotherAnnotTextState k
instance P.Ord AnnotTextState where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_annot_text_state_get_type" c_poppler_annot_text_state_get_type ::
IO GType
instance BoxedEnum AnnotTextState where
boxedEnumType _ = c_poppler_annot_text_state_get_type
data AnnotMarkupReplyType =
AnnotMarkupReplyTypeR
| AnnotMarkupReplyTypeGroup
| AnotherAnnotMarkupReplyType Int
deriving (Show, Eq)
instance P.Enum AnnotMarkupReplyType where
fromEnum AnnotMarkupReplyTypeR = 0
fromEnum AnnotMarkupReplyTypeGroup = 1
fromEnum (AnotherAnnotMarkupReplyType k) = k
toEnum 0 = AnnotMarkupReplyTypeR
toEnum 1 = AnnotMarkupReplyTypeGroup
toEnum k = AnotherAnnotMarkupReplyType k
instance P.Ord AnnotMarkupReplyType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_annot_markup_reply_type_get_type" c_poppler_annot_markup_reply_type_get_type ::
IO GType
instance BoxedEnum AnnotMarkupReplyType where
boxedEnumType _ = c_poppler_annot_markup_reply_type_get_type
data AnnotFreeTextQuadding =
AnnotFreeTextQuaddingLeftJustified
| AnnotFreeTextQuaddingCentered
| AnnotFreeTextQuaddingRightJustified
| AnotherAnnotFreeTextQuadding Int
deriving (Show, Eq)
instance P.Enum AnnotFreeTextQuadding where
fromEnum AnnotFreeTextQuaddingLeftJustified = 0
fromEnum AnnotFreeTextQuaddingCentered = 1
fromEnum AnnotFreeTextQuaddingRightJustified = 2
fromEnum (AnotherAnnotFreeTextQuadding k) = k
toEnum 0 = AnnotFreeTextQuaddingLeftJustified
toEnum 1 = AnnotFreeTextQuaddingCentered
toEnum 2 = AnnotFreeTextQuaddingRightJustified
toEnum k = AnotherAnnotFreeTextQuadding k
instance P.Ord AnnotFreeTextQuadding where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_annot_free_text_quadding_get_type" c_poppler_annot_free_text_quadding_get_type ::
IO GType
instance BoxedEnum AnnotFreeTextQuadding where
boxedEnumType _ = c_poppler_annot_free_text_quadding_get_type
data AnnotExternalDataType =
AnnotExternalDataType3d
| AnnotExternalDataTypeUnknown
| AnotherAnnotExternalDataType Int
deriving (Show, Eq)
instance P.Enum AnnotExternalDataType where
fromEnum AnnotExternalDataType3d = 0
fromEnum AnnotExternalDataTypeUnknown = 1
fromEnum (AnotherAnnotExternalDataType k) = k
toEnum 0 = AnnotExternalDataType3d
toEnum 1 = AnnotExternalDataTypeUnknown
toEnum k = AnotherAnnotExternalDataType k
instance P.Ord AnnotExternalDataType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_annot_external_data_type_get_type" c_poppler_annot_external_data_type_get_type ::
IO GType
instance BoxedEnum AnnotExternalDataType where
boxedEnumType _ = c_poppler_annot_external_data_type_get_type
data AdditionalActionType =
AdditionalActionTypeFieldModified
| AdditionalActionTypeFormatField
| AdditionalActionTypeValidateField
| AdditionalActionTypeCalculateField
| AnotherAdditionalActionType Int
deriving (Show, Eq)
instance P.Enum AdditionalActionType where
fromEnum AdditionalActionTypeFieldModified = 0
fromEnum AdditionalActionTypeFormatField = 1
fromEnum AdditionalActionTypeValidateField = 2
fromEnum AdditionalActionTypeCalculateField = 3
fromEnum (AnotherAdditionalActionType k) = k
toEnum 0 = AdditionalActionTypeFieldModified
toEnum 1 = AdditionalActionTypeFormatField
toEnum 2 = AdditionalActionTypeValidateField
toEnum 3 = AdditionalActionTypeCalculateField
toEnum k = AnotherAdditionalActionType k
instance P.Ord AdditionalActionType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_additional_action_type_get_type" c_poppler_additional_action_type_get_type ::
IO GType
instance BoxedEnum AdditionalActionType where
boxedEnumType _ = c_poppler_additional_action_type_get_type
data ActionType =
ActionTypeUnknown
| ActionTypeNone
| ActionTypeGotoDest
| ActionTypeGotoRemote
| ActionTypeLaunch
| ActionTypeUri
| ActionTypeNamed
| ActionTypeMovie
| ActionTypeRendition
| ActionTypeOcgState
| ActionTypeJavascript
| AnotherActionType Int
deriving (Show, Eq)
instance P.Enum ActionType where
fromEnum ActionTypeUnknown = 0
fromEnum ActionTypeNone = 1
fromEnum ActionTypeGotoDest = 2
fromEnum ActionTypeGotoRemote = 3
fromEnum ActionTypeLaunch = 4
fromEnum ActionTypeUri = 5
fromEnum ActionTypeNamed = 6
fromEnum ActionTypeMovie = 7
fromEnum ActionTypeRendition = 8
fromEnum ActionTypeOcgState = 9
fromEnum ActionTypeJavascript = 10
fromEnum (AnotherActionType k) = k
toEnum 0 = ActionTypeUnknown
toEnum 1 = ActionTypeNone
toEnum 2 = ActionTypeGotoDest
toEnum 3 = ActionTypeGotoRemote
toEnum 4 = ActionTypeLaunch
toEnum 5 = ActionTypeUri
toEnum 6 = ActionTypeNamed
toEnum 7 = ActionTypeMovie
toEnum 8 = ActionTypeRendition
toEnum 9 = ActionTypeOcgState
toEnum 10 = ActionTypeJavascript
toEnum k = AnotherActionType k
instance P.Ord ActionType where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_action_type_get_type" c_poppler_action_type_get_type ::
IO GType
instance BoxedEnum ActionType where
boxedEnumType _ = c_poppler_action_type_get_type
data ActionMovieOperation =
ActionMovieOperationPlay
| ActionMovieOperationPause
| ActionMovieOperationResume
| ActionMovieOperationStop
| AnotherActionMovieOperation Int
deriving (Show, Eq)
instance P.Enum ActionMovieOperation where
fromEnum ActionMovieOperationPlay = 0
fromEnum ActionMovieOperationPause = 1
fromEnum ActionMovieOperationResume = 2
fromEnum ActionMovieOperationStop = 3
fromEnum (AnotherActionMovieOperation k) = k
toEnum 0 = ActionMovieOperationPlay
toEnum 1 = ActionMovieOperationPause
toEnum 2 = ActionMovieOperationResume
toEnum 3 = ActionMovieOperationStop
toEnum k = AnotherActionMovieOperation k
instance P.Ord ActionMovieOperation where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_action_movie_operation_get_type" c_poppler_action_movie_operation_get_type ::
IO GType
instance BoxedEnum ActionMovieOperation where
boxedEnumType _ = c_poppler_action_movie_operation_get_type
data ActionLayerAction =
ActionLayerActionOn
| ActionLayerActionOff
| ActionLayerActionToggle
| AnotherActionLayerAction Int
deriving (Show, Eq)
instance P.Enum ActionLayerAction where
fromEnum ActionLayerActionOn = 0
fromEnum ActionLayerActionOff = 1
fromEnum ActionLayerActionToggle = 2
fromEnum (AnotherActionLayerAction k) = k
toEnum 0 = ActionLayerActionOn
toEnum 1 = ActionLayerActionOff
toEnum 2 = ActionLayerActionToggle
toEnum k = AnotherActionLayerAction k
instance P.Ord ActionLayerAction where
compare a b = P.compare (P.fromEnum a) (P.fromEnum b)
foreign import ccall "poppler_action_layer_action_get_type" c_poppler_action_layer_action_get_type ::
IO GType
instance BoxedEnum ActionLayerAction where
boxedEnumType _ = c_poppler_action_layer_action_get_type