From 4f2de3568f903cabecb52ba8b3a5e07de925d1ce Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Mon, 9 Sep 2024 03:52:56 -0400
Subject: More tests

---
 test/paths.tm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/test/paths.tm b/test/paths.tm
index bc85c31a..016c91cc 100644
--- a/test/paths.tm
+++ b/test/paths.tm
@@ -24,3 +24,16 @@ func main():
 
     >> tmpdir:remove()
 
+    >> p := (/foo/baz.x/qux.tar.gz)
+    >> p:base_name()
+    = "qux.tar.gz"
+    >> p:parent()
+    = (/foo/baz.x)
+    >> p:extension()
+    = "tar.gz"
+    >> p:extension(full=no)
+    = "gz"
+    >> (~/.foo):extension()
+    = ""
+    >> (~/foo):extension()
+    = ""
-- 
cgit v1.2.3