]> gitweb.factorcode.org Git - factor.git/commitdiff
remove last since peek already does the same thing
authorerg <erg@trifocus.net>
Mon, 9 Oct 2006 00:12:59 +0000 (00:12 +0000)
committererg <erg@trifocus.net>
Mon, 9 Oct 2006 00:12:59 +0000 (00:12 +0000)
contrib/sequences.factor

index 5ec775dad5e7d29f56a13c2c7b0e478517577bbd..2f3593de4abd590f3aa46a98e6c232cec9531b26 100644 (file)
@@ -15,8 +15,6 @@ IN: sequences-contrib
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
-: last ( seq -- elt ) [ length 1- ] keep nth ;
-
 : (rtrim*) ( seq quot -- newseq )
     over length 0 > [
         2dup >r last r> call