diff options
| author | dos-reis <gdr@axiomatics.org> | 2013-07-01 06:01:56 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2013-07-01 06:01:56 +0000 |
| commit | 859275a5967e87643c948a8ae340529444b843b1 (patch) | |
| tree | af173369b179706c9b6ab8fc76d7bcbe1bf00934 /src/interp/c-util.boot | |
| parent | 6c7342e9fe62ef8588307be33b2ad9543e4a071c (diff) | |
| download | open-axiom-859275a5967e87643c948a8ae340529444b843b1.tar.gz | |
Bring closer to GCL-buildability.
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 cf5b8a5a..e91871b4 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 <- [&RELATIVE, libDirname lib], + dst := makeFilePath(directory <- relativeDirname libDirname lib, name <- filePathName src, type <- filePathType src) copyFile(filePathString src,filePathString dst) removeFile libStationaryDirname lib = 0 => libDirname lib |