gistfile1.coffee

do =>
  toMatchUsing = (matcher) ->
    (pairs) ->
      return false if @actual?.length isnt pairs.length or typeof @actual isnt 'object'
      return false for a, i in @actual when not matcher( a, pairs[i] )
      true

  @addMatchers(
    toEqualPairs:           toMatchUsing (a, [x, y]) -> a[0]       is x and a[1]       is y
    toEqualPointsDefinedBy: toMatchUsing (a, [x, y]) -> a.get('x') is x and a.get('y') is y
  )

Thanks to TheJH on Freenode #coffeescript for the style advice!

And matyr for the pointer to the ?. operator