summaryrefslogtreecommitdiff
path: root/bs/string.scm
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2021-04-02 21:39:47 -0400
committerBen Sima <ben@bsima.me>2021-04-02 21:39:47 -0400
commite3a813d72449e738bd95323511ad0696719bf396 (patch)
treedee2ff6b3be3037559b703bbf15a1769c00a88a6 /bs/string.scm
parent574da8a4d081d19fd7b8447dc616d43786ef5f51 (diff)
Init bizbot
Diffstat (limited to 'bs/string.scm')
-rw-r--r--bs/string.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/bs/string.scm b/bs/string.scm
index 963525c..c6e6e31 100644
--- a/bs/string.scm
+++ b/bs/string.scm
@@ -19,8 +19,8 @@
(only (ice-9 ports) with-output-to-string))
;; Is `pre` a prefix of `s`?
- (define (prefix? s sub)
- (string-prefix? sub s))
+ (define (prefix? s pre)
+ (string-prefix? pre s))
;; Is `suf` a suffix of `s`?
(define (suffix? s suf)