--- a/OSHandle.st	Wed Feb 08 19:27:22 2006 +0100
+++ b/OSHandle.st	Wed Feb 08 19:27:36 2006 +0100
@@ -14,7 +14,7 @@
 
 ExternalAddress subclass:#OSHandle
 	instanceVariableNames:''
-	classVariableNames:''
+	classVariableNames:'Lobby'
 	poolDictionaries:''
 	category:'Compatibility-ST80'
 !
@@ -37,18 +37,21 @@
 
 documentation
 "
-    ST-80 compatibility class.
-    This may be required when existing code has to be ported to ST/X;
-    however, it may not be complete and more protocol may be added in the future.
-    The code here was created when public domain code (Manchester) had to
-    be ported to ST/X and missing classes/methods were encountered, and code added
-    by reasoning 'what the original class could probably do there'.
+    Ongoing work: 
+        extract handle specific operations and rewrite Streams, Sockets etc.
+        to pass all work to these handles.
 
     [author:]
         Claus Gittinger
 "
 ! !
 
+!OSHandle class methodsFor:'initialization'!
+
+initialize
+    Lobby := Registry new.
+! !
+
 !OSHandle class methodsFor:'Compatibility-VW'!
 
 currentOS
@@ -80,12 +83,26 @@
 
 !OSHandle methodsFor:'finalization'!
 
+finalizationLobby
+    "answer a Registry used for finalization."
+
+    ^ Lobby
+!
+
 finalize
     self subclassResponsibility
 ! !
 
+!OSHandle methodsFor:'queries'!
+
+isValid
+     ^ self address ~~0
+! !
+
 !OSHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OSHandle.st,v 1.10 2003-08-30 12:32:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OSHandle.st,v 1.11 2006-02-08 18:27:36 cg Exp $'
 ! !
+
+OSHandle initialize!