diff options
Diffstat (limited to 'src/interp/lisplib.boot')
| -rw-r--r-- | src/interp/lisplib.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot index feaa8cef..4212679b 100644 --- a/src/interp/lisplib.boot +++ b/src/interp/lisplib.boot @@ -409,7 +409,7 @@ compConLib1(fun,infileOrNil,outfileOrNil,auxOp,editFlag,traceFlag) == $editFile := infile outfile := outfileOrNil or [libName,'OUTPUT,$listingDirectory] --always QUIET - _$ERASE(libName,'OUTPUT,$listingDirectory) + removeFile makeFullFilePath [libName,'OUTPUT,$listingDirectory] outstream:= DEFSTREAM(outfile,'OUTPUT) val:= _/D_,2_,LIB(fun,infile,outstream,auxOp,editFlag,traceFlag) val @@ -463,7 +463,7 @@ compileDocumentation(ctor,libName) == ['dummy, $EmptyMode, $e] initializeLisplib libName == - _$ERASE(libName,'ERRORLIB,$libraryDirectory) + removeFile makeFullFilePath [libName,'ERRORLIB,$libraryDirectory] resetErrorCount() $libFile := writeLib1(libName,'ERRORLIB,$libraryDirectory) addCompilerOption('FILE,$libFile) |