Compress new streams on output

Author: oxplot

main.go

@@ -556,6 +556,7 @@ func convertToOptimizedPDF(in string, out string) error {
 	}
 	q.SetObjectStreamMode(qpdf.ObjectStreamGenerate)
 	q.SetStreamDataMode(qpdf.StreamDataPreserve)
+	q.SetCompressStreams(true)
 	if err := q.Write(); err != nil {
 		return err
 	}

qpdf/qpdf.go

@@ -84,6 +84,17 @@ func (q *QPDF) SetQDFMode(v bool) {
 	C.qpdf_set_qdf_mode(q.data, qv)
 }
 
+func (q *QPDF) SetCompressStreams(v bool) {
+	if q.closed {
+		return
+	}
+	var qv C.QPDF_BOOL = C.QPDF_FALSE
+	if v {
+		qv = C.QPDF_TRUE
+	}
+	C.qpdf_set_compress_streams(q.data, qv)
+}
+
 func (q *QPDF) SetSuppressWarnings(v bool) {
 	if q.closed {
 		return