# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1272396011 -7200
# Node ID fd6899b1b00eed431db6865d14e4f2cd386c3d04
# Parent  cb08831272516afeec113d0a1eebbea8d411005e
use common error message for indexed cs-lists

diff -r cb0883127251 -r fd6899b1b00e src/ChangeLog
--- a/src/ChangeLog	Tue Apr 27 12:07:04 2010 -0400
+++ b/src/ChangeLog	Tue Apr 27 21:20:11 2010 +0200
@@ -1,3 +1,8 @@
+2010-04-27  Jaroslav Hajek  <highegg@gmail.com>
+
+	* ov-cs-list.cc (octave_cs_list::subsref): New methods. Just gripe.
+	* ov-cs-list.h: Declare them.
+
 2010-04-27  John W. Eaton  <jwe@octave.org>
 
 	* ov-usr-fcn.cc (octave_user_script::do_multi_index_op):
diff -r cb0883127251 -r fd6899b1b00e src/ov-cs-list.cc
--- a/src/ov-cs-list.cc	Tue Apr 27 12:07:04 2010 -0400
+++ b/src/ov-cs-list.cc	Tue Apr 27 21:20:11 2010 +0200
@@ -31,6 +31,7 @@
 
 #include "defun.h"
 #include "error.h"
+#include "gripes.h"
 #include "ov-cs-list.h"
 #include "unwind-prot.h"
 
@@ -42,3 +43,20 @@
   : octave_base_value (), lst (c)
 {
 }
+
+octave_value
+octave_cs_list::subsref (const std::string&,
+                         const std::list<octave_value_list>&)
+{
+  gripe_indexed_cs_list ();
+  return octave_value ();
+}
+
+octave_value_list
+octave_cs_list::subsref (const std::string&,
+                         const std::list<octave_value_list>&, int)
+{
+  gripe_indexed_cs_list ();
+  return octave_value_list ();
+}
+
diff -r cb0883127251 -r fd6899b1b00e src/ov-cs-list.h
--- a/src/ov-cs-list.h	Tue Apr 27 12:07:04 2010 -0400
+++ b/src/ov-cs-list.h	Tue Apr 27 21:20:11 2010 +0200
@@ -72,6 +72,12 @@
 
   octave_value_list list_value (void) const { return lst; }
 
+  octave_value subsref (const std::string& type,
+                        const std::list<octave_value_list>& idx);
+
+  octave_value_list subsref (const std::string& type,
+                             const std::list<octave_value_list>& idx, int);
+
 private:
 
   // The list of Octave values.