Mercurial Mercurial > hg > stx-libcomp / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 27 Jan 2005 11:30:05 +0100
changeset 1568 4923a3bd3016
parent 1567 cb99fc47f2d2
child 1569 b20e45617214
*** empty log message ***
ByteCodeCompiler.st file | annotate | diff | comparison | revisions 
--- a/ByteCodeCompiler.st	Tue Jan 25 12:12:25 2005 +0100
+++ b/ByteCodeCompiler.st	Thu Jan 27 11:30:05 2005 +0100
@@ -3405,14 +3405,20 @@
                         ^ #CannotLoad
                     ].
                     "/ cls fileOutDefinitionOn:stream.
-                    cls basicFileOutDefinitionOn:stream withNameSpace:false withPackage:false.
+                    cls 
+                        basicFileOutDefinitionOn:stream 
+                        withNameSpace:false withPackage:false
+                        syntaxHilighting:false.
 
                     stream nextPut:sep; cr.
                     definedClasses add:cls.
                 ]
             ].
             "/ class fileOutDefinitionOn:stream.
-            class basicFileOutDefinitionOn:stream withNameSpace:false withPackage:false.
+            class 
+                basicFileOutDefinitionOn:stream 
+                withNameSpace:false withPackage:false 
+                syntaxHilighting:false.
             stream nextPut:sep; cr.
             definedClasses add:class.
 
@@ -3427,7 +3433,10 @@
                                     ^ #CannotLoad
                                 ].
                                 "/ cls fileOutDefinitionOn:stream.
-                                cls basicFileOutDefinitionOn:stream withNameSpace:false withPackage:false.
+                                cls 
+                                    basicFileOutDefinitionOn:stream 
+                                    withNameSpace:false withPackage:false
+                                    syntaxHilighting:false.
 
                                 stream nextPut:sep; cr.
                                 definedClasses add:cls.
@@ -3437,7 +3446,10 @@
                 ].
                 (definedClasses includes:aPrivateClass) ifFalse:[
                     "/ aPrivateClass fileOutDefinitionOn:stream.
-                    aPrivateClass basicFileOutDefinitionOn:stream withNameSpace:false withPackage:false.
+                    aPrivateClass 
+                        basicFileOutDefinitionOn:stream 
+                        withNameSpace:false withPackage:false
+                        syntaxHilighting:false.
                     stream nextPut:sep; cr.
                     definedClasses add:aPrivateClass.
                 ]
@@ -3807,7 +3819,7 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.225 2004-11-10 09:35:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.226 2005-01-27 10:30:05 cg Exp $'
 ! !
 
 ByteCodeCompiler initialize!
hg/stx-libcomp