Hello, Let's see that factor called shorter? again. Let's also recursively expand the combinators:
: shorter? ( a b -- ? ) [ length ] 2apply < ; : shorter? ( a b -- ? ) [ length ] tuck 2slip call < ; : shorter? ( a b -- ? ) [ length ] tuck >r >r call r> r> call < ; 2apply is a cool word. But compare the expanded shorter? to what I would have written if 2apply weren't around: : shorter? ( a b -- ? ) >r length r> length < ; Ed ------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys-and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV _______________________________________________ Factor-talk mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/factor-talk
