diff options
author | dos-reis <gdr@axiomatics.org> | 2014-11-26 17:20:30 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2014-11-26 17:20:30 +0000 |
commit | f4623b771b1e798d81d1cc8d2013683371061c43 (patch) | |
tree | 227d94e6e144cc37e10ac93da5dba2c7578d7b3c /src/interp/br-saturn.boot | |
parent | 4cb56790e13ad56cf6926d33d6595023a70ef247 (diff) | |
download | open-axiom-f4623b771b1e798d81d1cc8d2013683371061c43.tar.gz |
Replace DELETE-FILE with removeFile.
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r-- | src/interp/br-saturn.boot | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot index 4d0987ce..dd290317 100644 --- a/src/interp/br-saturn.boot +++ b/src/interp/br-saturn.boot @@ -1713,16 +1713,6 @@ purgeLocalLibdb() == --called by the user through a clear command? $newConstructorList := nil removeFile '"libdb.text" ---moveFile(before,after) == --- $saturn => MOVE_-FILE(before, after) --- RENAME_-FILE(before, after) --- --obey strconc('"mv ", before, '" ", after) - --- deleted JHD/MCD, since already one in pathname.boot ---removeFile fn == --- $saturn => DELETE_-FILE fn --- obey strconc('"rm ",fn) - --======================================================================= -- from DAASE.LISP --======================================================================= |