]> gitweb.factorcode.org Git - factor.git/commitdiff
sequences.extras: use either?.
authorJohn Benediktsson <mrjbq7@gmail.com>
Mon, 6 Jan 2014 04:28:34 +0000 (20:28 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Mon, 6 Jan 2014 04:28:34 +0000 (20:28 -0800)
extra/sequences/extras/extras.factor

index 2e3202184639694e8b6f070abb6c3827ea2bbac7..92eb6ec7fc8d574c7f88d53a0bf3f8526ac5c3f3 100644 (file)
@@ -282,7 +282,7 @@ PRIVATE>
 
 : ?trim ( seq quot: ( elt -- ? ) -- seq/newseq )
     over empty? [ drop ] [
-        over [ first-unsafe ] [ last-unsafe ] bi pick bi@ or
+        over [ first-unsafe ] [ last-unsafe ] bi pick either?
         [ trim ] [ drop ] if
     ] if ; inline