--- a/Link.st	Mon Dec 29 16:46:03 2014 +0100
+++ b/Link.st	Tue Dec 30 00:51:04 2014 +0100
@@ -9,6 +9,9 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+"{ Package: 'stx:libbasic' }"
+
+"{ NameSpace: Smalltalk }"
 
 Object subclass:#Link
 	instanceVariableNames:'nextLink'
@@ -59,8 +62,15 @@
     nextLink := aLink
 ! !
 
+!Link methodsFor:'converting'!
+
+asLink
+    ^ self
+! !
+
 !Link class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Link.st,v 1.12 1996-04-25 16:16:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Link.st,v 1.13 2014-12-29 23:51:04 cg Exp $'
 ! !
+