--- a/ByteCodeCompiler.st	Sat Oct 16 14:13:32 2004 +0200
+++ b/ByteCodeCompiler.st	Wed Nov 10 10:35:52 2004 +0100
@@ -2635,48 +2635,6 @@
     "Modified: 4.6.1997 / 12:23:30 / cg"
 !
 
-moveGlobalsToFront
-    "move all global-literals to the front of the literal array.
-     This may be the last chance to compile the method, since
-     for globals, the maximum literal index is 255 - while for normal
-     literals its a stress-less 65535"
-
-    litArray isNil ifTrue:[
-	^ self error:'oops compiler botch'.
-    ].
-    litArray sort:[:a :b |   "a < b -> #(a b)"
-		   (a isMemberOf:Symbol) ifFalse:[false]
-		   ifTrue:[
-		      (b isMemberOf:Symbol) ifFalse:[true]
-		      ifTrue:[
-			(a at:1) isUppercase ifFalse:[false]
-			ifTrue:[
-			  (b at:1) isUppercase ifFalse:[true]
-			  ifTrue:[a < b].
-			]
-		      ]
-		    ]
-		   ].
-
-"
-    #(#A #c #B #D #E #a #b #F)
-     sort:[:a :b |  
-		   (a isMemberOf:Symbol) ifFalse:[false]
-		   ifTrue:[
-		      (b isMemberOf:Symbol) ifFalse:[true]
-		      ifTrue:[
-			(a at:1) isUppercase ifFalse:[false]
-			ifTrue:[
-			  (b at:1) isUppercase ifFalse:[true]
-			  ifTrue:[(a < b)].
-			]
-		      ]
-		    ]
-		   ].
-
-"
-!
-
 relocateWith:symbolicCodeArray relocInfo:relocInfo
     "helper for genByteCodeFrom - relocate code using relocInfo.
      if relocation fails badly (due to long relative jumps) patch
@@ -3849,7 +3807,7 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.224 2004-09-10 10:59:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.225 2004-11-10 09:35:52 cg Exp $'
 ! !
 
 ByteCodeCompiler initialize!