diff options
Diffstat (limited to 'bs/string.scm')
| -rw-r--r-- | bs/string.scm | 4 |
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) |