Fix aoc2024 build
- Holes are no longer allowed when building executables - Stack overflow in mapMaybe (Day15)
This commit is contained in:
@@ -21,7 +21,7 @@ part1 : List File -> Int
|
||||
part1 fs = go 0 0 fs $ reverse fs
|
||||
where
|
||||
go : Int -> Int -> List File -> List File -> Int
|
||||
go pos csum Nil bwd = ?
|
||||
go pos csum Nil bwd = fatalError "Shouldn't happen"
|
||||
go pos csum fwd Nil = csum
|
||||
go pos csum ((id, 0, 0) :: fwd) bwd = go pos csum fwd bwd
|
||||
go pos csum fwd ((id, 0, _) :: bwd) = go pos csum fwd bwd
|
||||
|
||||
Reference in New Issue
Block a user