diff options
Diffstat (limited to 'src/interp/profile.boot')
-rw-r--r-- | src/interp/profile.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/profile.boot b/src/interp/profile.boot index ff6577a9..a9b9d58e 100644 --- a/src/interp/profile.boot +++ b/src/interp/profile.boot @@ -40,8 +40,8 @@ namespace BOOT --$profileCompiler := true $profileAlist := nil -profileWrite db == --called from finalizeLisplib - outStream := MAKE_-OUTSTREAM strconc(libDirname dbLibstream db,'"/info") +profileWrite lib == --called from finalizeLisplib + outStream := outputTextFile strconc(libStationaryDirname lib,'"/info") SETQ(_*PRINT_-PRETTY_*, true) PRINT_-FULL(profileTran $profileAlist,outStream) SHUT outStream |