module Data.JSString.Internal.Search ( indices ) where import Data.Coerce (coerce) import Data.JSString.Internal.Type (JSString(..)) import qualified Data.Text.Internal.Search as T indices :: JSString -> JSString -> [Int] indices :: JSString -> JSString -> [Int] indices = (Text -> Text -> [Int]) -> JSString -> JSString -> [Int] forall a b. Coercible a b => a -> b coerce Text -> Text -> [Int] T.indices