# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1288040748 14400
# Node ID c75130f194402f7c40372556d8f6263452134822
# Parent  83da69c6e7bea15d4abeee10f6e74ea4285e7e5c
octave.cc: fix call to xerbla

diff -r 83da69c6e7be -r c75130f19440 src/ChangeLog
--- a/src/ChangeLog	Mon Oct 25 21:36:29 2010 +0200
+++ b/src/ChangeLog	Mon Oct 25 17:05:48 2010 -0400
@@ -1,3 +1,8 @@
+2010-10-25  John W. Eaton  <jwe@octave.org>
+
+	* octave.cc (octave_main): Use F77_CHAR_ARC_LEN macro to pass
+	character string length in call to xerbla.
+
 2010-10-25  Kai Habel  <kai.habel@gmx.de>
 
 	* plot/uimenu.m: New function
diff -r 83da69c6e7be -r c75130f19440 src/octave.cc
--- a/src/octave.cc	Mon Oct 25 21:36:29 2010 +0200
+++ b/src/octave.cc	Mon Oct 25 17:05:48 2010 -0400
@@ -610,7 +610,7 @@
   // actually call xerbla.
 
   if (octave_NaN == -1)
-    F77_FUNC (xerbla, XERBLA) ("octave", 13, 6L);
+    F77_FUNC (xerbla, XERBLA) ("octave", 13 F77_CHAR_ARG_LEN (6));
 
   initialize_error_handlers ();