ruby - Ruby <=> 组合器的实现

Question

并不少见，有人想实现 <=> (比较，或“宇宙飞船”)产品数据类型的运算符，即具有多个字段的类(所有这些(我们希望!)已经实现了 <=>)，按特定顺序比较字段。

def <=>(o)
    f1 < o.f1 && (return -1)
    f1 > o.f1 && (return  1)
    f2 < o.f2 && (return -1)
    f2 > o.f2 && (return  1)
    return 0
end

这既乏味又容易出错，尤其是对于很多字段。它很容易出错，以至于我经常觉得我应该对该函数进行单元测试，这只会增加乏味和冗长。

Haskell 提供了一种特别好的方法来做到这一点:

import Data.Monoid (mappend)import Data.Ord (comparing)-- From the standard library:-- data Ordering = LT | EQ | GTdata D = D { f3 :: Int, f2 :: Double, f1 :: Char } deriving ShowcompareD :: D -> D -> OrderingcompareD = foldl1 mappend [comparing f1, comparing f2, comparing f3]

(For those not familiar with fold, the above expands to

comparing f1 `mappend` comparing f2 `mappend` comparing f3

它产生一个可以应用于两个 D 的函数s, 产生一个 Ordering .)

compareD的定义非常简单，显然是正确的，即使没有静态类型检查，我也不觉得有必要对其进行单元测试。

实际上，这个问题可能比这个更有趣，因为我可能不想只使用标准 <=>运算符，但在不同时间以不同方式排序，例如:

sortByOrderings :: [a -> a -> Ordering] -> [a] -> [a]sortByOrderings = sortBy . foldl1 mappendsortByF3F1 = sortByOrderings [comparing f3, comparing f1]sortByF2F3 = sortByOrderings [comparing f2, comparing f3]

那么，问题:

1. 在 Ruby 中实现这类事情的典型方法是什么？
2. 仅使用标准库中定义的内容的最佳方式是什么？
3. 与上面的 Haskell 代码有多接近？相比之下，它有多可靠？如有必要，如何确保字段已正确实现 <=>或 <和 >运营商？

顺便说一句，虽然这是一个 Ruby 问题，但如果本站点的前辈们同意，我很乐意考虑讨论 Haskell 技术的主题。请随时评论这是否合适，如果合适，请将此帖子也标记为“haskell”。

Answer 1

为了使自定义排序规则更易于管理，我做了以下工作:在我需要排序的所有类上，我定义了返回数组的“to_sort”方法，然后覆盖 <=> 以使用 to_sort:

class Whatever
  def to_sort
    [@mainkey,@subkey,@subsubkey]
  end

  def <=>(o)
    self.to_sort <=> o.to_sort
  end
end

因此，对任何 Whatevers 数组进行排序(包括 Whateverings 和 Whateverothers 以及 Whathaveyours 的异构数组，所有这些都实现特定于类型的 to_sort 函数和相同的 <=> 覆盖)只是在内部对数组数组进行排序。