diff --git a/cat.rla b/cat.rla
index 3c5a232..d8228b6 100644
--- a/cat.rla
+++ b/cat.rla
@@ -1,6 +1,6 @@
 ;(lambda (pathname)
 ;  (let [(fd (posix-open pathname O_RDONLY))]
-;    (let [(str (make-byte-string 128))]
+;    (let [(str (make-byte-string 4096))]
 ;      (let loop ()
 ;        (let [(size (posix-read fd str (byte-string-size str)))] 
 ;          (posix-write 1 str size))
@@ -17,7 +17,7 @@
       ;                    (loop)))]
       ;     (loop)))
       #(
-        128
+        4096
         #S(#="template"
           #(#="posix-read")
           "\x80\x81\x83\xff"  ; #(f0 f1 f3 ctx)
diff --git a/rosella.c b/rosella.c
index 7a63c9a..f277f85 100644
--- a/rosella.c
+++ b/rosella.c
@@ -78,7 +78,7 @@ int main(int argc, char **argv)
 
       nl();
       fflush(stdout);
-      print_gc_stats();
+      fprint_gc_stats(stderr);
     }
     else
     {