diff options
author | dos-reis <gdr@axiomatics.org> | 2013-06-27 14:09:25 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2013-06-27 14:09:25 +0000 |
commit | 8c11594887faf3a796729c4185143e1630b69d65 (patch) | |
tree | ef755a66d470c85a16d17b64e263e24d0fb212ca /src/interp/c-util.boot | |
parent | 7f57a915cee3c91cddd166fe9964655696666c4b (diff) | |
download | open-axiom-8c11594887faf3a796729c4185143e1630b69d65.tar.gz |
* interp/lisplib.boot (compDefineLisplib): Close the file
contained generated code before handing over to backend.
* interp/c-util.boot (moveLibdirByCopy): The inferred destination
directory is not absolute.
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r-- | src/interp/c-util.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot index d9663fae..cf5b8a5a 100644 --- a/src/interp/c-util.boot +++ b/src/interp/c-util.boot @@ -1801,7 +1801,7 @@ cleanParameterList! parms == moveLibdirByCopy lib == checkMkdir libDirname lib for src in directoryEntries libStationaryDirname lib repeat - dst := makeFilePath(directory <- libDirname lib, + dst := makeFilePath(directory <- [&RELATIVE, libDirname lib], name <- filePathName src, type <- filePathType src) copyFile(filePathString src,filePathString dst) removeFile libStationaryDirname lib = 0 => libDirname lib |