18 lines
463 B
Text
18 lines
463 B
Text
F find_common_directory_path(paths, sep = ‘/’)
|
||
V pos = 0
|
||
L
|
||
L(path) paths
|
||
I pos < path.len & path[pos] == paths[0][pos]
|
||
L.continue
|
||
|
||
L pos > 0
|
||
pos--
|
||
I paths[0][pos] == sep
|
||
L.break
|
||
R paths[0][0.<pos]
|
||
pos++
|
||
|
||
print(find_common_directory_path([
|
||
‘/home/user1/tmp/coverage/test’,
|
||
‘/home/user1/tmp/covert/operator’,
|
||
‘/home/user1/tmp/coven/members’]))
|