Atomize
(Available in 00 TS Tools(Base) - TS_Tools_Atomizer)
Source
METHOD Atomize( cSourceText AS STRING ) AS ARRAY PASCAL CLASS TS_Atomizer
LOCAL pItemCacheInfoItemIndex AS DWORD PTR
LOCAL pItemCacheInfoFirstChar AS BYTE PTR
LOCAL oAtomizerItemInComment AS TS_AtomizerItem
LOCAL oAtomizerItemInString AS TS_AtomizerItem
LOCAL lSpecialVOStringTst AS LOGIC
LOCAL dwMatchingSourceLen AS DWORD
LOCAL oAtomizerItemFound AS TS_AtomizerItem
LOCAL oAtomizerItemTest AS TS_AtomizerItem
LOCAL oAtomizerItemText AS TS_AtomizerItem
LOCAL oAtomizerItemPrev AS TS_AtomizerItem
LOCAL cAtomizerItemText AS STRING
LOCAL dwMatchingLongest AS DWORD
LOCAL oAtomizerLongest AS TS_AtomizerItem
LOCAL dwMatchingLength AS DWORD
LOCAL pTestSource AS BYTE PTR
LOCAL iCopySource AS DWORD
LOCAL pToAtomize AS