# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1646683354 18000
# Node ID 449e26c26b413f73be68963bf0df4c1fd4c7cd32
# Parent  df6668419bfaffeacc15d0c46fbf08e2f9ff8428
new is_colon_expression predicate for parse tree expression objects

* pt-exp.h (is_colon_expression): New virtual function.
* pt-colon.h (is_colon_expression): New function.

diff -r df6668419bfa -r 449e26c26b41 libinterp/parse-tree/pt-colon.h
--- a/libinterp/parse-tree/pt-colon.h	Tue Mar 15 16:48:43 2022 +0100
+++ b/libinterp/parse-tree/pt-colon.h	Mon Mar 07 15:02:34 2022 -0500
@@ -89,6 +89,8 @@
 
     tree_expression * dup (symbol_scope& scope) const;
 
+    bool is_colon_expression (void) const { return true; }
+
     octave_value evaluate (tree_evaluator&, int nargout = 1);
 
     octave_value_list evaluate_n (tree_evaluator& tw, int nargout = 1)
diff -r df6668419bfa -r 449e26c26b41 libinterp/parse-tree/pt-exp.h
--- a/libinterp/parse-tree/pt-exp.h	Tue Mar 15 16:48:43 2022 +0100
+++ b/libinterp/parse-tree/pt-exp.h	Mon Mar 07 15:02:34 2022 -0500
@@ -81,6 +81,8 @@
 
     virtual bool is_boolean_expression (void) const { return false; }
 
+    virtual bool is_colon_expression (void) const { return false; }
+
     virtual bool lvalue_ok (void) const { return false; }
 
     virtual bool rvalue_ok (void) const { return false; }