diff options
| author | dos-reis <gdr@axiomatics.org> | 2014-11-20 16:28:03 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2014-11-20 16:28:03 +0000 |
| commit | 8358dd22eb56a1b5e46e3d1e50295d53c4504165 (patch) | |
| tree | d24e9b130c60a75a0aec6f4700f509bc4af77245 | |
| parent | 2e911719fbc194387c5f2525b2f8bfbc467eb211 (diff) | |
| download | open-axiom-8358dd22eb56a1b5e46e3d1e50295d53c4504165.tar.gz | |
Do really remove the stationary directory after successful compilation.
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/interp/lisplib.boot | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 191bda02..d4d89f1b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2014-11-20 Gabriel Dos Reis <gdr@integrable-solutions.net> + * interp/lisplib.boot (lisplibDoRename): Fix thinko. + +2014-11-20 Gabriel Dos Reis <gdr@integrable-solutions.net> + * lisp/core.lisp.in (forkStreamByName): New. * interp/int-top.boot (ncIntLoop): Use it. * interp/spad-parser.boot (parseSpadFile): Likewise. diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot index 97211017..b26cc2af 100644 --- a/src/interp/lisplib.boot +++ b/src/interp/lisplib.boot @@ -587,8 +587,7 @@ lisplibDoRename db == modpath := filePathString makeFilePath(type <- $faslType,defaults <- filePath libCodeStream lib) do - renameFile(modpath,output) = 0 => nil - copyFile(modpath,output) + renameFile(modpath,output) = 0 or copyFile(modpath,output) removeFile libStationaryDirname lib output removeFile libDirname lib |