# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1347385726 14400
# Node ID 5f3a69a309a7ce816c6796305e3eff9ff29f871a
# Parent  9a8dbd6b6b20f31f6c5438393b26414a63f7b0b6
fix decl of mexPutVariable

* mexproto.h, mex.cc (mexPutVariable): Declare mxArray arg as const.
* mxarray.in.h, mex.cc (mxArray::as_octave_value (const mxArray*)):
Declare mxArray arg as const.

diff -r 9a8dbd6b6b20 -r 5f3a69a309a7 libinterp/interp-core/mex.cc
--- a/libinterp/interp-core/mex.cc	Tue Sep 11 13:44:42 2012 -0400
+++ b/libinterp/interp-core/mex.cc	Tue Sep 11 13:48:46 2012 -0400
@@ -1894,7 +1894,7 @@
 }
 
 octave_value
-mxArray::as_octave_value (mxArray *ptr)
+mxArray::as_octave_value (const mxArray *ptr)
 {
   return ptr ? ptr->as_octave_value () : octave_value (Matrix ());
 }
@@ -3214,7 +3214,7 @@
 }
 
 int
-mexPutVariable (const char *space, const char *name, mxArray *ptr)
+mexPutVariable (const char *space, const char *name, const mxArray *ptr)
 {
   if (! ptr)
     return 1;
diff -r 9a8dbd6b6b20 -r 5f3a69a309a7 libinterp/interp-core/mxarray.in.h
--- a/libinterp/interp-core/mxarray.in.h	Tue Sep 11 13:44:42 2012 -0400
+++ b/libinterp/interp-core/mxarray.in.h	Tue Sep 11 13:48:46 2012 -0400
@@ -486,7 +486,7 @@
     return retval;
   }
 
-  static octave_value as_octave_value (mxArray *ptr);
+  static octave_value as_octave_value (const mxArray *ptr);
 
 protected: