do what the documentation says and allow an octets argument to make-source

klacks/klacks-impl.lisp

@@ -162,7 +162,9 @@
 	       :entity-name "main document"
 	       :entity-kind :main
 	       :uri nil))
-	(apply #'make-source xstream args)))))
+	(apply #'make-source xstream args)))
+    (array
+     (make-source (cxml::make-octet-input-stream input)))))
 
 (defun %make-source
     (input &key validate dtd root entity-resolver disallow-internal-subset