nl_tokens: * META (( export #t ))
pl_tokens: function sc_map ( proc , l1 ) { if ( l1 === undefined ) return null ; // else var nbApplyArgs = arguments . <mask> - 1 ; var applyArgs = new Array ( nbApplyArgs ) ; var revres = null ; while ( l1 !== null ) { for ( var i = 0 ; i < nbApplyArgs ; i ++ ) { applyArgs [ i ] = arguments [ i + 1 ] . car ; arguments [ i + 1 ] = arguments [ i + 1 ] . cdr ; } revres = sc_cons ( proc . apply ( null , applyArgs ) , revres ) ; } return sc_reverseAppendBang ( revres , null ) ; }