Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 2 additions & 2 deletions path.carp
Original file line number Diff line number Diff line change
Expand Up @@ -48,8 +48,8 @@ As such, it is the inverse to [absolute?](#absolute?).")
(doc separator? "checks whether the character `c` is a path separator on this
OS.")
(defn separator? [c] (Array.contains? &separators c))
(doc separator? "checks whether the character `c` is a separator for the
`PATH` environment variable on this OS.")
(doc search-path-separator? "checks whether the character `c` is a separator
for the `PATH` environment variable on this OS.")
(defn search-path-separator? [c] (= search-path-separator c))

(doc path-max "defines the maximum path length on this OS.")
Expand Down
1 change: 0 additions & 1 deletion test/path.carp
Original file line number Diff line number Diff line change
Expand Up @@ -16,7 +16,6 @@
"add-extension works")
(assert-equal test "/path" &(basename "/path/file.txt") "basename works")
(assert-true test (Maybe.just? &(cwd)) "cwd works")
; TODO why does this test not work?
(assert-equal test
"file"
&(drop-extension "file.txt")
Expand Down
Loading