@@ -32,13 +32,13 @@ foreign import remainderImpl :: EffectFn2 ArrayBuffer ByteOffset DataView
32
32
33
33
-- | View mapping the rest of an `ArrayBuffer` after an index.
34
34
remainder :: ArrayBuffer -> ByteOffset -> Effect DataView
35
- remainder = runEffectFn2 remainderImpl
35
+ remainder a o = runEffectFn2 remainderImpl a o
36
36
37
37
foreign import partImpl :: EffectFn3 ArrayBuffer ByteOffset ByteLength DataView
38
38
39
39
-- | View mapping a region of the `ArrayBuffer`.
40
40
part :: ArrayBuffer -> ByteOffset -> ByteLength -> Effect DataView
41
- part = runEffectFn3 partImpl
41
+ part a o l = runEffectFn3 partImpl a o l
42
42
43
43
-- | `ArrayBuffer` being mapped by the view.
44
44
foreign import buffer :: DataView -> ArrayBuffer
@@ -74,14 +74,14 @@ getter :: forall t
74
74
, littleEndian :: Boolean
75
75
}
76
76
-> DataView -> ByteOffset -> Effect (Maybe t )
77
- getter data' =
77
+ getter data' d o =
78
78
runEffectFn3 getterImpl
79
79
{ just: Just
80
80
, nothing: Nothing
81
81
, functionName: data'.functionName
82
82
, littleEndian: data'.littleEndian
83
83
, bytesPerValue: data'.bytesPerValue
84
- }
84
+ } d o
85
85
86
86
foreign import setterImpl :: forall t
87
87
. EffectFn4 { functionName :: String
@@ -94,7 +94,7 @@ setter :: forall t
94
94
, bytesPerValue :: ByteLength
95
95
, littleEndian :: Boolean
96
96
} -> DataView -> t -> ByteOffset -> Effect Boolean
97
- setter = runEffectFn4 setterImpl
97
+ setter d t o = runEffectFn4 setterImpl d t o
98
98
99
99
100
100
instance dataViewInt8 :: (BytesPerValue Int8 b , Nat b ) => DataView Int8 Int where
0 commit comments