# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1345387840 14400
# Node ID f3b5cadfd6d5537f0da29f373f7ab0d4819e43df
# Parent  efac5593b1de83a3339824f1881eccafdc87d9f4
fix missing semicolons in various .m files

* playaudio.m, accumarray.m, accumdim.m, bicubic.m, narginchk.m,
nargoutchk.m, nthargout.m, image.m, pkg.m, colorbar.m, hdl2struct.m,
legend.m, plotyy.m, private/__go_draw_axes__.m,
private/__print_parse_opts__.m, shrinkfaces.m, pchip.m, polyval.m,
rundemos.m: Fix lines with missing semicolons.

diff -r efac5593b1de -r f3b5cadfd6d5 scripts/audio/playaudio.m
--- a/scripts/audio/playaudio.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/audio/playaudio.m	Sun Aug 19 10:50:40 2012 -0400
@@ -47,7 +47,7 @@
       fclose (fid);
       [status, out] = system (sprintf ('cat "%s" > /dev/dsp', file));
       if (status != 0)
-        system (sprintf ("paplay --raw \"%s\"", file))
+        system (sprintf ("paplay --raw \"%s\"", file));
       endif
     unwind_protect_cleanup
       unlink (file);
@@ -62,12 +62,12 @@
     if (any (strcmp (ext, {"lin", "raw"})))
       [status, out] = system (sprintf ('cat "%s" > /dev/dsp', name));
       if (status != 0)
-        system (sprintf ('paplay --raw "%s"', name))
+        system (sprintf ('paplay --raw "%s"', name));
       endif
     elseif (any (strcmp (ext, {"mu", "au" "snd", "ul"})))
       [status, out] = system (sprintf ('cat "%s" > /dev/audio', name));
       if (status != 0)
-        system (sprintf ('paplay "%s"', name))
+        system (sprintf ('paplay "%s"', name));
       endif
     else
       error ("playaudio: unsupported extension '%s'", ext);
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/accumarray.m
--- a/scripts/general/accumarray.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/accumarray.m	Sun Aug 19 10:50:40 2012 -0400
@@ -150,7 +150,7 @@
   else
     ndims = columns (subs);
     if (lenvals > 1 && lenvals != rows (subs))
-      error ("accumarray: dimension mismatch")
+      error ("accumarray: dimension mismatch");
     endif
   endif
 
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/accumdim.m
--- a/scripts/general/accumdim.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/accumdim.m	Sun Aug 19 10:50:40 2012 -0400
@@ -93,7 +93,7 @@
   sz(dim) = n;
 
   if (length (subs) != size (vals, dim))
-    error ("accumdim: dimension mismatch")
+    error ("accumdim: dimension mismatch");
   endif
 
   if (isempty (func) || func == @sum)
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/bicubic.m
--- a/scripts/general/bicubic.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/bicubic.m	Sun Aug 19 10:50:40 2012 -0400
@@ -94,7 +94,7 @@
     elseif (all (diff (x) > 0))
       flipx = false;
     else
-      error ("bicubic:nonmonotonic", "bicubic: X values must be monotonic")
+      error ("bicubic:nonmonotonic", "bicubic: X values must be monotonic");
     endif
     if (all (diff (y) < 0))
       flipy = true;
@@ -102,7 +102,7 @@
     elseif (all (diff (y) > 0))
       flipy = false;
     else
-      error ("bicubic:nonmonotonic", "bicubic: Y values must be monotonic")
+      error ("bicubic:nonmonotonic", "bicubic: Y values must be monotonic");
     endif
 
     ## Mark values outside the lookup table.
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/narginchk.m
--- a/scripts/general/narginchk.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/narginchk.m	Sun Aug 19 10:50:40 2012 -0400
@@ -42,7 +42,7 @@
   elseif (!isnumeric (maxargs) || !isscalar (maxargs))
     error ("maxargs must be a numeric scalar");
   elseif (minargs > maxargs)
-    error ("minargs cannot be larger than maxargs")
+    error ("minargs cannot be larger than maxargs");
   endif
 
   args = evalin ("caller", "nargin;");
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/nargoutchk.m
--- a/scripts/general/nargoutchk.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/nargoutchk.m	Sun Aug 19 10:50:40 2012 -0400
@@ -87,7 +87,7 @@
     elseif (!isnumeric (maxargs) || !isscalar (maxargs))
       error ("maxargs must be a numeric scalar");
     elseif (minargs > maxargs)
-      error ("minargs cannot be larger than maxargs")
+      error ("minargs cannot be larger than maxargs");
     endif
 
     args = evalin ("caller", "nargout;");
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/general/nthargout.m
--- a/scripts/general/nthargout.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/general/nthargout.m	Sun Aug 19 10:50:40 2012 -0400
@@ -84,7 +84,7 @@
   endif
 
   if (any (n != fix (n))  || ntot != fix (ntot) || any (n <= 0) || ntot <= 0)
-    error ("nthargout: N and NTOT must consist of positive integers")
+    error ("nthargout: N and NTOT must consist of positive integers");
   endif
 
   outargs = cell (1, ntot);
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/image/image.m
--- a/scripts/image/image.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/image/image.m	Sun Aug 19 10:50:40 2012 -0400
@@ -127,7 +127,7 @@
   dy = std (dy) / mean (abs (dy));
   tol = 100*eps;
   if (any (dx > tol) || any (dy > tol))
-    warning ("Image does not map to non-linearly spaced coordinates")
+    warning ("Image does not map to non-linearly spaced coordinates");
   endif
 
   ca = gca ();
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/pkg/pkg.m
--- a/scripts/pkg/pkg.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/pkg/pkg.m	Sun Aug 19 10:50:40 2012 -0400
@@ -318,7 +318,7 @@
         page_output_immediately (true, "local");
       case "-forge"
         if (! octave_config_info ("CURL_LIBS"))
-          error ("pkg: can't download from forge without the cURL library")
+          error ("pkg: can't download from forge without the cURL library");
         endif
         octave_forge = true;
       case "-local"
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/colorbar.m
--- a/scripts/plot/colorbar.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/colorbar.m	Sun Aug 19 10:50:40 2012 -0400
@@ -197,13 +197,13 @@
 
 function resetaxis (cax, d, ax, orig_props)
   if (ishandle (ax) && strcmp (get (ax, "type"), "axes"))
-    dellistener (ax, "position")
+    dellistener (ax, "position");
     units = get (ax, "units");
-    set (ax, "units", orig_props.units)
+    set (ax, "units", orig_props.units);
     set (ax, "position", orig_props.position, ...
              "outerposition", orig_props.outerposition, ...
              "activepositionproperty", orig_props.activepositionproperty);
-    set (ax, "units", units)
+    set (ax, "units", units);
   endif
 endfunction
 
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/hdl2struct.m
--- a/scripts/plot/hdl2struct.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/hdl2struct.m	Sun Aug 19 10:50:40 2012 -0400
@@ -91,7 +91,7 @@
       ii++;
       s.children(ii) = hdl2struct (lg);
     elseif (nlg > 1)
-      error ("hdl2struct: more than one legend found")
+      error ("hdl2struct: more than one legend found");
     endif
 
     cb = findobj (par, "-depth", 1, "tag", "colorbar");
@@ -105,7 +105,7 @@
       ii++;
       s.children(ii) = hdl2struct (cb);
     elseif (nlg > 1)
-      error ("hdl2struct: more than one colorbar found")
+      error ("hdl2struct: more than one colorbar found");
     endif
   endif
 
@@ -120,9 +120,9 @@
   hdlist = [];
 
   regkids = get ( h, "children");
-  set (0, "showhiddenhandles", "on")
+  set (0, "showhiddenhandles", "on");
   allkids = get ( h, "children");
-  set (0, "showhiddenhandles", "off")
+  set (0, "showhiddenhandles", "off");
   speckids = arrayfun (@(x) ! any (x == regkids), allkids);
   hdlist = allkids (find (speckids));
   hdlist = reshape (hdlist, 1, numel (hdlist));
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/legend.m
--- a/scripts/plot/legend.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/legend.m	Sun Aug 19 10:50:40 2012 -0400
@@ -131,7 +131,7 @@
     elseif (all (ishandle (plty)))
       ca = [ca, plty(:).'];
     else
-      error ("legend.m: This should not happen. File a bug report.")
+      error ("legend.m: This should not happen. File a bug report.");
     endif
     ## Remove duplicates while preserving order
     [~, n] = unique (ca);
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/plotyy.m
--- a/scripts/plot/plotyy.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/plotyy.m	Sun Aug 19 10:50:40 2012 -0400
@@ -91,7 +91,7 @@
       ax = ax(1:2);
     elseif (length (ax) == 1)
       ax(2) = axes ();
-      set (ax(2), "nextplot", get (ax(1), "nextplot"))
+      set (ax(2), "nextplot", get (ax(1), "nextplot"));
     elseif (isempty (ax))
       ax(1) = axes ();
       ax(2) = axes ();
@@ -157,7 +157,7 @@
     axes (ax(2));
   else
     ax(2) = axes ();
-    set (ax(2), "nextplot", get (ax(1), "nextplot"))
+    set (ax(2), "nextplot", get (ax(1), "nextplot"));
   endif
   newplot ();
 
@@ -218,14 +218,14 @@
   elseif (ishandle (ax(1)))
     set (ax(1), "__plotyy_axes__", ax);
   else
-    error ("plotyy.m: This shouldn't happen. File a bug report.")
+    error ("plotyy.m: This shouldn't happen. File a bug report.");
   endif
   if (ishandle (ax(2)) && ! isprop (ax(2), "__plotyy_axes__"))
     addproperty ("__plotyy_axes__", ax(2), "data", ax);
   elseif (ishandle (ax(2)))
     set (ax(2), "__plotyy_axes__", ax);
   else
-    error ("plotyy.m: This shouldn't happen. File a bug report.")
+    error ("plotyy.m: This shouldn't happen. File a bug report.");
   endif
 endfunction
 
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/private/__go_draw_axes__.m
--- a/scripts/plot/private/__go_draw_axes__.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/private/__go_draw_axes__.m	Sun Aug 19 10:50:40 2012 -0400
@@ -48,7 +48,7 @@
         h = axis_obj.__plotyy_axes__;
         h = h(ishandle (h));
         h = h(isprop (h, "__ploty_axes__"));
-        rmappdata (h, "__plotyy_axes__")
+        rmappdata (h, "__plotyy_axes__");
       endif
     endif
 
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/private/__print_parse_opts__.m
--- a/scripts/plot/private/__print_parse_opts__.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/private/__print_parse_opts__.m	Sun Aug 19 10:50:40 2012 -0400
@@ -125,14 +125,14 @@
         if (! isempty (n) && n == numel (arg) - 1 && ismember (arg(end), "124"))
           arg_st.ghostscript.antialiasing_textalphabits = str2num (arg(end));
         else
-          error ("print: improper syntax, or value, for TextAlphaBits")
+          error ("print: improper syntax, or value, for TextAlphaBits");
         endif
       elseif (strncmpi (arg, "-graphicsalphabits=", 19))
         n = find (arg == "=");
         if (! isempty (n) && n == numel (arg) - 1 && ismember (arg(end), "124"))
           arg_st.ghostscript.antialiasing_graphicsalphabits = str2num (arg(end));
         else
-          error ("print: improper syntax, or value, for GraphicsAlphaBits")
+          error ("print: improper syntax, or value, for GraphicsAlphaBits");
         endif
       elseif ((length (arg) > 2) && arg(1:2) == "-G")
         arg_st.ghostscript.binary = file_in_path (getenv ("PATH"), arg(3:end));
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/plot/shrinkfaces.m
--- a/scripts/plot/shrinkfaces.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/plot/shrinkfaces.m	Sun Aug 19 10:50:40 2012 -0400
@@ -101,17 +101,17 @@
   endif
   
   if (! isscalar (sf) || sf <= 0)
-    error ("shrinkfaces: scale factor must be a positive scalar")
+    error ("shrinkfaces: scale factor must be a positive scalar");
   endif
 
   n = columns (vertices);
   if (n < 2 || n > 3)
-    error ("shrinkfaces: only 2D and 3D patches are supported")
+    error ("shrinkfaces: only 2D and 3D patches are supported");
   endif
 
   m = columns (faces);
   if (m < 3)
-    error ("shrinkfaces: faces must consist of at least 3 vertices")
+    error ("shrinkfaces: faces must consist of at least 3 vertices");
   endif
 
   v = vertices(faces'(:), :);
@@ -134,8 +134,9 @@
   switch (nargout)
     case 0
       if (ishandle (p))
-        set (p, "FaceVertexCData", [], "CData", []) # avoid exceptions
-        set (p, "Vertices", v, "Faces", f, "FaceVertexCData", c)
+        ## avoid exceptions
+        set (p, "FaceVertexCData", [], "CData", []);
+        set (p, "Vertices", v, "Faces", f, "FaceVertxCData", c);
       else
         nf = struct ("faces", f, "vertices", v, "facevertexcdata", c);
       endif
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/polynomial/pchip.m
--- a/scripts/polynomial/pchip.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/polynomial/pchip.m	Sun Aug 19 10:50:40 2012 -0400
@@ -80,12 +80,12 @@
     y = y(:).'; ##row vector
     szy = size (y);
     if (! size_equal (x, y))
-      error ("pchip: length of X and Y must match")
+      error ("pchip: length of X and Y must match");
     endif
   else
     szy = size (y);
     if (n != szy(end))
-      error ("pchip: length of X and last dimension of Y must match")
+      error ("pchip: length of X and last dimension of Y must match");
     endif
     y = reshape (y, [prod(szy(1:end-1)), szy(end)]);
   endif
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/polynomial/polyval.m
--- a/scripts/polynomial/polyval.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/polynomial/polyval.m	Sun Aug 19 10:50:40 2012 -0400
@@ -79,10 +79,10 @@
       dy = reshape (dy, size (x));
     catch
       if (isempty (s))
-        error ("polyval: third input is required.")
+        error ("polyval: third input is required.");
       elseif (isstruct (s)
               && all (ismember ({"R", "normr", "df"}, fieldnames (s))))
-        error (lasterr ())
+        error (lasterr ());
       elseif (isstruct (s))
         error ("polyval: third input is missing the required fields.");
       else
diff -r efac5593b1de -r f3b5cadfd6d5 scripts/testfun/rundemos.m
--- a/scripts/testfun/rundemos.m	Sat Aug 18 22:03:11 2012 -0400
+++ b/scripts/testfun/rundemos.m	Sun Aug 19 10:50:40 2012 -0400
@@ -65,7 +65,7 @@
         try
           demo (f);
         catch
-          printf ("error: %s\n\n", lasterror().message)
+          printf ("error: %s\n\n", lasterror().message);
         end_try_catch
         if (i != numel (flist))
           input ("Press <enter> to continue: ", "s");