nl_tokens: * META (( export #t ))
pl_tokens: function sc_filterBang ( proc , l1 ) { var head = sc_cons ( "dummy" , l1 ) ; var it = head ; var next = l1 ; while ( next !== null ) { if ( proc ( next . car ) !== false ) { it . cdr = next it = next ; } <mask> = next . cdr ; } it . cdr = null ; return head . cdr ; }