--- a/AssignNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/AssignNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,10 @@
 "
     node for parse-trees, representing assignments.
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -159,5 +163,5 @@
 !AssignmentNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/AssignNd.st,v 1.18 1996-04-25 11:14:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/AssignNd.st,v 1.19 1996-04-25 17:08:51 cg Exp $'
 ! !

--- a/AssignmentNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/AssignmentNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,10 @@
 "
     node for parse-trees, representing assignments.
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -159,5 +163,5 @@
 !AssignmentNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.18 1996-04-25 11:14:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.19 1996-04-25 17:08:51 cg Exp $'
 ! !

--- a/BCompiler.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/BCompiler.st	Thu Apr 25 19:09:53 1996 +0200
@@ -80,6 +80,10 @@
         ShareCode       <Boolean>               reuse byteArrays for common (simple) code sequences
                                                 This is normally a 'good' optimization,
                                                 expect if you plan to modify the byteCodes.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -2227,6 +2231,6 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.76 1996-04-25 07:53:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/BCompiler.st,v 1.77 1996-04-25 17:06:40 cg Exp $'
 ! !
 ByteCodeCompiler initialize!

--- a/BinaryNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/BinaryNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,10 @@
 "
     node for parse-trees, representing binary message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -209,5 +213,5 @@
 !BinaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/BinaryNd.st,v 1.22 1996-04-25 11:15:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/BinaryNd.st,v 1.23 1996-04-25 17:09:42 cg Exp $'
 ! !

--- a/BinaryNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/BinaryNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,10 @@
 "
     node for parse-trees, representing binary message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -209,5 +213,5 @@
 !BinaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/BinaryNode.st,v 1.22 1996-04-25 11:15:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/BinaryNode.st,v 1.23 1996-04-25 17:09:42 cg Exp $'
 ! !

--- a/BlockNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/BlockNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -38,6 +38,9 @@
 "
     node for parse-trees, representing blocks
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -561,5 +564,5 @@
 !BlockNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/BlockNode.st,v 1.26 1996-04-25 11:15:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/BlockNode.st,v 1.27 1996-04-25 17:09:35 cg Exp $'
 ! !

--- a/ByteCodeCompiler.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ByteCodeCompiler.st	Thu Apr 25 19:09:53 1996 +0200
@@ -80,6 +80,10 @@
         ShareCode       <Boolean>               reuse byteArrays for common (simple) code sequences
                                                 This is normally a 'good' optimization,
                                                 expect if you plan to modify the byteCodes.
+
+    [author:]
+        Claus Gittinger
+
 "
 ! !
 
@@ -2227,6 +2231,6 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.76 1996-04-25 07:53:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.77 1996-04-25 17:06:40 cg Exp $'
 ! !
 ByteCodeCompiler initialize!

--- a/CascadeNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/CascadeNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing cascade message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -138,5 +141,5 @@
 !CascadeNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/CascadeNd.st,v 1.14 1996-04-25 11:14:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/CascadeNd.st,v 1.15 1996-04-25 17:09:25 cg Exp $'
 ! !

--- a/CascadeNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/CascadeNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing cascade message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -138,5 +141,5 @@
 !CascadeNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/CascadeNode.st,v 1.14 1996-04-25 11:14:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/CascadeNode.st,v 1.15 1996-04-25 17:09:25 cg Exp $'
 ! !

--- a/ConstNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ConstNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing literal constants
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -266,5 +269,5 @@
 !ConstantNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ConstNode.st,v 1.21 1996-04-25 11:14:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ConstNode.st,v 1.22 1996-04-25 17:08:56 cg Exp $'
 ! !

--- a/ConstantNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ConstantNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing literal constants
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -266,5 +269,5 @@
 !ConstantNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.21 1996-04-25 11:14:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ConstantNode.st,v 1.22 1996-04-25 17:08:56 cg Exp $'
 ! !

--- a/Explainer.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/Explainer.st	Thu Apr 25 19:09:53 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 Parser subclass:#Explainer
-	 instanceVariableNames:''
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'System-Compiler'
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Compiler'
 !
 
 !Explainer class methodsFor:'documentation'!
@@ -38,6 +38,9 @@
     a very simple explainer - much more should be added ...
     This one is involved, when the 'explain' function is used in a 
     codeView (popup or via CMD-E).
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -494,5 +497,5 @@
 !Explainer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.16 1995-12-03 11:49:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.17 1996-04-25 17:06:15 cg Exp $'
 ! !

--- a/ImmArray.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ImmArray.st	Thu Apr 25 19:09:53 1996 +0200
@@ -53,6 +53,9 @@
 
     Turn the ImmutableArray feature on by setting the Parsers class variable
     'ArraysAreImmutable' to true or use the new launchers settings menu.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -183,5 +186,5 @@
 !ImmutableArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmArray.st,v 1.13 1996-04-25 11:15:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmArray.st,v 1.14 1996-04-25 17:09:46 cg Exp $'
 ! !

--- a/ImmutableArray.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ImmutableArray.st	Thu Apr 25 19:09:53 1996 +0200
@@ -53,6 +53,9 @@
 
     Turn the ImmutableArray feature on by setting the Parsers class variable
     'ArraysAreImmutable' to true or use the new launchers settings menu.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -183,5 +186,5 @@
 !ImmutableArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmutableArray.st,v 1.13 1996-04-25 11:15:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ImmutableArray.st,v 1.14 1996-04-25 17:09:46 cg Exp $'
 ! !

--- a/MessageNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/MessageNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -1576,5 +1579,5 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/MessageNd.st,v 1.46 1996-04-25 11:14:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/MessageNd.st,v 1.47 1996-04-25 17:09:13 cg Exp $'
 ! !

--- a/MessageNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/MessageNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing message sends
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -1576,5 +1579,5 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.46 1996-04-25 11:14:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.47 1996-04-25 17:09:13 cg Exp $'
 ! !

--- a/ObjFHandle.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ObjFHandle.st	Thu Apr 25 19:09:53 1996 +0200
@@ -38,9 +38,10 @@
 "
     not for public use - used by ObjectFileLoader to keep track of loaded modules,
     associating objectFile names and moduleIDs to classes/methods.
+
+    [author:]
+        Claus Gittinger
 "
-
-    "Created: 14.9.1995 / 21:10:55 / claus"
 !
 
 history
@@ -249,5 +250,5 @@
 !ObjectFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.13 1996-04-25 07:52:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFHandle.st,v 1.14 1996-04-25 17:07:04 cg Exp $'
 ! !

--- a/ObjFLoader.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ObjFLoader.st	Thu Apr 25 19:09:53 1996 +0200
@@ -192,12 +192,12 @@
       robustness.
 
     There are basically two totally different mechanisms to do this:
-	a) if there exists some dynamic-link facility such as:
-	   GNU-DL, dlopen (sparc, SYS5.4), rld_open (NeXT),
-	   this is used
-	b) if no such facility exists, the normal linker is used to
-	   link the module to text/data address as previously malloced,
-	   and the object file loaded into that space.
+        a) if there exists some dynamic-link facility such as:
+           GNU-DL, dlopen (sparc, SYS5.4), rld_open (NeXT),
+           this is used
+        b) if no such facility exists, the normal linker is used to
+           link the module to text/data address as previously malloced,
+           and the object file loaded into that space.
            
     Currently, not all mechanisms work fully satisfying.
     For example, the sun dl*-functions do an exit on link-errors (which
@@ -215,6 +215,9 @@
     the VM. 
     (It is needed there, to allow reloading of objectfiles upon
      image restart; i.e. before any class is reinitialilized).
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -3203,6 +3206,6 @@
 !ObjectFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.92 1996-04-25 07:52:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.93 1996-04-25 17:07:36 cg Exp $'
 ! !
 ObjectFileLoader initialize!

--- a/ObjectFileHandle.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ObjectFileHandle.st	Thu Apr 25 19:09:53 1996 +0200
@@ -38,9 +38,10 @@
 "
     not for public use - used by ObjectFileLoader to keep track of loaded modules,
     associating objectFile names and moduleIDs to classes/methods.
+
+    [author:]
+        Claus Gittinger
 "
-
-    "Created: 14.9.1995 / 21:10:55 / claus"
 !
 
 history
@@ -249,5 +250,5 @@
 !ObjectFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.13 1996-04-25 07:52:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.14 1996-04-25 17:07:04 cg Exp $'
 ! !

--- a/ObjectFileLoader.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ObjectFileLoader.st	Thu Apr 25 19:09:53 1996 +0200
@@ -192,12 +192,12 @@
       robustness.
 
     There are basically two totally different mechanisms to do this:
-	a) if there exists some dynamic-link facility such as:
-	   GNU-DL, dlopen (sparc, SYS5.4), rld_open (NeXT),
-	   this is used
-	b) if no such facility exists, the normal linker is used to
-	   link the module to text/data address as previously malloced,
-	   and the object file loaded into that space.
+        a) if there exists some dynamic-link facility such as:
+           GNU-DL, dlopen (sparc, SYS5.4), rld_open (NeXT),
+           this is used
+        b) if no such facility exists, the normal linker is used to
+           link the module to text/data address as previously malloced,
+           and the object file loaded into that space.
            
     Currently, not all mechanisms work fully satisfying.
     For example, the sun dl*-functions do an exit on link-errors (which
@@ -215,6 +215,9 @@
     the VM. 
     (It is needed there, to allow reloading of objectfiles upon
      image restart; i.e. before any class is reinitialilized).
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -3203,6 +3206,6 @@
 !ObjectFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileLoader.st,v 1.92 1996-04-25 07:52:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileLoader.st,v 1.93 1996-04-25 17:07:36 cg Exp $'
 ! !
 ObjectFileLoader initialize!

--- a/ParseNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ParseNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees; abstract class
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -190,5 +193,5 @@
 !ParseNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.17 1996-04-25 11:13:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.18 1996-04-25 17:08:24 cg Exp $'
 ! !

--- a/Parser.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/Parser.st	Thu Apr 25 19:09:53 1996 +0200
@@ -204,6 +204,9 @@
         ByteCodeCompiler Scanner ObjectFileLoader
         Workspace
         SystemBrowser
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -3448,6 +3451,6 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.76 1996-04-25 07:56:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.77 1996-04-25 17:05:50 cg Exp $'
 ! !
 Parser initialize!

--- a/PrimNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/PrimNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -51,6 +51,9 @@
     primitive directive (in the primitives first lines comment) may specify an
     optional primitive; these are compiled on systems which do support binary code
     loading, and ignored completely on others.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -136,5 +139,5 @@
 !PrimitiveNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/PrimNd.st,v 1.14 1996-04-25 11:14:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/PrimNd.st,v 1.15 1996-04-25 17:08:39 cg Exp $'
 ! !

--- a/PrimaryNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/PrimaryNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing primaries (variables & literals)
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -92,5 +95,5 @@
 !PrimaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/PrimaryNd.st,v 1.15 1996-04-25 11:13:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/PrimaryNd.st,v 1.16 1996-04-25 17:08:19 cg Exp $'
 ! !

--- a/PrimaryNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/PrimaryNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing primaries (variables & literals)
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -92,5 +95,5 @@
 !PrimaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.15 1996-04-25 11:13:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.16 1996-04-25 17:08:19 cg Exp $'
 ! !

--- a/PrimitiveNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/PrimitiveNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -51,6 +51,9 @@
     primitive directive (in the primitives first lines comment) may specify an
     optional primitive; these are compiled on systems which do support binary code
     loading, and ignored completely on others.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -136,5 +139,5 @@
 !PrimitiveNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/PrimitiveNode.st,v 1.14 1996-04-25 11:14:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimitiveNode.st,v 1.15 1996-04-25 17:08:39 cg Exp $'
 ! !

--- a/RetNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/RetNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing return expressions
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -159,5 +162,5 @@
 !ReturnNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/RetNode.st,v 1.15 1996-04-25 11:13:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/RetNode.st,v 1.16 1996-04-25 17:08:35 cg Exp $'
 ! !

--- a/ReturnNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/ReturnNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing return expressions
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -159,5 +162,5 @@
 !ReturnNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.15 1996-04-25 11:13:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ReturnNode.st,v 1.16 1996-04-25 17:08:35 cg Exp $'
 ! !

--- a/Scanner.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/Scanner.st	Thu Apr 25 19:09:53 1996 +0200
@@ -48,6 +48,9 @@
     nextIdentifier etc. methods should be renamed.
     (to me, these seem to be internal private methods; their public use
      is not a good idea ..)
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -935,8 +938,7 @@
     "Modified: 12.4.1996 / 15:05:19 / cg"
 !
 
-nextString
-    |nextChar string pos
+pos
      index "{ Class: SmallInteger }"
      len   "{ Class: SmallInteger }"
      inString|
@@ -981,8 +983,7 @@
     ^ tokenType
 !
 
-nextToken
-    "return the next token from the source-stream"
+oken from the source-stream"
 
     |skipping actionBlock|
 
@@ -1041,14 +1042,12 @@
     "Modified: 13.9.1995 / 12:56:14 / claus"
 !
 
-nextToken:aCharacter
-    tokenType := aCharacter.
+pe := aCharacter.
     source next.
     ^ tokenType
 !
 
-skipComment
-    |commentStream startPos|
+tartPos|
 
     saveComments ifTrue:[
 	commentStream := WriteStream on:''.
@@ -1140,7 +1139,6 @@
 
 !Scanner class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.40 1996-04-20 18:08:54 cg Exp $'
+VS/stx/libcomp/Scanner.st,v 1.40 1996/04/20 18:08:54 cg Exp $'
 ! !
 Scanner initialize!

--- a/SelfNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/SelfNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing self
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -90,5 +93,5 @@
 !SelfNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SelfNode.st,v 1.10 1996-04-25 11:14:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SelfNode.st,v 1.11 1996-04-25 17:08:47 cg Exp $'
 ! !

--- a/SourceFileLoader.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/SourceFileLoader.st	Thu Apr 25 19:09:53 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 Object subclass:#SourceFileLoader
-	 instanceVariableNames:'myStream currentSource package wantChangeLog'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'System-Compiler'
+	instanceVariableNames:'myStream currentSource package wantChangeLog'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Compiler'
 !
 
 !SourceFileLoader class methodsFor:'documentation'!
@@ -39,6 +39,9 @@
     They get notified about any errors. Currently, all we
     do here is to output the error on the Transcript;
     eventually, we will open a box showing the position of the error.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -133,5 +136,5 @@
 !SourceFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.11 1995-12-07 23:41:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SourceFileLoader.st,v 1.12 1996-04-25 17:06:21 cg Exp $'
 ! !

--- a/SrcFLoader.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/SrcFLoader.st	Thu Apr 25 19:09:53 1996 +0200
@@ -11,10 +11,10 @@
 "
 
 Object subclass:#SourceFileLoader
-	 instanceVariableNames:'myStream currentSource package wantChangeLog'
-	 classVariableNames:''
-	 poolDictionaries:''
-	 category:'System-Compiler'
+	instanceVariableNames:'myStream currentSource package wantChangeLog'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Compiler'
 !
 
 !SourceFileLoader class methodsFor:'documentation'!
@@ -39,6 +39,9 @@
     They get notified about any errors. Currently, all we
     do here is to output the error on the Transcript;
     eventually, we will open a box showing the position of the error.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -133,5 +136,5 @@
 !SourceFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/SrcFLoader.st,v 1.11 1995-12-07 23:41:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/SrcFLoader.st,v 1.12 1996-04-25 17:06:21 cg Exp $'
 ! !

--- a/StatNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/StatNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing statements
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -146,5 +149,5 @@
 !StatementNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/StatNode.st,v 1.14 1996-04-25 11:14:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/StatNode.st,v 1.15 1996-04-25 17:08:43 cg Exp $'
 ! !

--- a/StatementNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/StatementNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing statements
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -146,5 +149,5 @@
 !StatementNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/StatementNode.st,v 1.14 1996-04-25 11:14:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/StatementNode.st,v 1.15 1996-04-25 17:08:43 cg Exp $'
 ! !

--- a/SuperNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/SuperNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing super
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -88,5 +91,5 @@
 !SuperNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SuperNode.st,v 1.10 1996-04-25 11:14:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SuperNode.st,v 1.11 1996-04-25 17:09:01 cg Exp $'
 ! !

--- a/UnaryNd.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/UnaryNd.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing unary messages
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -255,5 +258,5 @@
 !UnaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/UnaryNd.st,v 1.21 1996-04-25 11:13:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/UnaryNd.st,v 1.22 1996-04-25 17:08:29 cg Exp $'
 ! !

--- a/UnaryNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/UnaryNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing unary messages
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -255,5 +258,5 @@
 !UnaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.21 1996-04-25 11:13:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.22 1996-04-25 17:08:29 cg Exp $'
 ! !

--- a/UndefVar.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/UndefVar.st	Thu Apr 25 19:09:53 1996 +0200
@@ -43,6 +43,9 @@
     of this class,  which will not understand ANY message.
     The error message will then be 'UndefinedVariable ...' 
     instead of 'UndefineObject ...', which is somewhat more informative.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -138,5 +141,5 @@
 !UndefinedVariable class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/UndefVar.st,v 1.11 1996-04-25 11:13:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/UndefVar.st,v 1.12 1996-04-25 17:08:14 cg Exp $'
 ! !

--- a/UndefinedVariable.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/UndefinedVariable.st	Thu Apr 25 19:09:53 1996 +0200
@@ -43,6 +43,9 @@
     of this class,  which will not understand ANY message.
     The error message will then be 'UndefinedVariable ...' 
     instead of 'UndefineObject ...', which is somewhat more informative.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -138,5 +141,5 @@
 !UndefinedVariable class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/UndefinedVariable.st,v 1.11 1996-04-25 11:13:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/UndefinedVariable.st,v 1.12 1996-04-25 17:08:14 cg Exp $'
 ! !

--- a/VarNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/VarNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing variables
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -540,5 +543,5 @@
 !VariableNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/VarNode.st,v 1.18 1996-04-25 11:15:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/VarNode.st,v 1.19 1996-04-25 17:09:53 cg Exp $'
 ! !

--- a/Variable.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/Variable.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing variables
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -94,5 +97,5 @@
 !Variable class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Variable.st,v 1.12 1996-04-25 11:14:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Variable.st,v 1.13 1996-04-25 17:09:30 cg Exp $'
 ! !

--- a/VariableNode.st	Thu Apr 25 18:48:24 1996 +0200
+++ b/VariableNode.st	Thu Apr 25 19:09:53 1996 +0200
@@ -37,6 +37,9 @@
 "
     node for parse-trees, representing variables
     This is a helper class for the compiler.
+
+    [author:]
+        Claus Gittinger
 "
 ! !
 
@@ -540,5 +543,5 @@
 !VariableNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.18 1996-04-25 11:15:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.19 1996-04-25 17:09:53 cg Exp $'
 ! !