@@ -207,7 +207,7 @@ s4 = Matcher $ \(SomeSEXP s) ok err ->
207207-- it's better to use 'getS3Class' because it will run same check, but also will
208208-- return the class(es) of the current expression.
209209--
210- -- This test is not expressible in terms of the 'guardType', becausee guardType
210+ -- This test is not expressible in terms of the 'guardType', because guardType
211211-- does not see additional information about S3 types. And any raw object can be
212212-- a class instance.
213213s3 :: [String ] -> Matcher s ()
@@ -228,7 +228,7 @@ guardType s = typeOf >>= guard . (s ==)
228228-- vector, or factors are presented as an interger vector with 'rownames'
229229-- attribute attached.
230230
231- -- | Returns any attribute by it's name if it exists. Fails with
231+ -- | Returns any attribute by its name if it exists. Fails with
232232-- @NoSuchAttribute@ otherwise.
233233someAttribute :: String -> Matcher s (SomeSEXP s )
234234someAttribute n = Matcher $ \ (SomeSEXP s) ok err ->
@@ -271,7 +271,7 @@ lookupAttribute :: String -> Matcher s (Maybe (SomeSEXP s))
271271lookupAttribute s = (Just <$> someAttribute s) <|> pure Nothing
272272
273273-- | 'Language.R.Hexp.hexp' lifted to Matcher, applies hexp to the current value
274- -- and allow to run internal matcher on it. Is useful when you need to inspect
274+ -- and allows you to run internal matcher on it. Is useful when you need to inspect
275275-- data using high level functions from @Language.R@.
276276hexp :: SSEXPTYPE ty -> (HExp s ty -> Matcher s a ) -> Matcher s a
277277hexp ty f = f . H. hexp =<< sexp ty
0 commit comments