[racket] paren-shape

From: Eli Barzilay (eli at barzilay.org)
Date: Sun May 13 15:58:23 EDT 2012

A few minutes ago, Danny Yoo wrote:
> Does this apply?  http://lists.racket-lang.org/dev/archive/2012-March/
> 009205.html

Looks like it -- I change `curly?' to

  (define-for-syntax (curly? stx)
    (eprintf ">>> ~s -> ~s\n" stx (syntax-property stx 'paren-shape))
    (eq? (syntax-property stx 'paren-shape) #\{))

and I see printouts of these pairs.  Is there any reason for this kind
of cons-merging the before/after properties even when both have the
same value?  (Seems that the only information gained from this can be
taken from the origin property)

          ((lambda (x) (x x)) (lambda (x) (x x)))          Eli Barzilay:
                    http://barzilay.org/                   Maze is Life!

Posted on the users mailing list.