From 0d633fefd3ba657f85e166bd5517611aa59bff95 Mon Sep 17 00:00:00 2001 From: ben Date: Sat, 10 Oct 2015 01:39:19 -0400 Subject: [PATCH] typo: string-contains precondition --- racket/collects/racket/string.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/collects/racket/string.rkt b/racket/collects/racket/string.rkt index d4f51511f6..33df306f0f 100644 --- a/racket/collects/racket/string.rkt +++ b/racket/collects/racket/string.rkt @@ -173,7 +173,7 @@ (unless (string? str) (raise-argument-error 'string-contains? "string?" str)) (unless (string? sub) - (raise-argument-error 'string-prefix? "string?" sub)) + (raise-argument-error 'string-contains? "string?" sub)) (define L1 (string-length str)) (define L2 (string-length sub)) (define d (- L1 L2))