fix test
which is sensitive to details of the documentation of `->'
This commit is contained in:
parent
4905d344dd
commit
e3b8997fb8
|
@ -12,7 +12,7 @@
|
||||||
"out.sxref")
|
"out.sxref")
|
||||||
fasl->s-exp))))))
|
fasl->s-exp))))))
|
||||||
|
|
||||||
(unless (equal? '(form ((lib "racket/contract.rkt") ->))
|
(unless (equal? '(form ((lib "racket/contract/base.rkt") ->))
|
||||||
(xref-binding->definition-tag
|
(xref-binding->definition-tag
|
||||||
xref
|
xref
|
||||||
(list '(lib "contract.rkt" "racket") '->)
|
(list '(lib "contract.rkt" "racket") '->)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user