P_STRING String, 
         Allocate (&String, 
                   Length, [=] (P_STRING WR String) {
                                                      Set (String->Pointer, Path, Separator, File_name);
                                                    });
 
 
 

Free (&String);