fix RIFF chunks size which should not include the chunk type/length i…

…tself
s-u · Oct 1, 2014 · 299c1d3 · 299c1d3
1 parent bba41d0
commit 299c1d3
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: audio
-Version: 0.1-5
+Version: 0.1-6
 Title: Audio Interface for R
 Author: Simon Urbanek <[email protected]>
 Maintainer: Simon Urbanek <[email protected]>

diff --git a/NEWS b/NEWS
@@ -1,5 +1,8 @@
 NEWS for audio package
 
+0.1-6	(under development)
+    o	fix RIFF chunk size which incorrectly included the header
+
 0.1-5	2013-12-23
     o	minor documentation cleanups
 

diff --git a/src/file.c b/src/file.c
@@ -219,7 +219,7 @@ SEXP save_wave_file(SEXP where, SEXP what) {
 
 	{
 		const char *fName = CHAR(STRING_ELT(where, 0));
-		riff_header_t rh = { "RIFF", size + 44, "WAVE" };
+		riff_header_t rh = { "RIFF", size + 36, "WAVE" };
 		wav_fmt_t fmt = { "fmt ", 16, 1, chs, rate, rate * bps, bps, bits };
 		riff_chunk_t rc = { "data", size };
 		FILE *f = fopen(fName, "wb");