Mercurial > octave-nkf

diff scripts/audio/@audiorecorder/audiorecorder.m @ 19702:b2fe4dbe5266

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Don't play or record audio during 'make check' * @audioplayer/audioplayer.m, @audiorecorder/audiorecorder.m: Convert %!test blocks that play and record audio into %!demo blocks. Keep %!tests that can validate properties without playing or recording.
author Mike Miller <mtmiller@ieee.org>
date Sat, 07 Feb 2015 10:47:25 -0500
parents 7f5006dfa2eb
children 4197fc428c7d
line wrap: on
line diff
--- a/scripts/audio/@audiorecorder/audiorecorder.m	Sat Feb 07 10:13:25 2015 -0500
+++ b/scripts/audio/@audiorecorder/audiorecorder.m	Sat Feb 07 10:47:25 2015 -0500
@@ -51,29 +51,7 @@
 
 endfunction
 
-%!testif HAVE_PORTAUDIO
-%! recorder = audiorecorder (44100, 16, 2);
-%! recordblocking (recorder, 1);
-%! data = getaudiodata (recorder, "int16");
-%! assert (strcmp (class (data), "int16"));
-%! data = getaudiodata (recorder, "int8");
-%! assert (strcmp (class (data), "int8"));
-%! data = getaudiodata (recorder, "uint8");
-%! assert (strcmp (class (data), "uint8"));
-%! assert (size (data)(1), recorder.TotalSamples);
-%! assert (size (data)(2), 2);
-%! assert (size (data)(1) != 0);
-
-%!testif HAVE_PORTAUDIO
-%! recorder = audiorecorder (44100, 16, 2);
-%! record (recorder, 1)
-%! sleep (2);
-%! record (recorder, 1);
-%! sleep (2);
-%! data = getaudiodata (recorder);
-%! assert (size (data)(1) < 44100 * 2);
-
-%!testif HAVE_PORTAUDIO
+%!demo
 %! recorder = audiorecorder (44100, 16, 2);
 %! record (recorder, 1);
 %! sleep (2);
@@ -83,8 +61,21 @@
 %! sleep (2);
 %! play (player2);
 %! sleep (2);
-%! assert (player1.TotalSamples, recorder.TotalSamples);
-%! assert (player2.TotalSamples, recorder.TotalSamples);
+%! stop (player1);
+%! stop (player2);
+
+## Tests of audiorecorder must not actually record anything.
+
+%!testif HAVE_PORTAUDIO
+%! recorder = audiorecorder (44100, 16, 2);
+%! data = getaudiodata (recorder, "int16");
+%! assert (strcmp (class (data), "int16"));
+%! data = getaudiodata (recorder, "int8");
+%! assert (strcmp (class (data), "int8"));
+%! data = getaudiodata (recorder, "uint8");
+%! assert (strcmp (class (data), "uint8"));
+%! assert (size (data)(1), recorder.TotalSamples);
+%! assert (size (data)(2), 2);
 
 %!testif HAVE_PORTAUDIO
 %! recorder = audiorecorder;