0 | module Cheerio.Attributes
5 | %foreign "node:lambda: (primToMaybe, name, cheerio) => primToMaybe(cheerio.attr(name))"
6 | prim_attr : (String -> Maybe String) -> String -> Cheerio -> PrimIO (Maybe String)
9 | attr : HasIO io => String -> Cheerio -> io (Maybe String)
10 | attr name cheerio = primIO $
prim_attr primToMaybe name cheerio
13 | %foreign "node:lambda: (primToMaybe, cheerio) => primToMaybe(cheerio.val())"
14 | prim_val : (String -> Maybe String) -> Cheerio -> PrimIO (Maybe String)
17 | val : HasIO io => Cheerio -> io (Maybe String)
18 | val cheerio = primIO $
prim_val primToMaybe cheerio