Tweak pagination.
authorChris Hanson <org/chris-hanson/cph>
Mon, 9 Jan 2017 01:22:13 +0000 (17:22 -0800)
committerChris Hanson <org/chris-hanson/cph>
Mon, 9 Jan 2017 01:22:13 +0000 (17:22 -0800)
src/runtime/string.scm

index 27ee2875277e6cf61dd42a20f96c123477032bab..7e9e6b03c084e14781d1a40173e29dbc658d3675 100644 (file)
@@ -973,7 +973,7 @@ USA.
         (fix:= (%substring-match-forward-ci string1 start1 end1
                                             string2 start2 end2)
                length))))
-\f
+
 (define (string-suffix? string1 string2)
   (guarantee-2-strings string1 string2 'STRING-SUFFIX?)
   (%substring-suffix? string1 0 (string-length string1)
@@ -1263,7 +1263,7 @@ USA.
                    (fix:+ (string-find-previous-char-in-set string char-set)
                           1))
        "")))
-\f
+
 ;;;; Pad
 
 (define (string-pad-right string n #!optional char)