walk back changes
Getty Ritter
3 years ago
| 212 | 212 |
(substring str 0 i))
|
| 213 | 213 |
|
| 214 | 214 |
(define (string-drop str i)
|
| 215 | |
(let ((l (- (string-length str) 1)))
|
| 215 |
(let ((l (string-length str)))
|
| 216 | 216 |
(substring str i l)))
|
| 217 | 217 |
|
| 218 | 218 |
(define (gather-para document)
|