hg/stx-libbasic: Link.st@07d0bce293c9 (annotated)

1 a27a279701f8 Initial revision claus parents: diff changeset	1	"
5 67342904af11 * empty log message * claus parents: 3 diff changeset	2	COPYRIGHT (c) 1992 by Claus Gittinger
379 5b5a130ccd09 revision added claus parents: 93 diff changeset	3	All Rights Reserved
1 a27a279701f8 Initial revision claus parents: diff changeset	4
a27a279701f8 Initial revision claus parents: diff changeset	5	This software is furnished under a license and may be used
a27a279701f8 Initial revision claus parents: diff changeset	6	only in accordance with the terms of that license and with the
a27a279701f8 Initial revision claus parents: diff changeset	7	inclusion of the above copyright notice. This software may not
a27a279701f8 Initial revision claus parents: diff changeset	8	be provided or otherwise made available to, or used by, any
a27a279701f8 Initial revision claus parents: diff changeset	9	other person. No title to or ownership of the software is
a27a279701f8 Initial revision claus parents: diff changeset	10	hereby transferred.
a27a279701f8 Initial revision claus parents: diff changeset	11	"
a27a279701f8 Initial revision claus parents: diff changeset	12
a27a279701f8 Initial revision claus parents: diff changeset	13	Object subclass:#Link
a27a279701f8 Initial revision claus parents: diff changeset	14	instanceVariableNames:'nextLink'
a27a279701f8 Initial revision claus parents: diff changeset	15	classVariableNames:''
a27a279701f8 Initial revision claus parents: diff changeset	16	poolDictionaries:''
a27a279701f8 Initial revision claus parents: diff changeset	17	category:'Collections-Support'
a27a279701f8 Initial revision claus parents: diff changeset	18	!
a27a279701f8 Initial revision claus parents: diff changeset	19
88 81dacba7a63a * empty log message * claus parents: 5 diff changeset	20	!Link class methodsFor:'documentation'!
81dacba7a63a * empty log message * claus parents: 5 diff changeset	21
81dacba7a63a * empty log message * claus parents: 5 diff changeset	22	copyright
81dacba7a63a * empty log message * claus parents: 5 diff changeset	23	"
81dacba7a63a * empty log message * claus parents: 5 diff changeset	24	COPYRIGHT (c) 1992 by Claus Gittinger
379 5b5a130ccd09 revision added claus parents: 93 diff changeset	25	All Rights Reserved
1 a27a279701f8 Initial revision claus parents: diff changeset	26
88 81dacba7a63a * empty log message * claus parents: 5 diff changeset	27	This software is furnished under a license and may be used
81dacba7a63a * empty log message * claus parents: 5 diff changeset	28	only in accordance with the terms of that license and with the
81dacba7a63a * empty log message * claus parents: 5 diff changeset	29	inclusion of the above copyright notice. This software may not
81dacba7a63a * empty log message * claus parents: 5 diff changeset	30	be provided or otherwise made available to, or used by, any
81dacba7a63a * empty log message * claus parents: 5 diff changeset	31	other person. No title to or ownership of the software is
81dacba7a63a * empty log message * claus parents: 5 diff changeset	32	hereby transferred.
81dacba7a63a * empty log message * claus parents: 5 diff changeset	33	"
81dacba7a63a * empty log message * claus parents: 5 diff changeset	34	!
1 a27a279701f8 Initial revision claus parents: diff changeset	35
88 81dacba7a63a * empty log message * claus parents: 5 diff changeset	36	version
530 07d0bce293c9 uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 384 diff changeset	37	^ '$Header: /cvs/stx/stx/libbasic/Link.st,v 1.9 1995-11-11 15:23:51 cg Exp $'
88 81dacba7a63a * empty log message * claus parents: 5 diff changeset	38	!
81dacba7a63a * empty log message * claus parents: 5 diff changeset	39
81dacba7a63a * empty log message * claus parents: 5 diff changeset	40	documentation
81dacba7a63a * empty log message * claus parents: 5 diff changeset	41	"
81dacba7a63a * empty log message * claus parents: 5 diff changeset	42	this class provides the basic functionality for Link-nodes.
81dacba7a63a * empty log message * claus parents: 5 diff changeset	43	Links are abstract in that they do not provide a place for storing
81dacba7a63a * empty log message * claus parents: 5 diff changeset	44	something, just the link-chain.
81dacba7a63a * empty log message * claus parents: 5 diff changeset	45	For more usability look at ValueLink or other subclasses.
81dacba7a63a * empty log message * claus parents: 5 diff changeset	46	"
81dacba7a63a * empty log message * claus parents: 5 diff changeset	47	! !
1 a27a279701f8 Initial revision claus parents: diff changeset	48
a27a279701f8 Initial revision claus parents: diff changeset	49	!Link methodsFor:'accessing'!
a27a279701f8 Initial revision claus parents: diff changeset	50
a27a279701f8 Initial revision claus parents: diff changeset	51	nextLink
a27a279701f8 Initial revision claus parents: diff changeset	52	"return the next link"
a27a279701f8 Initial revision claus parents: diff changeset	53
a27a279701f8 Initial revision claus parents: diff changeset	54	^ nextLink
a27a279701f8 Initial revision claus parents: diff changeset	55	!
a27a279701f8 Initial revision claus parents: diff changeset	56
a27a279701f8 Initial revision claus parents: diff changeset	57	nextLink:aLink
a27a279701f8 Initial revision claus parents: diff changeset	58	"set the next link"
a27a279701f8 Initial revision claus parents: diff changeset	59
a27a279701f8 Initial revision claus parents: diff changeset	60	nextLink := aLink
a27a279701f8 Initial revision claus parents: diff changeset	61	! !

author	Claus Gittinger <cg@exept.de>
	Sat, 11 Nov 1995 16:28:41 +0100
changeset 530	07d0bce293c9
parent 384	cc3d110ea879
child 607	a9a526c51233
permissions	-rw-r--r--