{-| Sorting functions. -} module Shikensu.Sorting ( sortByAbsolutePath ) where import Shikensu.Internal.Types (Definition, absolutePath) {-| Sort by absolutePath. > Data.List.sortBy Shikensu.sortByAbsolutePath dictionary -} sortByAbsolutePath :: Definition -> Definition -> Ordering sortByAbsolutePath :: Definition -> Definition -> Ordering sortByAbsolutePath Definition defA Definition defB = String -> String -> Ordering forall a. Ord a => a -> a -> Ordering compare (Definition -> String absolutePath Definition defA) (Definition -> String absolutePath Definition defB)