Fix typo
parent
45b877becc
commit
dbd8ca737a
|
|
@ -16,6 +16,7 @@
|
|||
|
||||
+ ui:
|
||||
|
||||
- x11 copy to clipboard
|
||||
- finish gui stepper
|
||||
- windows are not updated while resizing
|
||||
- graphical module manager tool
|
||||
|
|
@ -72,6 +73,7 @@
|
|||
|
||||
+ misc:
|
||||
|
||||
- consider: swap tail --> tail, swap head --> head
|
||||
- mach_signal: fault address reporting is not reliable
|
||||
- slice: if sequence or seq start is changed, abstraction violation
|
||||
- hashed generic method dispatch
|
||||
|
|
|
|||
|
|
@ -203,7 +203,6 @@ sequences vectors words ;
|
|||
"/library/ui/ui.factor"
|
||||
"/library/ui/gadgets/presentations.factor"
|
||||
"/library/ui/tools/listener.factor"
|
||||
"/library/ui/tools/walker.factor"
|
||||
"/library/ui/tools/search.factor"
|
||||
"/library/ui/tools/browser.factor"
|
||||
"/library/ui/tools/help.factor"
|
||||
|
|
|
|||
|
|
@ -69,6 +69,9 @@ IN: sequences
|
|||
[ [ swap change-nth ] 3keep ] repeat 2drop ;
|
||||
inline
|
||||
|
||||
: inject-with ( obj seq quot -- | quot: obj elt -- elt )
|
||||
swap [ with rot ] inject 2drop ; inline
|
||||
|
||||
: min-length ( seq seq -- n )
|
||||
[ length ] 2apply min ;
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue