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

avoid putting tail marks on when we know they are already there

Browse Source
This commit is contained in:
Robby Findler 2016-01-18 10:05:23 -06:00
parent 0104e753e7
commit 66d6de6394
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/collects/racket/contract/private/arrow-higher-order.rkt
View File

@ -288,7 +288,7 @@
#,the-call/no-tail-mark)) #,the-call/no-tail-mark))
(cond (cond
[(null? (syntax-e stuff)) ;; surely there must a better way [(null? (syntax-e stuff)) ;; surely there must a better way
the-call] the-call/no-tail-mark]
[else [else
(wrap-call-with-values-and-range-checking (wrap-call-with-values-and-range-checking
the-call the-call