Missing non-exhaustive warning when matching against a pair of lists.

The following should return a match non-exhaustive warning, but does not:

   def merge(list1: List[Long], list2: List[Long]): Boolean = (list1, list2) match {
      case (hd1::_, hd2::_) => true
      case (Nil, Nil) => true
    }