WIP

src/lenient_parse.gleam

@@ -1,5 +1,5 @@
 import gleam/bool
-import lenient_parse/internal/base_constants.{base_10}
+import lenient_parse/internal/base_constants.{base_0, base_10}
 import lenient_parse/internal/parser
 import lenient_parse/internal/tokenizer
 import parse_error.{type ParseError, InvalidBaseValue}
@@ -26,7 +26,7 @@ pub fn to_int_with_base(
   text text: String,
   base base: Int,
 ) -> Result(Int, ParseError) {
-  let is_valid_base = base == 0 || { base >= 2 && base <= 36 }
+  let is_valid_base = base == base_0 || { base >= 2 && base <= 36 }
   use <- bool.guard(!is_valid_base, Error(InvalidBaseValue(base)))
   let tokens = text |> tokenizer.tokenize_int(base: base)
   tokens |> parser.parse_int(base: base)

src/lenient_parse/internal/base_constants.gleam

@@ -1,3 +1,5 @@
+pub const base_0 = 0
+
 pub const base_2 = 2
 
 pub const base_8 = 8

src/lenient_parse/internal/parser.gleam

@@ -5,7 +5,9 @@ import gleam/option.{type Option, None, Some}
 import gleam/order
 import gleam/queue.{type Queue}
 import gleam/result
-import lenient_parse/internal/base_constants.{base_10}
+import lenient_parse/internal/base_constants.{
+  base_0, base_10, base_16, base_2, base_8,
+}
 import lenient_parse/internal/scale
 import lenient_parse/internal/token.{
   type Token, BasePrefix, DecimalPoint, Digit, ExponentSymbol, Sign, Underscore,
@@ -122,7 +124,9 @@ pub fn parse_int(
   use ParseData(is_positive, next_index, tokens) <- result.try(parse_data)
 
   let parse_data = case base {
-    a if a == 0 || a == 2 || a == 8 || a == 16 -> {
+    base
+      if base == base_0 || base == base_2 || base == base_8 || base == base_16
+    -> {
       let parse_data = parse_base_prefix(tokens, next_index)
       use ParseData(base_data, next_index, tokens) <- result.try(parse_data)
 
@@ -132,9 +136,9 @@ pub fn parse_int(
           Some(#(index_range, prefix)),
         )
         None -> {
-          let default_base = case a {
+          let default_base = case base {
             0 -> base_10
-            _ -> a
+            _ -> base
           }
 
           #(default_base, None)

src/lenient_parse/internal/tokenizer.gleam

@@ -1,7 +1,9 @@
 import gleam/list
 import gleam/option.{type Option, None, Some}
 import gleam/string
-import lenient_parse/internal/base_constants.{base_10, base_16, base_2, base_8}
+import lenient_parse/internal/base_constants.{
+  base_0, base_10, base_16, base_2, base_8,
+}
 import lenient_parse/internal/token.{
   type Token, BasePrefix, DecimalPoint, Digit, ExponentSymbol, Sign, Underscore,
   Unknown, Whitespace,
@@ -60,15 +62,15 @@ fn do_tokenize_int(
         lookahead
       {
         False, "0", Ok(specifier)
-          if { base == 0 || base == 2 }
+          if { base == base_0 || base == base_2 }
           && { specifier == "b" || specifier == "B" }
         -> create_base_prefix(index, specifier, base_2, rest)
         False, "0", Ok(specifier)
-          if { base == 0 || base == 8 }
+          if { base == base_0 || base == base_8 }
           && { specifier == "o" || specifier == "O" }
         -> create_base_prefix(index, specifier, base_8, rest)
         False, "0", Ok(specifier)
-          if { base == 0 || base == 16 }
+          if { base == base_0 || base == base_16 }
           && { specifier == "x" || specifier == "X" }
         -> create_base_prefix(index, specifier, base_16, rest)
         _, _, _ -> {