Better

2023-12-05 20:11:20 +00:00
parent 10f71a4c46
commit 713b139bc2
5 changed files with 109 additions and 100 deletions
--- a/AdventOfCode2023.FSharp/AdventOfCode2023.FSharp.Lib/EfficientString.fs
+++ b/AdventOfCode2023.FSharp/AdventOfCode2023.FSharp.Lib/EfficientString.fs
@@ -96,6 +96,12 @@ module StringSplitEnumerator =

        Int32.Parse e.Current

+    let consumeU32 (e : byref<StringSplitEnumerator>) : uint32 =
+        if not (e.MoveNext ()) then
+            failwith "expected an int, got nothing"
+
+        UInt32.Parse e.Current
+
    let consumeU64 (e : byref<StringSplitEnumerator>) : uint64 =
        if not (e.MoveNext ()) then
            failwith "expected an int, got nothing"