gforth/objects.fs - diff

Return to objects.fs CVS log

Up to [gforth] / gforth

version 1.16, 1999/07/08 09:46:42	version 1.17, 1999/07/24 13:07:19
Line 494 method print ( object -- ) \ objects- ob	Line 494 method print ( object -- ) \ objects- ob
\g Print the object. The method for the class @var{object} prints	\g Print the object. The method for the class @var{object} prints
\g the address of the object and the address of its class.	\g the address of the object and the address of its class.

	selector equal ( object1 object2 -- flag )

end-class object ( -- class ) \ objects- objects	end-class object ( -- class ) \ objects- objects
\g the ancestor of all classes.	\g the ancestor of all classes.