Mercurial > octave-nkf

diff libinterp/parse-tree/pt-pr-code.cc @ 17577:c702371ff6df classdef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: periodic merge of default to classdef
author John W. Eaton <jwe@octave.org>
date Sat, 05 Oct 2013 11:22:09 -0400
parents 947cf10c94da 923ce8b42db2
children 93b3d03b05e7
line wrap: on
line diff
--- a/libinterp/parse-tree/pt-pr-code.cc	Thu Sep 12 21:08:07 2013 -0400
+++ b/libinterp/parse-tree/pt-pr-code.cc	Sat Oct 05 11:22:09 2013 -0400
@@ -1005,6 +1005,7 @@
   newline ();
 
   tree_statement_list *try_code = cmd.body ();
+  tree_identifier *expr_id = cmd.identifier ();
 
   if (try_code)
     {
@@ -1021,6 +1022,12 @@
 
   os << "catch";
 
+  if (expr_id)
+    {
+      os << " ";
+      expr_id->accept (*this);
+    }
+
   newline ();
 
   tree_statement_list *catch_code = cmd.cleanup ();