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

no reexporting

db4
Sam Anklesaria 2009-05-26 14:40:57 -05:00
parent e0216e2fe8
commit 3c4850bb5c
8 changed files with 10 additions and 32 deletions

3
extra/darcs-ui-demo/darcs-ui-demo.factor
View File

@ -1,7 +1,8 @@
USING: accessors arrays cocoa.dialogs closures continuations
darcs-ui.commands fry file-trees io io.files io.directories
io.encodings.utf8 kernel math models monads sequences
splitting ui ui.gadgets.alerts ui.frp ui.gadgets.comboboxes
splitting ui ui.gadgets.alerts ui.frp.gadgets ui.frp.layout
ui.frp.signals ui.frp.instances ui.gadgets.comboboxes
ui.gadgets.labels ui.gadgets.scrollers ui.baseline-alignment
ui.images unicode.case ;
EXCLUDE: fries => _ ;

3
extra/file-trees/file-trees.factor
View File

@ -1,7 +1,6 @@
USING: accessors arrays delegate delegate.protocols
io.pathnames kernel locals sequences
vectors make strings ;
EXCLUDE: ui.frp => , ;
vectors make strings ui.frp.signals ui.frp.gadgets ;
IN: file-trees
TUPLE: walkable-vector vector father ;

7
extra/modules/util/util.factor
View File

@ -1,7 +0,0 @@
USING: accessors assocs kernel lexer locals namespaces sequences
vocabs vocabs.parser ;
IN: modules.util
SYNTAX: EXPORT-FROM: [let | v [ current-vocab ] |
v words>> ";" parse-tokens
[ load-vocab vocab-words [ clone v name>> >>vocabulary ] assoc-map ] map
assoc-combine update ] ;

1
extra/ui/frp/authors.txt
View File

@ -1 +0,0 @@
Sam Anklesaria

13
extra/ui/frp/frp-docs.factor
View File

@ -1,13 +0,0 @@
USING: help.syntax help.markup ;
IN: ui.frp
ARTICLE: { "ui.frp" "index" } "Functional Reactive Programming"
"The " { $vocab-link "ui.frp" } " vocabulary is a take on functional reactive programming for user interfaces. The library is implimented as a set of models collectively called signals, and is made up of multiple submodles, all of which can be imported collectively from ui.frp" $nl
{ $vocab-subsection "Using signals:" "ui.frp.signals" }
{ $vocab-subsection "Creating user interfaces:" "ui.frp.layout" }
{ $vocab-subsection "Using gadgets:" "ui.frp.gadgets" }
{ $vocab-subsection "Combining signals:" "ui.frp.functors" }
{ $vocab-subsection "Typeclass instances:" "ui.frp.instances" }
"To get the hang of using the library, check out " { $vocab-link "darcs-ui-demo" } $nl
"For more information about frp, go to http://haskell.org/haskellwiki/Functional_Reactive_Programming"
;
ABOUT: { "ui.frp" "index" }

4
extra/ui/frp/frp.factor
View File

@ -1,4 +0,0 @@
USING: modules.util ui.frp.functors monads ;
IN: ui.frp
EXPORT-FROM: ui.frp.signals ui.frp.gadgets ui.frp.instances ui.frp.layout ;
FMAPS: $> <$ fmap FOR & | ;

6
extra/ui/frp/signals/signals.factor
View File

@ -1,4 +1,4 @@
USING: accessors arrays kernel models models.product sequences ;
USING: accessors arrays kernel monads models models.product sequences ui.frp.functors ;
IN: ui.frp.signals
TUPLE: multi-model < model ;
@ -81,4 +81,6 @@ M: | model-activated dup model-changed ;
! Only when everything's true does he make it false
TUPLE: & < | ;
: <&> ( models -- product ) & <multi-model> ;
M: & models-changed dependencies>> [ f swap (>>value) ] each ;
M: & models-changed dependencies>> [ f swap (>>value) ] each ;
FMAPS: $> <$ fmap FOR & | ;

5
extra/ui/gadgets/alerts/alerts.factor
View File

@ -1,5 +1,6 @@
USING: accessors models macros generalizations kernel ui ui.frp
ui.gadgets ui.gadgets.labels ui.gadgets.editors ui.gadgets.buttons
USING: accessors models macros generalizations kernel ui
ui.frp.gadgets ui.frp.signals ui.frp.layout ui.gadgets
ui.gadgets.labels ui.gadgets.editors ui.gadgets.buttons
ui.gadgets.packs locals sequences fonts io.styles wrap.strings ;
IN: ui.gadgets.alerts