Mercurial > hg > octave-lyh

diff scripts/general/perror.m @ 2311:2b5788792cad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-07-11 20:18:38 by jwe]
author jwe
date Thu, 11 Jul 1996 20:18:38 +0000
parents 5cffc4b8de57
children 5ca126254d15
line wrap: on
line diff
--- a/scripts/general/perror.m
+++ b/scripts/general/perror.m
@@ -17,18 +17,18 @@
 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 ### 02111-1307, USA.
 
-function perror (name, err)
+## usage: perror (name, err)
+##
+## Print an error message for error number `err' from function "name".
+##
+## Messages correspond to the following subroutine versions:
+##
+##   npsol : 4.0
+##   qpsol : 3.2
+##
+## See also: strerror
 
-  ## usage: perror (name, err)
-  ##
-  ## Print an error message for error number `err' from function "name".
-  ##
-  ## Messages correspond to the following subroutine versions:
-  ##
-  ##   npsol : 4.0
-  ##   qpsol : 3.2
-  ##
-  ## See also: strerror
+function perror (name, err)
 
   if (nargin != 2)
     usage ("perror (name, err)");