diff --git a/encode.lisp b/encode.lisp
index 92f6684..c5e55e8 100644
--- a/encode.lisp
+++ b/encode.lisp
@@ -446,3 +446,7 @@ LOWERCASE-KEYS? says whether the key should be in lowercase."
   (:method (object)
     (with-object ()
       (yason:encode-slots object))))
+
+(defmethod encode (object &optional stream)
+  (yason:with-output (stream)
+    (yason:encode-object object)))