-

libflac/flac-definitions.rkt

@@ -23,14 +23,16 @@
            flac-duration
            )
 
-  (define-struct flac-stream-info
+  (define-struct flac-stream-info 
     (min-blocksize max-blocksize
      min-framesize max-framesize
      sample-rate
      channels
      bits-per-sample
      total-samples
-     ))
+     )
+    #:transparent
+    )
 
   (define (flac-stream-info->string si)
     (format "sample-rate: ~a, channels: ~a, bits-per-sample: ~a, total-samples: ~a"