--- a/ByteCodeCompiler.st	Fri Feb 14 18:38:44 1997 +0100
+++ b/ByteCodeCompiler.st	Sat Mar 22 16:20:58 1997 +0100
@@ -2113,7 +2113,7 @@
         class fileOutDefinitionOn:stream.
         stream nextPut:sep; cr.
 
-        class privateClassesDo:[:aPrivateClass |
+        class privateClassesSorted do:[:aPrivateClass |
             aPrivateClass fileOutDefinitionOn:stream.
             stream nextPut:sep; cr.
         ].
@@ -2424,7 +2424,7 @@
 
     "Modified: 14.9.1995 / 22:33:04 / claus"
     "Modified: 28.12.1995 / 15:52:48 / stefan"
-    "Modified: 10.1.1997 / 17:30:28 / cg"
+    "Modified: 22.3.1997 / 16:17:28 / cg"
 !
 
 createLoadableObjectFor:baseFileName
@@ -2499,6 +2499,6 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.110 1997-01-10 16:30:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.111 1997-03-22 15:20:35 cg Exp $'
 ! !
 ByteCodeCompiler initialize!