diff options
| author | Marius Vollmer <mvo@zagadka.de> | 2004-09-29 17:53:40 +0000 |
|---|---|---|
| committer | Marius Vollmer <mvo@zagadka.de> | 2004-09-29 17:53:40 +0000 |
| commit | 81ae25da8ce98b358d7312a64b2341369976076d (patch) | |
| tree | f807c3711209832219187ade43b757c3f004a1bb /libguile/print.h | |
| parent | a2902ecb90d8e15e8e8ac5f4cc376f92f250a8b8 (diff) | |
(SCM_PRINT_HIGHLIGHT_PREFIX,
SCM_PRINT_HIGHLIGHT_SUFFIX): New printer options.
(scm_iprin1): Use them instead of the previoulsy hardcoded
strings.
(scm_init_print): Initialize them.
Diffstat (limited to 'libguile/print.h')
| -rw-r--r-- | libguile/print.h | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/libguile/print.h b/libguile/print.h index 740572eb0..8740fdcf0 100644 --- a/libguile/print.h +++ b/libguile/print.h @@ -28,9 +28,11 @@ SCM_API scm_t_option scm_print_opts[]; -#define SCM_PRINT_CLOSURE (SCM_PACK (scm_print_opts[0].val)) -#define SCM_PRINT_SOURCE_P ((int) scm_print_opts[1].val) -#define SCM_N_PRINT_OPTIONS 2 +#define SCM_PRINT_CLOSURE (SCM_PACK (scm_print_opts[0].val)) +#define SCM_PRINT_SOURCE_P ((int) scm_print_opts[1].val) +#define SCM_PRINT_HIGHLIGHT_PREFIX (SCM_PACK (scm_print_opts[2].val)) +#define SCM_PRINT_HIGHLIGHT_SUFFIX (SCM_PACK (scm_print_opts[3].val)) +#define SCM_N_PRINT_OPTIONS 4 /* State information passed around during printing. */ |