# HG changeset patch
# User Rik <octave@nomad.inbox5.com>
# Date 1315061906 25200
# Node ID e5a49b2f822526eab2dbddbf9bae358c8c6e349c
# Parent  12ba32dd345818a58d591098fd0f340ba5f0f75c
codesprint: Single input validation test for beep.m

* beep.m: Check number of inputs is correct.

diff --git a/scripts/io/beep.m b/scripts/io/beep.m
--- a/scripts/io/beep.m
+++ b/scripts/io/beep.m
@@ -26,10 +26,13 @@
 
 function beep ()
 
-  if (nargin == 0)
-    puts ("\a");
-  else
+  if (nargin != 0)
     print_usage ();
   endif
 
+  puts ("\a");
+
 endfunction
+
+
+%!error (beep (1))