[Swig-cvs] SWIG/Source/Modules main.cxx,1.71,1.72

[Marcelo M. <mar...@us...>]

Update of /cvsroot/swig/SWIG/Source/Modules
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31832/Source/Modules

Modified Files:
	main.cxx 
Log Message:
add -dump_module_tree option (the -dump_tree is too much for most of the cases)

Index: main.cxx
===================================================================
RCS file: /cvsroot/swig/SWIG/Source/Modules/main.cxx,v
retrieving revision 1.71
retrieving revision 1.72
diff -C2 -d -r1.71 -r1.72
*** main.cxx	28 Dec 2005 22:40:32 -0000	1.71
--- main.cxx	3 Jan 2006 07:42:03 -0000	1.72
***************
*** 124,127 ****
--- 124,128 ----
  static int     dump_tags = 0;
  static int     dump_tree = 0;
+ static int     dump_module_tree = 0;
  static int     dump_xml = 0;
  static int     browse = 0;
***************
*** 620,623 ****
--- 621,627 ----
  	    dump_tree = 1;
  	    Swig_mark_arg(i);
+ 	  } else if (strcmp(argv[i],"-dump_module_tree") == 0) {
+ 	    dump_module_tree = 1;
+ 	    Swig_mark_arg(i);
  	  } else if (strcmp(argv[i],"-dump_xml") == 0) {
  	    dump_xml = 1;
***************
*** 1008,1011 ****
--- 1012,1018 ----
        Swig_print_tree(top);
      }
+     if (dump_module_tree) {
+       Swig_print_tree(Getattr(top,"module"));
+     }
      if (dump_xml) {
        Swig_print_xml(top, xmlout);