util: add FileLoc.toFilenameOnly

Author: briansfrank

src/util/fan/FileLoc.fan

@@ -114,6 +114,13 @@ const class FileLoc
     return "$file($line,$col)"
   }
 
+  ** Simplify the file path to remove path
+  @NoDoc FileLoc toFilenameOnly()
+  {
+    slash := file.indexr("/") ?: file.indexr("\\")
+    if (slash == null) return this
+    return make(file[slash+1..-1], line, col)
+  }
 }
 
 **************************************************************************

src/util/test/FileLocTest.fan

@@ -24,6 +24,12 @@ class FileLocTest : Test
     verifyCmd(FileLoc("a", 2, 5), FileLoc("a", 2, 5), 0)
     verifyCmd(FileLoc("a", 2, 5), FileLoc("a", 2, 7), -1)
     verifyCmd(FileLoc("a", 2, 9), FileLoc("a", 2, 7), 1)
+
+    verifyLoc(FileLoc("foo.txt").toFilenameOnly, "foo.txt", 0, 0)
+    verifyLoc(FileLoc("foo.txt", 1, 2).toFilenameOnly, "foo.txt", 1, 2)
+    verifyLoc(FileLoc("/path/foo.txt").toFilenameOnly, "foo.txt", 0, 0)
+    verifyLoc(FileLoc("\\path\\foo.txt", 1, 2).toFilenameOnly, "foo.txt", 1, 2)
+    verifyLoc(FileLoc("/long/path/here/foo.txt", 2, 3).toFilenameOnly, "foo.txt", 2, 3)
   }
 
   Void verifyLoc(FileLoc loc, Str file, Int line, Int col)
@@ -42,4 +48,5 @@ class FileLocTest : Test
     verifyEq(a < b, expected < 0)
     verifyEq(a > b, expected > 0)
   }
-}
+}
+