racket/sandbox: change syntax-object wrappers generated for locations

Generate wrappers consistent with a reader-level absence of `.'s,
instead of wrapping every pair. This change fixes the `syntax-e'
example in the Guide's description of syntax objects.

original commit: 54a6ba8d363f441d0bf3d4b15df0170215b84b8e
This commit is contained in:
Matthew Flatt 2012-05-01 14:49:10 -06:00
parent 548627c404
commit bca4c000ba
2 changed files with 8 additions and 0 deletions

View File

@ -0,0 +1,6 @@
#lang scribble/manual
@(require scribble/eval)
@interaction[
(syntax-e #'(+ 1 2))
]

View File

@ -0,0 +1,2 @@
> (syntax-e #'(+ 1 2))
'(#<syntax:1:0 +> #<syntax:1:0 1> #<syntax:1:0 2>)