aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-saturn.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2014-11-26 17:20:30 +0000
committerdos-reis <gdr@axiomatics.org>2014-11-26 17:20:30 +0000
commitf4623b771b1e798d81d1cc8d2013683371061c43 (patch)
tree227d94e6e144cc37e10ac93da5dba2c7578d7b3c /src/interp/br-saturn.boot
parent4cb56790e13ad56cf6926d33d6595023a70ef247 (diff)
downloadopen-axiom-f4623b771b1e798d81d1cc8d2013683371061c43.tar.gz
Replace DELETE-FILE with removeFile.
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r--src/interp/br-saturn.boot10
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
--=======================================================================