1 03/08/85  get_shortest_path_
 2 
 3 
 4 Shortens the specified pathname by replacing each directory level with
 5 the shortest name on the directory.  If the caller does not have access
 6 to get the names of a directory, the original name of that directory is
 7 left intact.
 8 
 9 
10 Entry points in get_shortest_path_:
11    (List is generated by the help command)
12 
13 
14 :Entry:  get_shortest_path_:  03/08/85  get_shortest_path_
15 
16 
17 Function:
18 Shortens the specified pathname by replacing each directory level with
19 the shortest name on the directory.
20 
21 
22 Syntax:
23 dcl get_shortest_path_ entry (char (*)) returns (char (168));
24 short_path = get_shortest_path_ (original_path);
25 
26 
27 Arguments:
28 original_path
29    is the pathname of a storage system entry.  (Input)
30 
31 
32 Notes:  When more than one name qualify as the shortest name for a
33 directory, an attempt is made to select the name containing all lower
34 case characters.  If more than one name still qualifies, these names
35 are compared to the primary name of the directory.  The first name
36 found with the same first character as the primary name is chosen.
37 This comparison is case independent.