Mercurial > hg > octave-lyh

comparison scripts/audio/wavwrite.m @ 8664:e07e93c04080

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes
author John W. Eaton <jwe@octave.org>
date Wed, 04 Feb 2009 10:56:23 -0500
parents 373c39904877
children eb63fbe60fab
comparison
equal deleted inserted replaced
8663:4238f2600a17 8664:e07e93c04080
100 error ("wavwrite: expecting filename to be a character string"); 100 error ("wavwrite: expecting filename to be a character string");
101 endif 101 endif
102 102
103 [fid, msg] = fopen (filename, "wb"); 103 [fid, msg] = fopen (filename, "wb");
104 if (fid < 0) 104 if (fid < 0)
105 error ("wavwrite: %s", msg) 105 error ("wavwrite: %s", msg);
106 endif 106 endif
107 107
108 ## write RIFF/WAVE header 108 ## write RIFF/WAVE header
109 c = 0; 109 c = 0;
110 c += fwrite (fid, "RIFF", "uchar"); 110 c += fwrite (fid, "RIFF", "uchar");