--- a/ByteCodeCompiler.st	Thu Sep 09 18:06:19 1999 +0200
+++ b/ByteCodeCompiler.st	Thu Sep 09 18:55:53 1999 +0200
@@ -2764,15 +2764,31 @@
      command oFileName cFileName
      initName newMethod ok status className sep class stcPath ccPath 
      errorStream errorMessages eMsg m supers mP moduleFileName 
-     dummyHandle f mapFileName libFileName pkg|
+     dummyHandle f mapFileName libFileName pkg t s|
 
     (mP := STCModulePath asFilename) exists ifFalse:[
        mP makeDirectory
     ].
     (mP isDirectory and:[mP isReadable and:[mP isWritable]]) ifFalse:[
-        self parseError:('no access to tempDir: ' , mP pathName) position:1.
+        self parseError:('no access to temporary module directory: ' , mP pathName) position:1.
         ^ #CannotLoad
     ].
+    "/ create a small README there ...
+    (t := mP construct:'README') exists ifFalse:[
+        s := t writeStream.
+        s nextPutLine:'Temporary ST/X directory containing machine code for'.
+        s nextPutLine:'accepted methods with embedded C-code.'.
+        s nextPutLine:'Files here are not automatically removed,'.
+        s nextPutLine:'since ST/X cannot determine if any'.
+        s nextPutLine:'(other) snapshot image still requires a file here.'.
+        s nextPutLine:'You should periodically clean dead entries here.'.
+        s nextPutLine:'(i.e. remove files, when you are certain that none'.
+        s nextPutLine:' of your snapshot images referes to any module here)'.
+        s nextPutLine:'See the launchers File-Modules dialog for a list of'.
+        s nextPutLine:'modules which are still required by your running image.'.
+        s nextPutLine:'Regards - your ST/X.'.
+        s close.
+    ].
 
     ObjectFileLoader isNil ifTrue:[^ #CannotLoad].
     STCCompilation == #never ifTrue:[^ #CannotLoad].
@@ -3253,6 +3269,6 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.157 1999-08-26 11:54:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.158 1999-09-09 16:55:53 cg Exp $'
 ! !
 ByteCodeCompiler initialize!