Fix `os.stem`, `os.short_stem`.

1 files changed, 23 insertions, 0 deletions

diff --git a/tests/core/path/filepath/test_core_filepath.odin b/tests/core/path/filepath/test_core_filepath.odin
index a0de7e831..688259e9c 100644
--- a/tests/core/path/filepath/test_core_filepath.odin
+++ b/tests/core/path/filepath/test_core_filepath.odin
@@ -109,4 +109,27 @@ delete_split :: proc(s: []string) {
 		delete(part)
 	}
 	delete(s)
+}
+
+@(test)
+test_stem :: proc(t: ^testing.T) {
+	@static stem := [][2]string{
+		{"builder.tar.gz",   "builder.tar"},
+		{"./builder.tar.gz", "builder.tar"},
+		{"./builder/",       ""},
+	}
+
+	@static short_stem := [][2]string{
+		{"builder.tar",   "builder"},
+		{"./builder.tar", "builder"},
+		{"./builder/",    ""},
+	}
+
+	for d in stem {
+		testing.expect_value(t, filepath.stem(d[0]), d[1])
+	}
+
+	for d in short_stem {
+		testing.expect_value(t, filepath.stem(d[0]), d[1])
+	}
 }
\ No newline at end of file