0 | module Web.Internal.GeometryTypes
  1 |
  2 | import JS
  3 |
  4 | %default total
  5 |
  6 |
  7 |
  8 | --------------------------------------------------------------------------------
  9 | --          Interfaces
 10 | --------------------------------------------------------------------------------
 11 |
 12 | export data DOMMatrix : Type where [external]
 13 |
 14 | export
 15 | ToFFI DOMMatrix DOMMatrix where toFFI = id
 16 |
 17 | export
 18 | FromFFI DOMMatrix DOMMatrix where fromFFI = Just
 19 |
 20 | export
 21 | SafeCast DOMMatrix where
 22 |   safeCast = unsafeCastOnPrototypeName "DOMMatrix"
 23 |
 24 | export data DOMMatrixReadOnly : Type where [external]
 25 |
 26 | export
 27 | ToFFI DOMMatrixReadOnly DOMMatrixReadOnly where toFFI = id
 28 |
 29 | export
 30 | FromFFI DOMMatrixReadOnly DOMMatrixReadOnly where fromFFI = Just
 31 |
 32 | export
 33 | SafeCast DOMMatrixReadOnly where
 34 |   safeCast = unsafeCastOnPrototypeName "DOMMatrixReadOnly"
 35 |
 36 | export data DOMPoint : Type where [external]
 37 |
 38 | export
 39 | ToFFI DOMPoint DOMPoint where toFFI = id
 40 |
 41 | export
 42 | FromFFI DOMPoint DOMPoint where fromFFI = Just
 43 |
 44 | export
 45 | SafeCast DOMPoint where
 46 |   safeCast = unsafeCastOnPrototypeName "DOMPoint"
 47 |
 48 | export data DOMPointReadOnly : Type where [external]
 49 |
 50 | export
 51 | ToFFI DOMPointReadOnly DOMPointReadOnly where toFFI = id
 52 |
 53 | export
 54 | FromFFI DOMPointReadOnly DOMPointReadOnly where fromFFI = Just
 55 |
 56 | export
 57 | SafeCast DOMPointReadOnly where
 58 |   safeCast = unsafeCastOnPrototypeName "DOMPointReadOnly"
 59 |
 60 | export data DOMQuad : Type where [external]
 61 |
 62 | export
 63 | ToFFI DOMQuad DOMQuad where toFFI = id
 64 |
 65 | export
 66 | FromFFI DOMQuad DOMQuad where fromFFI = Just
 67 |
 68 | export
 69 | SafeCast DOMQuad where
 70 |   safeCast = unsafeCastOnPrototypeName "DOMQuad"
 71 |
 72 | export data DOMRect : Type where [external]
 73 |
 74 | export
 75 | ToFFI DOMRect DOMRect where toFFI = id
 76 |
 77 | export
 78 | FromFFI DOMRect DOMRect where fromFFI = Just
 79 |
 80 | export
 81 | SafeCast DOMRect where
 82 |   safeCast = unsafeCastOnPrototypeName "DOMRect"
 83 |
 84 | export data DOMRectList : Type where [external]
 85 |
 86 | export
 87 | ToFFI DOMRectList DOMRectList where toFFI = id
 88 |
 89 | export
 90 | FromFFI DOMRectList DOMRectList where fromFFI = Just
 91 |
 92 | export
 93 | SafeCast DOMRectList where
 94 |   safeCast = unsafeCastOnPrototypeName "DOMRectList"
 95 |
 96 | export data DOMRectReadOnly : Type where [external]
 97 |
 98 | export
 99 | ToFFI DOMRectReadOnly DOMRectReadOnly where toFFI = id
100 |
101 | export
102 | FromFFI DOMRectReadOnly DOMRectReadOnly where fromFFI = Just
103 |
104 | export
105 | SafeCast DOMRectReadOnly where
106 |   safeCast = unsafeCastOnPrototypeName "DOMRectReadOnly"
107 |
108 |
109 | --------------------------------------------------------------------------------
110 | --          Dictionaries
111 | --------------------------------------------------------------------------------
112 |
113 | export data DOMMatrix2DInit : Type where [external]
114 |
115 | export
116 | ToFFI DOMMatrix2DInit DOMMatrix2DInit where toFFI = id
117 |
118 | export
119 | FromFFI DOMMatrix2DInit DOMMatrix2DInit where fromFFI = Just
120 |
121 | export data DOMMatrixInit : Type where [external]
122 |
123 | export
124 | ToFFI DOMMatrixInit DOMMatrixInit where toFFI = id
125 |
126 | export
127 | FromFFI DOMMatrixInit DOMMatrixInit where fromFFI = Just
128 |
129 | export data DOMPointInit : Type where [external]
130 |
131 | export
132 | ToFFI DOMPointInit DOMPointInit where toFFI = id
133 |
134 | export
135 | FromFFI DOMPointInit DOMPointInit where fromFFI = Just
136 |
137 | export data DOMQuadInit : Type where [external]
138 |
139 | export
140 | ToFFI DOMQuadInit DOMQuadInit where toFFI = id
141 |
142 | export
143 | FromFFI DOMQuadInit DOMQuadInit where fromFFI = Just
144 |
145 | export data DOMRectInit : Type where [external]
146 |
147 | export
148 | ToFFI DOMRectInit DOMRectInit where toFFI = id
149 |
150 | export
151 | FromFFI DOMRectInit DOMRectInit where fromFFI = Just
152 |