#!/home/edwlan/sbcl/bin/sbcl --script # FASL compiled from "/home/edwlan/github_repos/html-sanitizer/html-sanitizer.lisp" using SBCL version 1.3.19.67-f63402521 X86-64N1.3.19.67-f634025212(:GENCGC :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE)PSETP*PACKAGE*dHTML-SANITIZER ,8SB-IMPL%DEFPARAMETERHTML-SANITIZER9+PLUMP-DONT-SELF-CLOSE-TAGS+span div iframe script  d PLUMP-DOMELEMENTT CREATE SB-KERNEL%FIND-CLASSOID-CELL<SB-CTOP-LEVEL-FORMP QUOTE    "l;"m;t 0 \ +7 #TSTANDARD"Y77COMPILED-DEBUG-FUN-TOPLEVELl m p q \ ###- 0 \ ##ks 0 )&&TTOPLEVELY10 EHeHH=O uTABSOLUTES=,PFUNCTIONP* 09>2></ PWRITE-STRING ڧ XD  ڻE3E2B XBB #+ "#0 \ ##k(0 F10 EHt4LIJdHHvNLM1ONIHuHuHeHHHMHUHD$HHH}H(HHD$HHUH}H(HHD$HI>H}H(H H]1<0 EHt4LIJdHHvNLM1ONIHuHuHeHHHMHUHD$HI<H}H(HHD$HHUH}H(H H]1X0 EHHeH}HuIL$`HMHD$HHUH(HHBHUHMHMHD$HHUH(HHBHJHfHeHHHL$HUHQHA H} HYHIHHMAHMAHMAH\$HHHEH+HPr RHT$ H HH)HHSH{HsHHEHHHHH9w HH9vHgH)HHu HRH]HHD$HHUH=H(HHEHH; HEHpIl$@M\$ISI;T$ ;IT$ISI1l$@t HZHB HEHH LH HRHظAtHHH tqHIAt HH)HHHH)HHSH{HsHHH+HPr RHT$ H HH)HHSH{HsHHEHHHHH9w HH9vHgH)H /AHAH= HyH\$HIHƹH+HPr RHT$ H HH)HHSH{HsHHEHHHHH9w HH9vHgH)H /HQ%HWHAH@H;=HEHH; HEH@HMHQ HMHyH\$HH+HPr RHT$ H HH)HHSH{HsHHEHHHHH9w HH9vHgH)H"HQ%HHAH@H;"PeH\$HH}H H+Hr RHT$ H HH)HHSH{HsHHEHHHHH9w HH9vHgH)HxHxI<BJ F'8INVOKE-METHOD-CALL1%8INVOKE-METHOD-CALL/8INVOKE-FAST-METHOD-CALL8TRACE-EMF-CALLO8INVOKE-NARROW-EFFECTIVE-METHOD-FUNCTION58FAST-CALL-NEXT-METHOD-BODYC)8METHOD-CALL-FUNCTION98METHOD-CALL-CALL-METHOD-ARGS38FAST-METHOD-CALL-FUNCTION'8FAST-METHOD-CALL-PVC8FAST-METHOD-CALL-NEXT-METHOD-CALL%REST-TRUEHID76\ SQSB-INTSFUNCTIONO P NULL SQ>1+8%MAKE-METHOD-FUNCTION CLSSENSURE-SELECTOR<   +7 #"M7%0 \ #"T(0 *M10 EHeHu+مG=/7> PLUMP-PARSER PARSE<LQUERY1*LQUERY-MASTER-DOCUMENT*T SIZETINITIAL-ELEMENTTFILL-POINTER%MAKE-PROPER-VECTOR<DETERMINE-VALUEGET-TEST<Create a new suite named ~A. Unknown suite ~A. P CERROR<R

H5H(HHD$HHH= H(HHBHD$HH=H(HHBHD$HHH(HHBH AIDxaHDHP H]H AIDxaHDHP+++++\=.)/8REGISTER-TESTHTML-SANITIZER.TEST'REMOVES-SCRIPT-TAGS ISP EQUAL <div></div> נ<div><script></script></div>     PSYMBOL-VALUE7TDEFINITION-TIME8#</*RUN-TEST-WHEN-DEFINED*7 RUN!28###0%REMOVES-STYLE-TAGS3;<7=8#<>7?@8###?>A@