steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

sequences.extras: use either?.

db4
John Benediktsson 2014-01-05 20:28:34 -08:00
parent abd069c1ad
commit 325d1bac2a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/sequences/extras/extras.factor
View File

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