suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix Scribble `racket' rendering of quotes

Browse Source 
which used to trigger too much space after a quoted form

original commit: 31f6a0da4ee3239706c80f0082a81e7b44ae7e28
This commit is contained in:
Matthew Flatt 2010-08-24 06:05:29 -06:00
parent 7857dca458
commit 49e5d4f640
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/scribble/racket.rkt
View File

@ -1088,8 +1088,7 @@
(list (do-syntax-ize (car v) col line ht #f qq #f) (list (do-syntax-ize (car v) col line ht #f qq #f)
c) c)
(vector #f line col (+ 1 col) (vector #f line col (+ 1 col)
(+ 1 (+ delta
(if (and qq (zero? qq)) 1 0)
(syntax-span c))))))] (syntax-span c))))))]
[(or (list? v) [(or (list? v)
(vector? v) (vector? v)