Method: (PRINT-OBJECT URI T)

Source

(defmethod print-object ((uri uri) stream)
  (print-unreadable-object (uri stream :type t :identity nil)
    (write-uri uri stream)))