diff options
| author | Mistivia <i@mistivia.com> | 2024-02-15 18:42:35 +0800 |
|---|---|---|
| committer | Mistivia <i@mistivia.com> | 2024-02-15 18:42:35 +0800 |
| commit | a19a1b970e5dd6983be8660ef6e0f5929fb5a149 (patch) | |
| tree | ae3e6b3b68573df77b872a2470a7dc01a8d69749 /advent-of-code/2023/04/2.rkt | |
| parent | f163146fe4b31f1b9e4e25f7f61a5c6928e2fe5b (diff) | |
refactor
Diffstat (limited to 'advent-of-code/2023/04/2.rkt')
| -rw-r--r-- | advent-of-code/2023/04/2.rkt | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/advent-of-code/2023/04/2.rkt b/advent-of-code/2023/04/2.rkt index cf874d2..a9d751f 100644 --- a/advent-of-code/2023/04/2.rkt +++ b/advent-of-code/2023/04/2.rkt @@ -1,14 +1,8 @@ #lang racket +(require "../lib/utils.rkt") (require "../lib/obj.rkt") -(define (get-lines fp) - (let loop ((lines '())) - (define l (read-line fp)) - (if (eof-object? l) - (reverse lines) - (loop (cons l lines))))) - (define fp (open-input-file "input")) (define lines (get-lines fp)) |