Base: Speeding up ad-list

[lnminente]

That's the code i'm currently using as a function in the functions list, it will be included in the next base config.

Code:

#Function ADLIST:
#Input: [Url to test if is an adsource];
#Output: Truth if match with adlist. \9 will be the portion of URL matched in the Adlist list.
#Explain: It parses quickly URLs looking for adkeywords contained in the list Adlist.
#lnminente 2009 04 23
ADLIST;\0;(^?)            $TST(\0=((\w)\0|[^?]++((^(http|ftp)://|//)(http|.|/)\w)\0)$TST(\0=(.|/|)($LST(Adlist))\9*))