Home | History | Annotate | Download | only in guile

Lines Matching refs:pretty

1 /* GDB/Scheme pretty-printing.
60 /* The <gdb:pretty-printer> smob. */
74 The procedure is called as (lookup gdb:pretty-printer value).
75 The result should either be a gdb:pretty-printer object that will print
82 /* The <gdb:pretty-printer-worker> smob. */
93 /* A procedure called to pretty-print the value.
105 "gdb:pretty-printer";
107 "gdb:pretty-printer-worker";
109 /* The tag Guile knows the pretty-printer smobs by. */
113 /* The global pretty-printer list. */
119 /* Pretty-printer display hints are specified by strings. */
125 /* Administrivia for pretty-printer matcher smobs. */
127 /* The smob "print" function for <gdb:pretty-printer>. */
146 /* (make-pretty-printer string procedure) -> <gdb:pretty-printer> */
170 /* Return non-zero if SCM is a <gdb:pretty-printer> object. */
178 /* (pretty-printer? object) -> boolean */
186 /* Returns the <gdb:pretty-printer> object in SELF.
187 Throws an exception if SELF is not a <gdb:pretty-printer> object. */
199 /* Returns a pointer to the pretty-printer smob of SELF.
200 Throws an exception if SELF is not a <gdb:pretty-printer> object. */
214 /* Pretty-printer methods. */
216 /* (pretty-printer-enabled? <gdb:pretty-printer>) -> boolean */
227 /* (set-pretty-printer-enabled! <gdb:pretty-printer> boolean)
241 /* (pretty-printers) -> list
242 Returns the list of global pretty-printers. */
250 /* (set-pretty-printers! list) -> unspecified
251 Set the global pretty-printers list. */
265 /* Administrivia for pretty-printer-worker smobs.
268 /* The smob "print" function for <gdb:pretty-printer-worker>. */
291 /* (make-pretty-printer-worker string procedure procedure)
292 -> <gdb:pretty-printer-worker> */
311 /* Return non-zero if SCM is a <gdb:pretty-printer-worker> object. */
319 /* (pretty-printer-worker? object) -> boolean */
329 type of some value returned from a pretty-printer is invalid. */
355 <gdb:pretty-printer> object if one recognizes VALUE. If no printer is
361 random crud can appear in the pretty-printer list, and we can't crash
374 (_("pretty-printer list is not a list"), list);
386 (_("pretty-printer list contains non-pretty-printer object"),
399 (_("invalid lookup object in pretty-printer matcher"),
412 (_("invalid result from pretty-printer lookup"), worker);
419 (_("pretty-printer list is not a list"), orig_list);
426 Look for a pretty-printer to print VALUE in all objfiles.
428 The result is #f, if no pretty-printer was found.
429 Otherwise the result is the pretty-printer smob. */
451 Look for a pretty-printer to print VALUE in the current program space.
453 The result is #f, if no pretty-printer was found.
454 Otherwise the result is the pretty-printer smob. */
467 Look for a pretty-printer to print VALUE in the gdb module.
469 The result is #f, if no pretty-printer was found.
470 Otherwise the result is the pretty-printer smob. */
480 /* Find the pretty-printing constructor function for VALUE. If no
481 pretty-printer exists, return #f. If one exists, return the
482 gdb:pretty-printer smob that implements it. On error, an exception smob
493 /* Look at the pretty-printer list for each objfile
501 /* Look at the pretty-printer list for the current program-space. */
508 /* Look at the pretty-printer list in the gdb module. */
513 /* Pretty-print a single value, via the PRINTER, which must be a
514 <gdb:pretty-printer-worker> object.
517 is returned. If the function returns #f that means the pretty
562 (_("invalid result from pretty-printer to-string"), result);
578 <gdb:pretty-printer-worker> object. */
589 /* Return the display hint for the pretty-printer PRINTER.
591 <gdb:pretty-printer-worker> object.
739 int is_map, is_array, done_flag, pretty;
749 (_("pretty-printer \"children\" object is not a procedure or #f"),
772 (_("result of pretty-printer \"children\" procedure is not"
779 and the pretty option otherwise. */
781 pretty = options->prettyformat_arrays;
785 pretty = 1;
787 pretty = options->prettyformat_structs;
812 (_("result of pretty-printer children iterator is not a pair"
822 (_("first element of pretty-printer children iterator is not"
840 gdb_puts (pretty ? "," : ", ", stream);
860 pretty = 0;
866 if (pretty)
938 if (pretty)
945 if (pretty)
979 /* No pretty-printer support for unavailable values. */
1018 /* Fall through. A bad hint doesn't stop pretty-printing. */
1041 /* Initialize the Scheme pretty-printer code. */
1045 { "make-pretty-printer", 2, 0, 0,
1048 Create a <gdb:pretty-printer> object.\n\
1053 (pretty-printer <gdb:value>) -> <gdb:pretty-printer-worker> | #f." },
1055 { "pretty-printer?", 1, 0, 0, as_a_scm_t_subr (gdbscm_pretty_printer_p),
1057 Return #t if the object is a <gdb:pretty-printer> object." },
1059 { "pretty-printer-enabled?", 1, 0, 0,
1062 Return #t if the pretty-printer is enabled." },
1064 { "set-pretty-printer-enabled!", 2, 0, 0,
1067 Set the enabled flag of the pretty-printer.\n\
1070 { "make-pretty-printer-worker", 3, 0, 0,
1073 Create a <gdb:pretty-printer-worker> object.\n\
1078 (pretty-printer) -> string | #f | <gdb:value>\n\
1080 (pretty-printer) -> <gdb:iterator>" },
1082 { "pretty-printer-worker?", 1, 0, 0,
1085 Return #t if the object is a <gdb:pretty-printer-worker> object." },
1087 { "pretty-printers", 0, 0, 0, as_a_scm_t_subr (gdbscm_pretty_printers),
1089 Return the list of global pretty-printers." },
1091 { "set-pretty-printers!", 1, 0, 0,
1094 Set the list of global pretty-printers." },