PRIVATE>
-GENERIC# re-encode 1 ( stream encoding -- newstream )
+GENERIC#: re-encode 1 ( stream encoding -- newstream )
M: object re-encode <encoder> ;
[ [ output-stream get ] dip re-encode ] dip
with-output-stream* ; inline
-GENERIC# re-decode 1 ( stream encoding -- newstream )
+GENERIC#: re-decode 1 ( stream encoding -- newstream )
M: object re-decode <decoder> ;