From 2c64e2b41fdf6442bddd5b368fb78f8aa352d1e8 Mon Sep 17 00:00:00 2001
From: eitsupi <ts1s1andn@gmail.com>
Date: Mon, 15 Apr 2024 11:52:08 +0000
Subject: [PATCH] test: more test case

---
 tests/testthat/test-expr_string.R | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tests/testthat/test-expr_string.R b/tests/testthat/test-expr_string.R
index 8e8c1c2c6..0552c9252 100644
--- a/tests/testthat/test-expr_string.R
+++ b/tests/testthat/test-expr_string.R
@@ -707,6 +707,13 @@ test_that("str$to_integer", {
   )
 
   expect_grepl_error(pl$lit("foo")$str$to_integer()$to_r(), "strict integer parsing failed for 1 value")
+
+  expect_identical(
+    pl$DataFrame(base = c(2, 10), str = "10")$select(
+      pl$col("str")$str$to_integer(base = "base")
+    )$to_list()[[1]],
+    c(2, 10)
+  )
 })
 
 test_that("str$reverse()", {