summaryrefslogtreecommitdiff
path: root/module/language/tree-il.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2010-10-08 15:24:15 +0200
committerLudovic Courtès <ludo@gnu.org>2010-10-08 16:25:58 +0200
commit7cd6d77c640115d64768ac2e6d81b82e272a706f (patch)
treec3152be013c309933c9111ac452b7ab5cf03e285 /module/language/tree-il.scm
parent75365375dd72b9c5c213955ad866756727e72e19 (diff)
downloadguile-7cd6d77c640115d64768ac2e6d81b82e272a706f.tar.gz
Improve pretty-printing of tree-il objects.
* module/language/tree-il.scm (print-tree-il): Print the AST with ~S instead of ~A.
Diffstat (limited to 'module/language/tree-il.scm')
-rw-r--r--module/language/tree-il.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/tree-il.scm b/module/language/tree-il.scm
index 27fc3bad1..5fd4c125a 100644
--- a/module/language/tree-il.scm
+++ b/module/language/tree-il.scm
@@ -62,7 +62,7 @@
pre-order!))
(define (print-tree-il exp port)
- (format port "#<tree-il ~a>" (unparse-tree-il exp)))
+ (format port "#<tree-il ~S>" (unparse-tree-il exp)))
(define-syntax borrow-core-vtables
(lambda (x)