diff libinterp/octave-value/ov-usr-fcn.h @ 23680:ef71711f6d64

rework __dump_symbol_table__ function * symtab.h, symtab.cc (F__dump_symtab_info__): Instead of printing results, return a struct containing all the info. (symbol_table::symbol_record::symbol_record_rep::dump, symbol_table::fcn_info::fcn_info_rep::dump, symbol_table::dump, symbol_table::scope::dump): Update interface. Create and return struct. (dump_container_map, symbol_table::dump_fcn_table_map, symbol_table::scope::dump_symbols_map): New functions. (fcn_file_name): Delete static function. (symbol_table::dump_global, symbol_table::dump_functions): Delete. * ov-usr-fcn.h, ov-usr-fcn.cc (octave_user_function::dump): Update interface. Create and return struct. (octave_user_function::ctor_type_str): New function. * ov-base.h, ov-base.cc (octave_base_value::dump): Update interface. Create and return struct. * ov.h (octave_value::dump): Update interface.
author John W. Eaton <jwe@octave.org>
date Thu, 22 Jun 2017 16:23:36 -0400
parents 3bb0a937c071
children b9378eff6d13
line wrap: on
line diff
--- a/libinterp/octave-value/ov-usr-fcn.h	Thu Jun 22 15:20:46 2017 -0400
+++ b/libinterp/octave-value/ov-usr-fcn.h	Thu Jun 22 16:23:36 2017 -0400
@@ -382,9 +382,7 @@
   void stash_info (jit_function_info *info) { jit_info = info; }
 #endif
 
-#if 0
-  void print_symtab_info (std::ostream& os) const;
-#endif
+  octave_value dump (void) const;
 
 private:
 
@@ -395,6 +393,8 @@
     classdef
   };
 
+  std::string ctor_type_str (void) const;
+
   // Our symbol table scope.
   symbol_table::scope *m_scope;