ADDED: delete_file/1, addressing a remaining aspect of #511

This commit is contained in:
Markus Triska
2020-07-14 22:16:15 +02:00
parent 53d39ccb4b
commit 5134e64cae
3 changed files with 18 additions and 0 deletions

View File

@@ -176,6 +176,7 @@ pub enum SystemClauseType {
FileExists,
DirectoryExists,
MakeDirectory,
DeleteFile,
DeleteAttribute,
DeleteHeadAttribute,
DynamicModuleResolution(usize),
@@ -341,6 +342,7 @@ impl SystemClauseType {
&SystemClauseType::FileExists => clause_name!("$file_exists"),
&SystemClauseType::DirectoryExists => clause_name!("$directory_exists"),
&SystemClauseType::MakeDirectory => clause_name!("$make_directory"),
&SystemClauseType::DeleteFile => clause_name!("$delete_file"),
&SystemClauseType::REPL(REPLCodePtr::CompileBatch) => clause_name!("$compile_batch"),
&SystemClauseType::REPL(REPLCodePtr::UseModule) => clause_name!("$use_module"),
&SystemClauseType::REPL(REPLCodePtr::UseQualifiedModule) => {
@@ -675,6 +677,7 @@ impl SystemClauseType {
("$file_exists", 1) => Some(SystemClauseType::FileExists),
("$directory_exists", 1) => Some(SystemClauseType::DirectoryExists),
("$make_directory", 1) => Some(SystemClauseType::MakeDirectory),
("$delete_file", 1) => Some(SystemClauseType::DeleteFile),
("$use_module", 1) => Some(SystemClauseType::REPL(REPLCodePtr::UseModule)),
("$use_module_from_file", 1) =>
Some(SystemClauseType::REPL(REPLCodePtr::UseModuleFromFile)),