suzanne.soy/scribble-enhanced
1
0
Fork 0
Code Issues 1 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

switch printer to constructor+quote style

Browse Source 
original commit: 43027a8d9b862d44c84bd6922716f69bf81f8f14
This commit is contained in:
Matthew Flatt 2010-05-06 10:33:42 -06:00
commit 8a38388cd7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scribble/eval.rkt
View File

@ -124,7 +124,7 @@
(list (list
(hspace 2) (hspace 2)
(elem #:style result-color (elem #:style result-color
(to-element/no-color v #:qq? (print-as-quasiquote))))))))) (to-element/no-color v #:qq? (print-as-expression)))))))))
val-list)))) val-list))))
(loop (cdr expr-paras) (loop (cdr expr-paras)
(cdr val-list+outputs) (cdr val-list+outputs)
@ -320,7 +320,7 @@
(define (show-val v) (define (show-val v)
(elem #:style result-color (elem #:style result-color
(to-element/no-color v #:qq? (print-as-quasiquote)))) (to-element/no-color v #:qq? (print-as-expression))))
(define (do-interaction-eval-show ev e) (define (do-interaction-eval-show ev e)
(parameterize ([current-command-line-arguments #()]) (parameterize ([current-command-line-arguments #()])