Function Unique-Filename

Part of:

package lift
( unique-filename < pathname > )