IsLabel

(Available in 00 TS Tools(Base) - TS_Tools_Atomizer)

Source

METHOD IsLabel( bChar AS BYTE ) AS LOGIC PASCAL CLASS TS_Atomizer
LOCAL lIsLabel AS LOGIC
   TSTrace Enter
   lIsLabel:=LOGIC( _TS_AtomizerIsLabelPtr+DWORD( bChar ) )
   TSTrace Leave
RETURN lIsLabel