Add make_directory_path/1 predicate to the files library

This commit is contained in:
Paulo Moura
2021-05-18 00:21:11 +01:00
parent e7d6811948
commit bdebc7f32e
3 changed files with 19 additions and 0 deletions

View File

@@ -878,6 +878,17 @@ impl MachineState {
}
}
}
&SystemClauseType::MakeDirectoryPath => {
let directory = self.heap_pstr_iter(self[temp_v!(1)]).to_string();
match fs::create_dir_all(directory) {
Ok(_) => {}
_ => {
self.fail = true;
return Ok(());
}
}
}
&SystemClauseType::DeleteFile => {
let file = self.heap_pstr_iter(self[temp_v!(1)]).to_string();