home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 mARCH / PCWK3A99.iso / Linux / DDD331 / DDD-3_1_.000 / DDD-3_1_ / ddd-3.1.1 / ddd / ddd.vsl < prev    next >
Text File  |  1998-12-06  |  6KB  |  216 lines
  1. // $Id: ddd.vsl.m4,v 1.9.4.1 1998/12/04 15:20:10 zeller Exp $ -*- c++ -*-
  2. // VSL functions for DDD graph display
  3. // Generated automatically from ddd.vsl.m4 by m4.  DO NOT EDIT.
  4.  
  5. // Copyright (C) 1995-1998 Technische Universitaet Braunschweig, Germany.
  6. // Written by Andreas Zeller <zeller@ips.cs.tu-bs.de>.
  7. // 
  8. // This file is part of DDD.
  9. // 
  10. // DDD is free software; you can redistribute it and/or
  11. // modify it under the terms of the GNU General Public
  12. // License as published by the Free Software Foundation; either
  13. // version 2 of the License, or (at your option) any later version.
  14. // 
  15. // DDD is distributed in the hope that it will be useful,
  16. // but WITHOUT ANY WARRANTY; without even the implied warranty of
  17. // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  18. // See the GNU General Public License for more details.
  19. // 
  20. // You should have received a copy of the GNU General Public
  21. // License along with DDD -- see the file COPYING.
  22. // If not, write to the Free Software Foundation, Inc.,
  23. // 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  24. // 
  25. // DDD is the data display debugger.
  26. // For details, see the DDD World-Wide-Web page, 
  27. // `http://www.cs.tu-bs.de/softech/ddd/',
  28. // or send a mail to the DDD developers <ddd@ips.cs.tu-bs.de>.
  29.  
  30. // Includes
  31. #include <std.vsl>
  32. #include <tab.vsl>
  33. #include <fonts.vsl>
  34. #include <colors.vsl>
  35.  
  36. // Font settings
  37. #pragma replace stdfontfamily
  38. stdfontfamily() = family_typewriter();
  39. small(...) = rm(...);
  40.  
  41. // Colors
  42. display_color(box)   = color(box, "black", "white");
  43. title_color(box)     = color(box, "black");
  44. disabled_color(box)  = color(box, "white", "grey50");
  45. simple_color(box)    = color(box, "black");
  46. text_color(box)      = color(box, "black");
  47. pointer_color(box)   = color(box, "blue4");
  48. struct_color(box)    = color(box, "black");
  49. list_color(box)      = color(box, "black");
  50. array_color(box)     = color(box, "blue4");
  51. reference_color(box) = color(box, "blue4");
  52. changed_color(box)   = color(box, "black", "#ffffcc");
  53. shadow_color(box)    = color(box, "grey");
  54.  
  55. // Shadow effects
  56. shadow(box, thickness) =
  57.   box & (square(thickness) | shadow_color(vrule(thickness)))
  58. | square(thickness) & shadow_color(hrule(thickness));
  59. shadow(box) = shadow(box, 1);
  60.  
  61. // Non-expanding alignments
  62. fixed_hlist(_) = hnull();
  63. fixed_hlist(_, head) = hfix(head);
  64. fixed_hlist(sep, head, ...) = hfix(head) & sep & fixed_hlist(sep, ...);
  65.  
  66. fixed_vlist(_) = vnull();
  67. fixed_vlist(_, head) = vfix(head);
  68. fixed_vlist(sep, head, ...) = vfix(head) | sep | fixed_vlist(sep, ...);
  69.  
  70. // The title
  71. title (disp_nr, name) -> 
  72.   title_color(rm(disp_nr & ": ") & bf(name) & hfill());
  73. title (name) -> 
  74.   title_color(bf(name) & hfill());
  75.  
  76. // The annotation
  77. annotation (name) ->
  78.   small(name);
  79.  
  80. // The "disabled" string
  81. disabled () -> 
  82.   disabled_color(vcenter(it("(Disabled)") & hfill()));
  83.  
  84. // No value
  85. none () -> "";
  86.  
  87. // Ordinary values
  88. simple_value (value) -> 
  89.   simple_color(vcenter(value & hfill()));
  90. numeric_value (value) -> 
  91.   simple_color(vcenter(hfill() & value));
  92.  
  93. // Collapsed ordinary values
  94. collapsed_simple_value () -> 
  95.   simple_color(vcenter(rm("...") & hfill()));
  96.  
  97. // Info texts: single lines
  98. text_line (line) -> 
  99.   text_color(rm(line) & hfill());
  100.  
  101. // Multiple lines
  102. text_value (...) -> valign(...);
  103.  
  104. // Collapsed ordinary values
  105. collapsed_text_value () -> 
  106.   text_color(rm("...") & hfill());
  107.  
  108. // Ordinary pointers
  109. pointer_value (value) -> 
  110.   pointer_color(vcenter(value & hfill()));
  111.  
  112. // Collapsed pointers
  113. collapsed_pointer_value () -> 
  114.   pointer_color(vcenter(rm("...") & hfill()));
  115.  
  116. // Dereferenced pointers
  117. dereferenced_pointer_value (value) -> 
  118.   pointer_color(vcenter(bf(value)) & hfill());
  119.  
  120. // Collapsed array
  121. collapsed_array () -> 
  122.   array_color(vcenter(rm("\133...\135") & hfill()));
  123.  
  124. // Empty array
  125. empty_array () -> 
  126.   array_color(vcenter(rm("\133\135") & hfill()));
  127.  
  128. // Vertical array
  129. vertical_array (...) -> 
  130.   array_color(frame(indent(vlist(hwhite() | hrule() | hwhite(), ...))));
  131.  
  132. // Horizontal array
  133. horizontal_array (...) -> 
  134.   array_color(frame(indent(fixed_hlist(vwhite() & vrule() & vwhite(), ...))) 
  135.           & hfill());
  136.  
  137. // Two-dimensional arrays
  138. twodim_array (...) -> 
  139.   array_color(dtab(...));
  140. twodim_array_elem (...) -> 
  141.   rm(...);
  142.  
  143. // Struct value
  144. struct_value (...) -> 
  145.   struct_color(frame(indent(valign(...))));
  146.  
  147. // Collapsed struct
  148. collapsed_struct_value () -> 
  149.   struct_color(vcenter(rm("{...}") & hfill()));
  150.  
  151. // Empty struct
  152. empty_struct_value () ->
  153.   struct_color(vcenter(rm("{}") & hfill()));
  154.  
  155. // Struct member name
  156. struct_member_name (name) -> 
  157.   struct_color(rm(name));
  158.  
  159. // Struct member
  160. struct_member (name, sep, value, name_width) -> 
  161.   vcenter(rm(name) | hspace(name_width)) 
  162.   & vcenter(rm(sep)) & rm(value);
  163.  
  164. // List value
  165. list_value (...) -> 
  166.   list_color(valign(...));
  167.  
  168. // Collapsed list
  169. collapsed_list_value () -> 
  170.   list_color(vcenter(rm("...") & hfill()));
  171.  
  172. // Empty list
  173. empty_list_value () -> 
  174.   list_color(vcenter(rm("") & hfill()));
  175.  
  176. // List member name
  177. list_member_name (name) -> 
  178.   list_color(rm(name));
  179.  
  180. // List member
  181. list_member (name, sep, value, name_width) -> 
  182.   vcenter(rm(name) | hspace(name_width)) 
  183.   & vcenter(rm(sep)) & rm(value) & hfill();
  184.  
  185. // Sequence
  186. sequence_value (...) -> 
  187.   simple_color(fixed_hlist(vwhite(), ...) & hfill());
  188.  
  189. // Collapsed sequence
  190. collapsed_sequence_value () -> 
  191.   collapsed_simple_value();
  192.  
  193. // Reference
  194. reference_value (ref, value) -> 
  195.   reference_color(vcenter(rm(ref & ": ")) & value & hfill());
  196.  
  197. // Collapsed reference
  198. collapsed_reference_value () -> 
  199.   reference_color(vcenter(rm("...") & hfill()));
  200.  
  201. // Changed value
  202. changed_value (value) -> 
  203.   changed_color(it(value));
  204.  
  205. // A value that is repeated N times
  206. repeated_value (value, n) ->
  207.   value & vcenter(rm(" <" & dec(n) & "\327>"));
  208.  
  209. // The entire box
  210. display_box (title, value) -> 
  211.   shadow(display_color(frame(title | hrule() | hwhite () | rm(value))));
  212.  
  213. // The entire box, but without title
  214. display_box (value) -> 
  215.   shadow(display_color(frame(rm(value))));
  216.