--- a/ObjFLoader.st	Sun Aug 27 03:34:10 1995 +0200
+++ b/ObjFLoader.st	Mon Aug 28 01:25:19 1995 +0200
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	     All Rights Reserved
 
-$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.37 1995-08-27 01:34:10 claus Exp $
+$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.38 1995-08-27 23:24:55 claus Exp $
 '!
 
 !ObjectFileLoader class methodsFor:'documentation'!
@@ -43,7 +43,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.37 1995-08-27 01:34:10 claus Exp $
+$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.38 1995-08-27 23:24:55 claus Exp $
 "
 !
 
@@ -1843,6 +1843,12 @@
 %}
 !
 
+allModulesDo:aBlock
+%{
+    __REGISTRATION_DO_BLOCK(&aBlock COMMA_SND);
+%}
+!
+
 performModuleDeInit:handle
     |id|