Add delete_directory/1 predicate to the files library

This commit is contained in:
Paulo Moura
2021-05-18 08:41:19 +01:00
parent e7d6811948
commit eeac3bc436
3 changed files with 25 additions and 0 deletions

View File

@@ -174,6 +174,7 @@ pub(crate) enum SystemClauseType {
DirectorySeparator,
MakeDirectory,
DeleteFile,
DeleteDirectory,
WorkingDirectory,
PathCanonical,
FileTime,
@@ -335,6 +336,7 @@ impl SystemClauseType {
&SystemClauseType::DirectorySeparator => clause_name!("$directory_separator"),
&SystemClauseType::MakeDirectory => clause_name!("$make_directory"),
&SystemClauseType::DeleteFile => clause_name!("$delete_file"),
&SystemClauseType::DeleteDirectory => clause_name!("$delete_directory"),
&SystemClauseType::WorkingDirectory => clause_name!("$working_directory"),
&SystemClauseType::PathCanonical => clause_name!("$path_canonical"),
&SystemClauseType::FileTime => clause_name!("$file_time"),
@@ -744,6 +746,7 @@ impl SystemClauseType {
("$directory_separator", 1) => Some(SystemClauseType::DirectorySeparator),
("$make_directory", 1) => Some(SystemClauseType::MakeDirectory),
("$delete_file", 1) => Some(SystemClauseType::DeleteFile),
("$delete_directory", 1) => Some(SystemClauseType::DeleteDirectory),
("$working_directory", 2) => Some(SystemClauseType::WorkingDirectory),
("$path_canonical", 2) => Some(SystemClauseType::PathCanonical),
("$file_time", 3) => Some(SystemClauseType::FileTime),