From f29d77d3d84d5eb33a73c95b7e3068ee79dd2675 Mon Sep 17 00:00:00 2001 From: Ben Greenman Date: Mon, 25 Sep 2017 16:35:39 -0400 Subject: [PATCH] doc: swap takef / dropf codomain contracts The codomain for `takef-right` didn't match `take-right`. Same for `dropf-right`. --- pkgs/racket-doc/scribblings/reference/pairs.scrbl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/pkgs/racket-doc/scribblings/reference/pairs.scrbl b/pkgs/racket-doc/scribblings/reference/pairs.scrbl index b15b349cb5..1eac38b42b 100644 --- a/pkgs/racket-doc/scribblings/reference/pairs.scrbl +++ b/pkgs/racket-doc/scribblings/reference/pairs.scrbl @@ -1055,8 +1055,8 @@ except that it can be faster. @deftogether[( - @defproc[(takef-right [lst any/c] [pred procedure?]) list?] - @defproc[(dropf-right [lst any/c] [pred procedure?]) any/c] + @defproc[(takef-right [lst any/c] [pred procedure?]) any/c] + @defproc[(dropf-right [lst any/c] [pred procedure?]) list?] @defproc[(splitf-at-right [lst any/c] [pred procedure?]) (values list? any/c)] )]{