aports/community/octave/test.patch

patch out audio tests as segfault because no audio configured
in ci

--- a/libinterp/dldfcn/audiodevinfo.cc
+++ b/libinterp/dldfcn/audiodevinfo.cc
@@ -471,48 +471,6 @@
 #endif
 }
 
-/*
-%!testif HAVE_PORTAUDIO
-%! devinfo = audiodevinfo;
-%! assert (rows (devinfo.input), 1);
-%! assert (rows (devinfo.output), 1);
-
-%!testif HAVE_PORTAUDIO
-%! devinfo = audiodevinfo;
-%! nout = audiodevinfo (0);
-%! nin = audiodevinfo (1);
-%! assert (columns (devinfo.output), nout);
-%! assert (columns (devinfo.input), nin);
-
-%!testif HAVE_PORTAUDIO
-%! devinfo = audiodevinfo;
-%! nout = audiodevinfo (0);
-%! nin = audiodevinfo (1);
-%! for i = 1:nout
-%!   assert (devinfo.output(i).Name, audiodevinfo (0, devinfo.output(i).ID));
-%! endfor
-%! for i=1:nin
-%!   assert (devinfo.input (i).Name, audiodevinfo (1, devinfo.input (i).ID));
-%! endfor
-
-%!testif HAVE_PORTAUDIO
-%! devinfo = audiodevinfo;
-%! nout = audiodevinfo (0);
-%! nin = audiodevinfo (1);
-%! ## There might be multiple devices with the same name (e.g. on Windows WDM-KS)
-%! ## Check only the first of each unique device name.
-%! [unq_out_name, idx_unique] = unique ({devinfo.output(:).Name});
-%! unq_out_id = [devinfo.output(idx_unique).ID];
-%! for i = 1:numel (unq_out_name)
-%!   assert (audiodevinfo (0, unq_out_name{i}), unq_out_id(i));
-%! endfor
-%! [unq_in_name, idx_unique] = unique ({devinfo.input(:).Name});
-%! unq_in_id = [devinfo.input(idx_unique).ID];
-%! for i = 1:numel (unq_in_name)
-%!   assert (audiodevinfo (1, unq_in_name{i}), unq_in_id(i));
-%! endfor
-*/
-
 #if defined (HAVE_PORTAUDIO)
 
 enum audio_type { TYPE_INT8, TYPE_UINT8, TYPE_UINT16, TYPE_DOUBLE };
--- a/scripts/audio/@audioplayer/audioplayer.m
+++ b/scripts/audio/@audioplayer/audioplayer.m
@@ -130,58 +130,58 @@
 
 ## Tests of audioplayer must not actually play anything.
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
-%! mono = 0.25 * randn (1, 44100);
-%! stereo = 0.25 * randn (2, 44100);
-%! fs = 44100;
-%! player1 = audioplayer (mono, fs);
-%! player2 = audioplayer (stereo, fs);
-%! assert (player1.NumberOfChannels, 1);
-%! assert (player2.NumberOfChannels, 2);
-%! assert (player1.SampleRate, 44100);
-%! assert (player2.SampleRate, 44100);
-%! assert (player1.TotalSamples, 44100);
-%! assert (player2.TotalSamples, 44100);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
+#%! mono = 0.25 * randn (1, 44100);
+#%! stereo = 0.25 * randn (2, 44100);
+#%! fs = 44100;
+#%! player1 = audioplayer (mono, fs);
+#%! player2 = audioplayer (stereo, fs);
+#%! assert (player1.NumberOfChannels, 1);
+#%! assert (player2.NumberOfChannels, 2);
+#%! assert (player1.SampleRate, 44100);
+#%! assert (player2.SampleRate, 44100);
+#%! assert (player1.TotalSamples, 44100);
+#%! assert (player2.TotalSamples, 44100);
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
-%! audio = 0.25 * randn (2, 44100);
-%! fs = 44100;
-%! player = audioplayer (audio, fs);
-%! set (player, {"SampleRate", "Tag", "UserData"}, {8000, "tag", [1, 2; 3, 4]});
-%! assert (player.SampleRate, 8000);
-%! assert (player.Tag, "tag");
-%! assert (player.UserData, [1, 2; 3, 4]);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
+#%! audio = 0.25 * randn (2, 44100);
+#%! fs = 44100;
+#%! player = audioplayer (audio, fs);
+#%! set (player, {"SampleRate", "Tag", "UserData"}, {8000, "tag", [1, 2; 3, 4]});
+#%! assert (player.SampleRate, 8000);
+#%! assert (player.Tag, "tag");
+#%! assert (player.UserData, [1, 2; 3, 4]);
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
-%! audio = 0.25 * randn (2, 44100);
-%! fs = 44100;
-%! player = audioplayer (audio, fs);
-%! settable = set (player);
-%! settable.SampleRate = 8000;
-%! settable.Tag = "tag";
-%! settable.UserData = [1, 2; 3, 4];
-%! set (player, settable);
-%! assert (player.SampleRate, 8000);
-%! assert (player.Tag, "tag");
-%! assert (player.UserData, [1, 2; 3, 4]);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
+#%! audio = 0.25 * randn (2, 44100);
+#%! fs = 44100;
+#%! player = audioplayer (audio, fs);
+#%! settable = set (player);
+#%! settable.SampleRate = 8000;
+#%! settable.Tag = "tag";
+#%! settable.UserData = [1, 2; 3, 4];
+#%! set (player, settable);
+#%! assert (player.SampleRate, 8000);
+#%! assert (player.Tag, "tag");
+#%! assert (player.UserData, [1, 2; 3, 4]);
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
-%! audio = 0.25 * randn (2, 44100);
-%! fs = 44100;
-%! player = audioplayer (audio, fs);
-%! player.SampleRate = 8000;
-%! player.Tag = "tag";
-%! player.UserData = [1, 2; 3, 4];
-%! properties = get (player, {"SampleRate", "Tag", "UserData"});
-%! assert (properties, {8000, "tag", [1, 2; 3, 4]});
+#%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
+#%! audio = 0.25 * randn (2, 44100);
+#%! fs = 44100;
+#%! player = audioplayer (audio, fs);
+#%! player.SampleRate = 8000;
+#%! player.Tag = "tag";
+#%! player.UserData = [1, 2; 3, 4];
+#%! properties = get (player, {"SampleRate", "Tag", "UserData"});
+#%! assert (properties, {8000, "tag", [1, 2; 3, 4]});
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
-%! ## Verify nbits option only accepts 8, 16, 24
-%! fail ("audioplayer (1, 8e3, 9)", "NBITS must be 8, 16, or 24");
-%! fail ("audioplayer (1, 8e3, 32)", "NBITS must be 8, 16, or 24");
-%! player = audioplayer (1, 8e3, 8);
-%! player = audioplayer (1, 8e3, 16);
-%! player = audioplayer (1, 8e3, 24);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (0) > 0
+#%! ## Verify nbits option only accepts 8, 16, 24
+#%! fail ("audioplayer (1, 8e3, 9)", "NBITS must be 8, 16, or 24");
+#%! fail ("audioplayer (1, 8e3, 32)", "NBITS must be 8, 16, or 24");
+#%! player = audioplayer (1, 8e3, 8);
+#%! player = audioplayer (1, 8e3, 16);
+#%! player = audioplayer (1, 8e3, 24);
 
 ## FIXME: Callbacks do not work currently (5/31/2020) so BIST tests commented.
 #%!function [sound, status] = callback (samples)
--- a/scripts/audio/@audiorecorder/audiorecorder.m
+++ b/scripts/audio/@audiorecorder/audiorecorder.m
@@ -76,43 +76,43 @@
 
 ## Tests of audiorecorder must not actually record anything.
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
-%! 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; audiodevinfo (1) > 0
+#%! 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; audiodevinfo (1) > 0
-%! recorder = audiorecorder ();
-%! set (recorder, {"SampleRate", "Tag", "UserData"},
-%!                {8000, "tag", [1, 2; 3, 4]});
-%! assert (recorder.SampleRate, 8000);
-%! assert (recorder.Tag, "tag");
-%! assert (recorder.UserData, [1, 2; 3, 4]);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
+#%! recorder = audiorecorder ();
+#%! set (recorder, {"SampleRate", "Tag", "UserData"},
+#%!                {8000, "tag", [1, 2; 3, 4]});
+#%! assert (recorder.SampleRate, 8000);
+#%! assert (recorder.Tag, "tag");
+#%! assert (recorder.UserData, [1, 2; 3, 4]);
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
-%! recorder = audiorecorder ();
-%! settable = set (recorder);
-%! settable.SampleRate = 8000;
-%! settable.Tag = "tag";
-%! settable.UserData = [1, 2; 3, 4];
-%! set (recorder, settable);
-%! assert (recorder.SampleRate, 8000);
-%! assert (recorder.Tag, "tag");
-%! assert (recorder.UserData, [1, 2; 3, 4]);
+#%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
+#%! recorder = audiorecorder ();
+#%! settable = set (recorder);
+#%! settable.SampleRate = 8000;
+#%! settable.Tag = "tag";
+#%! settable.UserData = [1, 2; 3, 4];
+#%! set (recorder, settable);
+#%! assert (recorder.SampleRate, 8000);
+#%! assert (recorder.Tag, "tag");
+#%! assert (recorder.UserData, [1, 2; 3, 4]);
 
-%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
-%! recorder = audiorecorder ();
-%! recorder.SampleRate = 8000;
-%! recorder.Tag = "tag";
-%! recorder.UserData = [1, 2; 3, 4];
-%! properties = get (recorder, {"SampleRate", "Tag", "UserData"});
-%! assert (properties, {8000, "tag", [1, 2; 3, 4]});
+#%!testif HAVE_PORTAUDIO; audiodevinfo (1) > 0
+#%! recorder = audiorecorder ();
+#%! recorder.SampleRate = 8000;
+#%! recorder.Tag = "tag";
+#%! recorder.UserData = [1, 2; 3, 4];
+#%! properties = get (recorder, {"SampleRate", "Tag", "UserData"});
+#%! assert (properties, {8000, "tag", [1, 2; 3, 4]});
 
 #%!function status = callback_record (sound)
 #%!  fid = fopen ("record.txt", "at");