We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 09a6d15 commit 2045eeeCopy full SHA for 2045eee
private/syntax-path.rkt
@@ -244,8 +244,6 @@
244
245
246
(define (string->syntax-path str)
247
- (unless (string? str)
248
- (raise-argument-error 'string->syntax-path "string?" str))
249
(unless (string-prefix? str "/")
250
(raise-arguments-error
251
'string->syntax-path
@@ -264,7 +262,7 @@
264
262
(unless (and num (exact-nonnegative-integer? num))
265
263
266
267
- "syntax path string contains invalid element (must be non-negative integer)"
+ "syntax path string contains invalid element (must be nonnegative integer)"
268
"given" str
269
"invalid element" part))
270
num)])
0 commit comments