On 4 December 2012 13:19, nalaginrut <[email protected]> wrote: > Hi Daniel! > I believe this patch simplified my work, and 'colorized' module has been > finished, I'm testing and debugging. > I'll post it when it's all done.
Glad to hear it.
Attached is an alternate patch that handles before-print-hook and
*unspecified* outside of the custom print procedure, to avoid the need
for boilerplate there.
--
scheme@(guile-user)> (define (repl-print* repl val)
(format #t "~20@y" val)
(newline))
scheme@(guile-user)> (use-modules (system repl common))
scheme@(guile-user)> (repl-option-set! (car (fluid-ref *repl-stack*))
'print repl-print*)
scheme@(guile-user)> (use-modules (srfi srfi-1))
scheme@(guile-user)> (iota 20)
$1 = (0 1 2 3 4 5 6 7 …)
0001-repl-add-repl-option-for-customized-print.alt.patch
Description: Binary data
