diff options
Diffstat (limited to 'aoc-2022-dotnet/Day07/Program.fs')
| -rw-r--r-- | aoc-2022-dotnet/Day07/Program.fs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/aoc-2022-dotnet/Day07/Program.fs b/aoc-2022-dotnet/Day07/Program.fs index 89cd728..7e16cb6 100644 --- a/aoc-2022-dotnet/Day07/Program.fs +++ b/aoc-2022-dotnet/Day07/Program.fs @@ -1,4 +1,6 @@ -open System.IO +module Day07 + +open System.IO open FParsec let fileSizeThreshold = 100_000 @@ -26,9 +28,7 @@ let parseCommands input = let pcmd = pcd <|> pls let pinput = many pcmd - match run pinput input with - | Success (result, _, _) -> result - | _ -> failwith "Invalid input format!" + Common.parse pinput input let combine = function |