Mercurial > octave

changeset 3471:a0aef47b4b4d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-22 23:10:42 by jwe]
author jwe
date Sat, 22 Jan 2000 23:10:43 +0000
parents b3a16793a390
children 9c509e1cbf49
files scripts/ChangeLog scripts/audio/loadaudio.m scripts/audio/playaudio.m scripts/audio/saveaudio.m
diffstat 4 files changed, 12 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Sat Jan 22 23:04:00 2000 +0000
+++ b/scripts/ChangeLog	Sat Jan 22 23:10:43 2000 +0000
@@ -1,3 +1,9 @@
+2000-01-22  Michael Reifenberger <mike@Plaut.de>
+
+	* audio/saveaudio.m: Also accept files with .ul extension.
+	* audio/loadaudio.m: Ditto.
+	* audio/playaudio.m: Ditto.
+
 2000-01-19  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* statistics/distributions/beta_cdf.m: Texinfoize doc string.
--- a/scripts/audio/loadaudio.m	Sat Jan 22 23:04:00 2000 +0000
+++ b/scripts/audio/loadaudio.m	Sat Jan 22 23:10:43 2000 +0000
@@ -62,7 +62,8 @@
     else
       [X, c] = fread (num, inf, "short");
     endif
-  elseif (strcmp (ext, "mu") || strcmp (ext, "au") || strcmp (ext, "snd"))
+  elseif (strcmp (ext, "mu") || strcmp (ext, "au")
+	  || strcmp (ext, "snd") || strcmp(ext, "ul"))
     [Y, c] = fread (num, inf, "uchar");
     ## remove file header
     m = max (find (Y(1:64) == 0));
--- a/scripts/audio/playaudio.m	Sat Jan 22 23:04:00 2000 +0000
+++ b/scripts/audio/playaudio.m	Sat Jan 22 23:10:43 2000 +0000
@@ -65,7 +65,8 @@
     endif
     if (strcmp (ext, "lin") || strcmp (ext, "raw"))
       system (sprintf ("cat %s > /dev/dsp", name));
-    elseif (strcmp (ext, "mu") || strcmp (ext, "au") || strcmp (ext, "snd"))
+    elseif (strcmp (ext, "mu") || strcmp (ext, "au")
+	    || strcmp (ext, "snd") || strcmp (ext, "ul"))
       system (sprintf ("cat %s > /dev/audio", name));
     else
       error ("playaudio does not support given extension");
--- a/scripts/audio/saveaudio.m	Sat Jan 22 23:04:00 2000 +0000
+++ b/scripts/audio/saveaudio.m	Sat Jan 22 23:10:43 2000 +0000
@@ -75,7 +75,8 @@
     else
       c = fwrite (num, X, "short");
     endif
-  elseif (strcmp (ext, "mu") || strcmp (ext, "au") || strcmp (ext, "snd"))
+  elseif (strcmp (ext, "mu") || strcmp (ext, "au")
+	  || strcmp (ext, "snd") || strcmp (ext, "ul"))
     Y = lin2mu (X);
     c = fwrite (num, Y, "uchar");
   else