aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-06-27 14:09:25 +0000
committerdos-reis <gdr@axiomatics.org>2013-06-27 14:09:25 +0000
commit8c11594887faf3a796729c4185143e1630b69d65 (patch)
treeef755a66d470c85a16d17b64e263e24d0fb212ca /src/interp/c-util.boot
parent7f57a915cee3c91cddd166fe9964655696666c4b (diff)
downloadopen-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.boot2
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