!=========================================================================
! Copyright (C) VMware, Inc. 1986-2011.  All Rights Reserved.
!
! $Id: selecti.gs,v 1.4 2008-01-09 22:50:15 stever Exp $
!
! Superclass Hierarchy:
!   SelectionBlock, Block, MethodContext, Object.
!
!=========================================================================

removeallmethods SelectionBlock
removeallclassmethods SelectionBlock

category: 'For Documentation Installation only'
classmethod:
installDocumentation

| doc |
doc := GsClassDocumentation _newForObsoleteGsClass: self asOfGsVersion: '4.0'.

doc documentClassWith: (GsDocText new).

self description: doc.
%

category: 'Block Evaluation'
method: SelectionBlock
_bindQuery

   "Obsolete"
   self _error: #rtErrObsolete args: #(#_bindQuery) .
   self _uncontinuableError

%
category: 'Accessing'
method: SelectionBlock
_bindPc

   "Obsolete"
   self _error: #rtErrObsolete args: #(#_bindPc) .
   self _uncontinuableError

%
