     (should (google/protobuf/Duration-p message))
     (should (elisp/proto/message-p message))
     (should (elisp/proto/message-mutable-p message))
-    (should (elisp/proto/time--equal-p (elisp/proto/duration message) 333))))
+    (should (time-equal-p (elisp/proto/duration message) 333))))
 
 (ert-deftest elisp/proto/make/unknown-message ()
   (let ((err (should-error (elisp/proto/make (intern "unknown/Message"))

    (should (equal (elisp/proto/any-type-name any) "google.protobuf.Duration"))
    (let ((unpacked (elisp/proto/unpack-any any)))
      (should (google/protobuf/Duration-p unpacked))
      (should (elisp/proto/time--equal-p
               (elisp/proto/duration unpacked) 123)))))

(ert-deftest elisp/proto/uninitialized-any ()
  (should-error (elisp/proto/unpack-any (google/protobuf/Any-new))

    (ert-info ((prin1-to-string time) :prefix "Time value: ")
      (let ((timestamp (elisp/proto/make-timestamp time)))
        (when time ; no point in comparing the current time
          (should (time-equal-p (elisp/proto/timestamp timestamp) time)))))))

(ert-deftest elisp/proto/duration ()
  (let* ((duration (elisp/proto/make-duration 456))
